* EVALUATE ( str-ptr str-len -- ) INTERPRET the given string, >SOURCE id is -1 during that time.
EVALUATE
( str-ptr str-len -- )
INTERPRET
>SOURCE
core ordinary primitive