XQ74 ;SEA/MJM - Phantom Jump processor ; ;4/26/91 3:18 PM [ 04/02/2003 8:29 AM ]
Source file <XQ74.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
RESET | ;Reset ^XUTL to what it was before we started
|
|
CONVERT | ;Convert option names to their internal #'s an add -1 for return
|
|
SET | ;Save the "XQ" stack in XQMM("OLD")
|
|
ERR | ;Error message for locks, out-of-order, etc.
|
|
SETJ | ;Set up the variables for a jump
|
|
MESS1 | ||
LEGAL | ;See if this a legal option for this user
|
|
OUT |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(19 - [#19] | LEGAL+6, ERR+2, RESET+1 |
^VA(200 - [#200] | LEGAL+3 |
^XUTL("XQ" | LEGAL+1, SET+1, RESET+1*, RESET+3*, RESET+4* |
^XUTL("XQO" | LEGAL+1, LEGAL+2, LEGAL+3, LEGAL+4, LEGAL+5, SETJ+1, RESET+4 |
Name | Line Occurrences |
---|---|
CONVERT | XQ74+7 |
MESS1 | CONVERT+2 |
OUT | LEGAL+7, RESET+1 |
RESET | XQ74+4, MESS1 |
SET | XQ74+7 |
SETJ | LEGAL+1, LEGAL+2, LEGAL+4, LEGAL+5 |
Name | Field # of Occurrence |
---|---|
^( | LEGAL+5, SET+1, SETJ+1 |
^("T" | SET+1 |
^("XQM" | RESET+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DIC | CONVERT+1*, CONVERT+4! |
DIC(0 | CONVERT+1* |
DUZ | LEGAL+3, LEGAL+5 |
U | XQ74+6, LEGAL+3, LEGAL+5, LEGAL+6, SET+1, SET+2, SETJ+1, SETJ+2, ERR+2, RESET+2 , RESET+3, RESET+4 |
X | XQ74+7*, CONVERT+2*, CONVERT+4!, MESS1 |
XQA | SETJ+3!, OUT! |
XQD | OUT! |
>> XQDIC | XQ74+6, LEGAL+1*, LEGAL+2*, LEGAL+4*, SET+2, SETJ+1, RESET+1*, RESET+2* |
XQI | LEGAL+5*, SET+1*, SETJ+3!, CONVERT+2*, CONVERT+4!, RESET+4*, OUT! |
XQJ | CONVERT+4!, RESET+4*, OUT! |
XQK | SETJ+3!, RESET+4*, OUT! |
>> XQMM("J" | XQ74+3!, XQ74+4, XQ74+6!, XQ74+8*, OUT! |
>> XQMM("OLD" | SET+1*, RESET+1, RESET+3, RESET+4, OUT! |
>> XQMMF | SETJ+2* |
XQMMK | XQ74+6*, XQ74+7, LEGAL+1, LEGAL+2, LEGAL+4, LEGAL+5, LEGAL+6, SETJ+1, SETJ+3!, CONVERT+3* , ERR+1 |
XQMMS | XQ74+7*, XQ74+9! |
XQMMSAV | SET+2*, RESET+1, RESET+2, OUT! |
XQMMX | XQ74+6*, XQ74+8, XQ74+9!, CONVERT+2, CONVERT+3* |
XQMMY | CONVERT+1*, CONVERT+2*, CONVERT+3, CONVERT+4! |
XQNO | ERR+2, OUT! |
XQNO1 | ERR+2, OUT! |
>> XQPSM | LEGAL+1*, LEGAL+2*, LEGAL+3*, LEGAL+4, LEGAL+5*, SET+2, RESET+2* |
XQRBJ | OUT! |
XQST | OUT! |
>> XQSV | XQ74+6* |
XQUD | LEGAL+5*, SETJ+3! |
>> XQY | XQ74+6, SET+2, SETJ+1*, ERR+1*, ERR+2, RESET+1*, RESET+2* |
>> XQY0 | XQ74+6, SET+2, SETJ+1*, SETJ+2, RESET+1*, RESET+2* |
XQZ | OUT! |
Y | CONVERT+2, CONVERT+4! |