X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=extra%2Frpn%2Frpn.factor;fp=extra%2Frpn%2Frpn.factor;h=f01f28ad9c58c8d18b2b31b56bf46834f912a6eb;hp=fd39ed09a8e64a2cda5f1c68fd342c63c93e7965;hb=b8d0c7c88e980156b08bb8b5e68c69d261c08626;hpb=dbc9036f7515454df7e2622e8a3949ad158f6e5b diff --git a/extra/rpn/rpn.factor b/extra/rpn/rpn.factor index fd39ed09a8..f01f28ad9c 100644 --- a/extra/rpn/rpn.factor +++ b/extra/rpn/rpn.factor @@ -19,7 +19,7 @@ M: div-insn eval-insn drop [ / ] binary-op ; M: push-insn eval-insn value>> swons ; : rpn-tokenize ( string -- string' ) - " " split harvest sequence>list ; + words harvest sequence>list ; : rpn-parse ( string -- tokens ) rpn-tokenize [