Examples of ZGOTO

Example:

       GTM>ZGOTO
          
       %GTM-I-BREAK, Break instruction encountered
       At M source location +1^GTM$DMOD
          
       GTM>ZSHOW
       +1^GTM$DMOD (Direct mode)
       GTM>
        

This uses ZGOTO to clear all levels of the GT.M invocation stack. ZSHOW with no arguments displays the stack.

Example:

          SET $ZTRAP="ZGOTO "_$ZLEVEL_":^ERROR"
        

This SETs $ZTRAP to contain a ZGOTO, so if an error causes GT.M to XECUTE $ZTRAP, the routine ERROR executes at the same level as the SET command shown in the example.