Name
fetch-execute:forth_usual — ordinary primitive
Synopsis
FORTH
@EXECUTE
( xt -- ? )();
p4:"fetch-execute";
Description
same as @ EXECUTE , but checks for null as xt and
silently ignores it. Same as in most forths where defined.
simulate:
: @EXECUTE @ ?DUP IF EXECUTE THEN ;