ZU ;SF/JLI,RWF - For GT.M, TIE ALL TERMINALS TO THIS ROUTINE!! ;11/24/2003 11:34
Source file <ZUGTM.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| JOBEXAM(%ZPOS) | ;
|
|
| UNWIND | ;Unwind the stack
|
|
| EN | ;See that escape processing is off, Conflict with Screenman
|
|
| HALT | ||
| ERR | ;Come here on error
; handle stack overflow errors specifically |
|
| CTRLC2 | ||
| CTRLC | ||
| ERR2 | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZTSCH("LOGRSRC" | EN+4, HALT+2 |
| ^XUTL("XQ" | CTRLC2, CTRLC2+1*, HALT |
| ^XUTL("XUSYS" | JOBEXAM+2*, JOBEXAM+3*, JOBEXAM+4!, JOBEXAM+5, JOBEXAM+6, JOBEXAM+7 |
| Name | Line Occurrences |
|---|---|
| CTRLC2 | UNWIND+1 |
| HALT | ERR2+4, ERR2+20, CTRLC2+2 |
| Name | Field # of Occurrence |
|---|---|
| ^(1 | CTRLC2+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %ZPOS | JOBEXAM~, JOBEXAM+2, JOBEXAM+3 |
| %ZT | ERR2+6! |
| %reference | JOBEXAM+1~* |
| DUZ | ERR2+20, HALT |
| IO | ERR2+8, ERR2+9 |
| IO(0 | ERR2+11, ERR2+12 |
| IO(1 | ERR2+8 |
| IOF | ERR2+10 |
| IOST | ERR2+8 |
| >> NOCENABLE | EN+1, ERR2+2 |
| >> NOESCAPE | EN+1, CTRLC2+6 |
| >> XQPSM | CTRLC2+3* |
| >> XQY | CTRLC2+1*, CTRLC2+3*, CTRLC2+4 |
| >> XQY0 | CTRLC2+1*, CTRLC2+2 |
| >> XUERF | ERR2+23* |
| Name | Field # of Occurrence |
|---|---|
| $T(@%ZPOS | JOBEXAM+3 |