Paste: execute-string

Author:	blei
Mode:	factor
Date:	Thu, 24 Dec 2009 22:42:12

Plain Text |

: execute-string ( string -- output )
    [ 1array [ parse-string call ] with-datastack drop ]
    with-string-writer ;

Annotation: fixed

Author:	blei
Mode:	factor
Date:	Thu, 24 Dec 2009 22:52:12

Plain Text |

: execute-string ( string -- output )
    [
        [ 1array [ parse-string call ] with-datastack drop ]
        [ nip print-error ] recover
    ] with-string-writer ;

New Annotation

Summary:
Author:
Mode:
Body: