diff --git a/core/generator/generator.factor b/core/generator/generator.factor index 8f1dec55ab..8b6742e700 100755 --- a/core/generator/generator.factor +++ b/core/generator/generator.factor @@ -109,7 +109,7 @@ M: node generate-node drop iterate-next ; ! #label M: #label generate-node dup node-param generate-call >r - dup node-child over node-param rot #label-word generate + dup node-child over #label-word rot node-param generate r> ; ! #loop