diff --git a/core/optimizer/known-words/known-words.factor b/core/optimizer/known-words/known-words.factor index 1d8395d667..6828a0948c 100755 --- a/core/optimizer/known-words/known-words.factor +++ b/core/optimizer/known-words/known-words.factor @@ -14,8 +14,8 @@ float-arrays combinators.private combinators ; ! its second-to-last input { } [ [ - node-in-d dup length 2 - swap nth dup value? - [ value-literal ] [ drop tuple ] if 1array f + dup node-in-d dup length 2 - swap nth node-literal + dup class? [ drop tuple ] unless 1array f ] "output-classes" set-word-prop ] each