>EXECUTE >COMPILE >FFA
>EXECUTE ( xt -- ? )  
<FORTH-83-L&P>
same as EXECUTE , but checks for null as xt argument
 simulate:
   : >EXECUTE  ?DUP IF EXECUTE THEN ;

reference: p4_to_execute in ../src/lpf83.c:0397, export CO >EXECUTE