XQ83A ;ISC-SF..SEA/JLI,LUKE - MICROSURGERY ON MENU TREES TO ADD A NEW ITEM TO A MENU ;10/27/2009
Source file <XQ83A.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PATHS | ;
|
|
| PATH1 | ;
|
|
| ADD2 | ;
|
|
| ADD1 | ;
|
|
| CLEAN(XQNEW,L) | ;clean broken pointers if found on the sub menu with IEN=XQNEW - P ;494
|
|
| DOIT | ||
| ADD | ;
|
|
| TABLE | ;
|
|
| ENTRY | ;
|
|
| X1 | ;
|
|
| XPAND | ; eXPAND option into subtree, if it is a menu
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(19 - [#19] | ENTRY+2*, TABLE+1, TABLE+2, TABLE+3, TABLE+5, XPAND+1, X1+1, X1+2, PATH1+4, ADD+1 , ADD+2, DOIT, ADD2+4, ADD2+5, ADD2+6 |
| ^TMP($J | TABLE+1!, TABLE+2*, TABLE+4*, TABLE+5, TABLE+6!, X1+1*, X1+3*, PATHS+1, PATH1+1, PATH1+3 , PATH1+6*, ADD+1*, ADD+2*, DOIT!*, DOIT+1, ADD1+2 |
| Name | Line Occurrences |
|---|---|
| ADD | ENTRY+2 |
| ADD1 | DOIT+1 |
| ADD2 | ADD1+2 |
| DOIT | ADD+1 |
| PATH1 | PATHS+1 |
| PATHS | TABLE+6 |
| TABLE | ENTRY+1 |
| X1 | XPAND+1 |
| XPAND | TABLE+4, TABLE+5 |
| Name | Field # of Occurrence |
|---|---|
| ^( | ENTRY+2!, TABLE+3, TABLE+4*, TABLE+5, XPAND+1, X1+1*, X1+2, PATHS+1, PATH1+3, PATH1+6* , ADD+2!, DOIT+1, ADD1+2, ADD2+4*, ADD2+5*, ADD2+6* |
| ^("NEW" | TABLE+6! |
| ^("PATH" | TABLE+1! |
| ^("S" | PATHS+1 |
| ^("S2" | TABLE+1!, TABLE+6! |
| ^("SYN" | PATH1+6*, ADD1+2 |
| ^("U" | TABLE+2, X1+1, PATH1+3 |
| ^(0 | TABLE+3, XPAND+1, X1+2, ADD2+6* |
| ^(3 | PATH1+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %XQT1 | ENTRY+2 |
| >> A | ENTRY+2*, ADD+1, ADD+2, ADD2+4, ADD2+5, ADD2+6 |
| >> BASE | PATH1+1*, PATH1+2, ADD1+2*, ADD2+1, ADD2+4, ADD2+7 |
| >> BASE1 | ADD2+5*, ADD2+6 |
| DA | CLEAN+1~, CLEAN+2* |
| DA(1 | CLEAN+2* |
| DIK | CLEAN+1~, CLEAN+2* |
| >> I | PATHS+1*, PATH1+1 |
| >> IJ | TABLE+3*, X1+2* |
| >> J | TABLE+5*, PATHS+1*, ADD+2* |
| >> K | TABLE+5*, ADD+2*, ADD1+2* |
| L | ENTRY+3!, XPAND+1*, CLEAN~, CLEAN+2, ADD+2*, ADD2+5* |
| M | ENTRY+3! |
| N | ENTRY+3!, TABLE+4*, TABLE+5*, X1+1, ADD+2*, ADD2+3*, ADD2+5*, ADD2+6* |
| >> NEW | PATH1+3*, PATH1+4, PATH1+6 |
| >> NPATH | PATH1+1* |
| P | ENTRY+3!, ADD+2* |
| >> PATH | PATHS+1*, PATH1+1, PATH1+6, ADD1+2*, ADD2+3, ADD2+4, ADD2+5 |
| R | ENTRY+3! |
| S | ENTRY+3!, TABLE+4*, TABLE+5*, X1+1* |
| S1 | XPAND+1*, XPAND+2!, X1+1 |
| S2 | TABLE+2*, TABLE+4*, XPAND+1*, XPAND+2!, X1+1 |
| SU | TABLE+2!*, TABLE+4 |
| >> SYN | PATHS+1*, PATH1+6, ADD1+2*, ADD2+8 |
| T | ENTRY+3!, XPAND+1*, X1+1, X1+2, X1+3, PATH1+1*, PATH1+3, PATH1+4, DOIT+1*, ADD1+1 , ADD2+3*, ADD2+4, ADD2+5, ADD2+6, ADD2+7, ADD2+8 |
| U | ENTRY+2, TABLE+2, TABLE+3, TABLE+4, XPAND+1, X1+2, X1+3, PATH1+2, PATH1+4, PATH1+6 , ADD+1, ADD+2, DOIT, ADD1+1, ADD2+1, ADD2+4, ADD2+5, ADD2+6, ADD2+7, ADD2+8 |
| V | ADD2+7*, ADD2+8*, ADD2+9! |
| >> XQ83AJ | DOIT*, DOIT+1* |
| >> XQA | ADD1+1*, ADD2+4, ADD2+5 |
| >> XQC | ENTRY+2, TABLE+4 |
| >> XQC2 | XPAND+1 |
| >> XQE | PATH1+2*, PATH1+5*, PATH1+6, ADD1+1*, ADD2+1 |
| >> XQE1 | PATH1+4*, PATH1+5, ADD2+1*, ADD2+4, ADD2+5 |
| >> XQF | PATH1+2*, PATH1+5*, PATH1+6, ADD1+1*, ADD2+2 |
| >> XQF1 | PATH1+4*, PATH1+5, ADD2+1*, ADD2+2*, ADD2+4, ADD2+5 |
| >> XQFLG | ADD2+3*, ADD2+4*, ADD2+5*, ADD2+6 |
| XQJ | ENTRY+2*, ENTRY+3! |
| >> XQK | PATH1+2*, PATH1+5*, PATH1+6, ADD1+1*, ADD2+1 |
| >> XQK1 | PATH1+4*, PATH1+5, ADD2+1*, ADD2+4, ADD2+5 |
| XQLAST | ENTRY+3! |
| XQLM | ENTRY+3! |
| XQLM1 | ENTRY+3! |
| XQNAM | ENTRY+3! |
| XQNAME | ENTRY+3! |
| XQNEW | ENTRY+3!, TABLE+4*, TABLE+5*, XPAND+1, CLEAN~, CLEAN+2 |
| XQOLD | ENTRY+3!, TABLE+4*, TABLE+5*, XPAND+1, X1+1 |
| >> XQOPI | TABLE+1, TABLE+2, TABLE+3, TABLE+4, DOIT |
| >> XQOPM | ENTRY+2, TABLE+4, ADD+1, ADD+2, DOIT, DOIT+1 |
| >> XQP | TABLE+3*, TABLE+4, X1+2*, X1+3, PATH1+2*, PATH1+5*, PATH1+6, ADD1+1*, ADD2+1 |
| XQP1 | ENTRY+3!, PATH1+4*, PATH1+5, ADD2+1*, ADD2+4, ADD2+5 |
| XQP2 | ENTRY+3! |
| XQPATH | ENTRY+3! |
| XQSYN | ENTRY+3! |
| >> XQSYNY | ADD2+7*, ADD2+8* |
| >> XQUC | PATH1+3*, PATH1+6, ADD1+2*, ADD2+7 |