VALMXQ02 ; alb/mjk - XQOR1 for export with LM v1 ; 3/30/93
Source file <VALMXQ02.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
NXT | ||
EXCT | ||
EXAT | ||
XQOR1 | ; SLC/KCM - Main Unwinding Loop ;3/23/92 08:34 ;
|
|
EXST | ||
EACH | ||
REDO | ||
STAK | ||
LOOP | ;From: EN^XQOR
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ORD(101 - [#101] | LOOP+6 |
^TMP("XQORS" | LOOP+1, LOOP+4*, LOOP+5, LOOP+7, LOOP+9*, REDO, REDO+1*, STAK*, STAK+1*, STAK+2 , STAK+3, EXST*, EXST+1, EXST+2*, EXST+3!, EXAT, EXAT+1, EXCT, EACH, EACH+2 |
Name | Line Occurrences |
---|---|
@( | REDO |
EACH | LOOP+2, EXST+3 |
EXAT | LOOP+8, REDO+1 |
EXCT | LOOP+1, LOOP+2 |
EXST | STAK |
NXT | STAK+1, STAK+2 |
REDO | EXST+3 |
STAK | NXT |
Name | Field # of Occurrence |
---|---|
^("REF" | LOOP+5, LOOP+7 |
^(0 | LOOP+5, LOOP+7 |
^(15 | EXAT+1 |
^(20 | LOOP+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DIROUT | LOOP+1, LOOP+2, LOOP+8, STAK+2, NXT, EXST+3 |
>> DTOUT | LOOP+1, LOOP+2, LOOP+8, STAK+2, NXT, EXST+3 |
>> OROLD | EACH+1 |
>> ORX | LOOP+5*, LOOP+7* |
U | LOOP+6 |
X | LOOP+4~, STAK+2*, STAK+3*, EXAT+1* |
XQORFLG | LOOP+9! |
XQORFLG("PS" | LOOP+9 |
XQORFLG("SH" | LOOP+9 |
>> XQORNOD | LOOP+6, EXST+1* |
>> XQORNOD(0 | EXST+1* |
XQORPOP | LOOP+1, LOOP+2, LOOP+8, STAK+1!, STAK+2, NXT, EXST!, EXST+3 |
XQORQUIT | LOOP+1, LOOP+2, LOOP+8, STAK+1!, STAK+2, NXT!, EXST+3 |
>> XQORS | LOOP+1, LOOP+4, LOOP+5, LOOP+7, LOOP+9, REDO, REDO+1, STAK, STAK+1, STAK+2 , STAK+3, EXST, EXST+1, EXST+2, EXST+3, EXAT, EXAT+1, EXCT, EACH, EACH+2 |
>> XQXFLG | LOOP+5, LOOP+7 |
>> XRT0 | LOOP+6 |
>> XRTL | LOOP+4 |
>> XRTN | LOOP+6* |
>> Y | LOOP+4* |
Name | Field # of Occurrence |
---|---|
$T(LOGRSRC^%ZOSV | LOOP+5, LOOP+7 |