mim/development/mim/vaxc/root-stuff.mud

   1 <BLOCK (<ROOT>)>
   2 PRECOMPILED
   3 REDO
   4 M$$BINDID
   5 COMPILER-INPUT
   6 GVAL-CAREFUL
   7 <SETG LOOKAHEAD? <>>
   8 <SETG DONT-INTERRUPT? <>>
   9 ;"GETS names"
  10 M$$R-BHWD
  11
  12 ARGS OBLIST BIND PAGPTR MINF ICALL ECALL NCALL UWATM MAPPER ENVIR
  13 INGC
  14
  15 FRAME
  16
  17 SFRAME
  18
  19 CALL
  20
  21 =
  22
  23 FCN
  24
  25 GFCN
  26
  27 TEMP
  28
  29 MAKTUP
  30
  31 END
  32
  33 COMPERR
  34
  35 UNWCONT
  36
  37 JUMP
  38
  39 OPT-DISPATCH
  40
  41 ICALL
  42
  43 ACALL
  44
  45 BRANCH-FALSE
  46
  47 STACK
  48
  49 TYPE-CODE
  50
  51 TYPE-WORD
  52
  53 RECORD-TYPE
  54
  55 DEAD
  56
  57 <SETG TYPE-LENGTHS
  58       [T$LBIND
  59        16
  60        LBIND
  61        16
  62        T$GBIND
  63        10
  64        GBIND
  65        10
  66        T$ATOM
  67        10
  68        ATOM
  69        10
  70        T$OBLIST
  71        10
  72        OBLIST
  73        10
  74        T$LINK
  75        10
  76        LINK
  77        10
  78        T$LVAL
  79        10
  80        LVAL
  81        10
  82        T$GVAL
  83        10
  84        GVAL
  85        10
  86        T$FRAME
  87        12
  88        FRAME
  89        12
  90        MSUBR
  91        4
  92        T$MSUBR
  93        4
  94        T$PAGET
  95        256
  96        T$MINF
  97        10]>
  98
  99 <SETG TYPE-WORDS
 100       [UNBOUND
 101        0
 102        T$UNBOUND
 103        0
 104        FIX
 105        64
 106        CHARACTER
 107        128
 108        FLOAT
 109        192
 110        LIST
 111        257
 112        FALSE
 113        321
 114        DECL
 115        385
 116        STRING
 117        453
 118        MCODE
 119        518
 120        VECTOR
 121        583
 122        MSUBR
 123        647
 124        T$MSUBR
 125        647
 126        IMSUBR
 127        *4007*
 128        T$IMSUBR
 129        *4007*
 130        FRAME
 131        706
 132        T$FRAME
 133        706
 134        LBIND
 135        770
 136        T$LBIND
 137        770
 138        ATOM
 139        834
 140        T$ATOM
 141        834
 142        OBLIST
 143        898
 144        T$OBLIST
 145        898
 146        GBIND
 147        962
 148        T$GBIND
 149        962
 150        FORM
 151        1025
 152        T$TYPE-C
 153        1088
 154        TYPE-C
 155        1088
 156        I$TERMIN
 157        1152
 158        SEGMENT
 159        1217
 160        T$DEFER
 161        1281
 162        DEFER
 163        1281
 164        T$FUNCTION
 165        1345
 166        FUNCTION
 167        1345
 168        T$MACRO
 169        1409
 170        MACRO
 171        1409
 172        T$CHANNEL
 173        1479
 174        CHANNEL
 175        1479
 176        I$SDTABLE
 177        2247
 178        I$DISK-CHANNEL
 179        2311
 180        T$MUD-CHAN
 181        *4507*
 182        MUD-CHAN
 183        *4507*
 184        T$TYPE-ENTRY
 185        1543
 186        ADECL
 187        1607
 188        T$OFFSET
 189        1671
 190        OFFSET
 191        1671
 192        T$LVAL
 193        1730
 194        LVAL
 195        1730
 196        T$GVAL
 197        1794
 198        GVAL
 199        1794
 200        T$LINK
 201        1858
 202        LINK
 203        1858
 204        T$TUPLE
 205        1927
 206        TUPLE
 207        1927
 208        T$UVECTOR
 209        1990
 210        UVECTOR
 211        1990
 212        T$QFRAME
 213        2114
 214        QFRAME
 215        2114
 216        T$TAT
 217        2183
 218        TAT
 219        2183
 220        T$PAGET
 221        1990
 222        T$MINF
 223        1990
 224        T$WORD
 225        *4600*
 226        WORD
 227        *4600*
 228        T$PCODE
 229        *4706*
 230        PCODE
 231        *4706*
 232        T$ZONE
 233        *5007*
 234        ZONE
 235        *5007*
 236        T$GC-PARAMS
 237        *5106*
 238        GC-PARAMS
 239        *5106*
 240        T$AREA
 241        *5206*
 242        AREA
 243        *5206*
 244        T$SFRAME
 245        *5302*
 246        SFRAME
 247        *5302*
 248        T$BYTES
 249        *5404*
 250        BYTES
 251        *5404*
 252        T$TYPE-W
 253        *5500*
 254        TYPE-W
 255        *5500*
 256        T$QSFRAME
 257        *5602*
 258        QSFRAME
 259        *5602*
 260        T$BITS
 261        *5700*
 262        BITS
 263        *5700*
 264        T$KIND-ENTRY
 265        *6007*
 266        KIND-ENTRY
 267        *6007*]>
 268 <ENDBLOCK>