Annotation of gforth/peeprules.vmg, revision 1.3
1.3 ! anton 1: super2 = lit @
! 2: super6 = cells lit
! 3: super9 = cells lit +
! 4: super10 = cells lit + @
! 5: super11 = cells lit + @ lit
! 6: super12 = cells lit + @ lit @
! 7: super13 = cells lit + @ lit @ and
! 8: super16 = lit @ +
! 9: super18 = i call
! 10: super19 = dup lit
! 11: super20 = lit @ lit
! 12: super21 = cells lit + @ lit @ and lit
! 13: super22 = cells lit + @ lit @ and lit @
! 14: super23 = cells lit + @ lit @ and lit @ =
! 15: super24 = cells lit + @ lit @ and lit @ = ;s
! 16: super26 = useraddr @
! 17: super27 = over cells
! 18: super28 = over cells +
! 19: super29 = over cells + dup
! 20: super30 = over cells + dup @
! 21: super31 = useraddr @ ;s
! 22: super36 = dup lit @
! 23: super37 = @ ;s
! 24: super38 = lit @ *
! 25: super39 = lit @ @
! 26: super40 = lit @ @ ;s
! 27: super41 = + lit
! 28: super42 = lit @ ?branch
! 29: super43 = over +
! 30: super44 = over + dup
! 31: super45 = lit @ call
! 32: super47 = lit @ * ;s
! 33: super48 = lit @ lit @
! 34: super49 = ! ;s
! 35: super51 = lit call
! 36: super53 = lit @ + dup
! 37: super54 = lit @ and
! 38: super55 = 2drop drop
! 39: super56 = lit @ cells
! 40: super57 = dup lit @ and
! 41: super58 = 2drop drop lit
! 42: super59 = + lit call
! 43: super60 = lit @ cells lit
! 44: super61 = lit @ cells lit +
! 45: super62 = dup lit @ and dup
! 46: super63 = dup lit @ and dup lit
! 47: super64 = dup lit @ and dup lit @
! 48: super65 = dup lit @ and dup lit @ =
! 49: super66 = dup lit @ and dup lit @ = swap
! 50: super67 = dup lit @ and dup lit @ = swap lit
! 51: super68 = dup lit @ and dup lit @ = swap lit @
! 52: super69 = dup lit @ and dup lit @ = swap lit @ =
! 53: super70 = dup lit @ and dup lit @ = swap lit @ = or
! 54: super71 = dup lit @ and dup lit @ = swap lit @ = or ?branch
! 55: super72 = >r over
! 56: super73 = >r over +
! 57: super74 = >r over + dup
! 58: super75 = >r over + dup cells
! 59: super76 = >r over + dup cells lit
! 60: super77 = >r over + dup cells lit +
! 61: super78 = >r over + dup cells lit + @
! 62: super79 = >r over + dup cells lit + @ r>
! 63: super80 = >r over + dup cells lit + @ r> +
! 64: super81 = >r over + dup cells lit + @ r> + over
! 65: super82 = >r over + dup cells lit + @ r> + over cells
! 66: super83 = >r over + dup cells lit + @ r> + over cells lit
! 67: super84 = >r over + dup cells lit + @ r> + over cells lit +
! 68: super85 = >r over + dup cells lit + @ r> + over cells lit + @
! 69: super86 = >r over + dup cells lit + @ r> + over cells lit + @ ?branch
! 70: super87 = lit @ =
! 71: super88 = 2drop drop lit ;s
! 72: super90 = cells lit + @ lit @ and ;s
! 73: super91 = swap lit
! 74: super92 = swap lit @
! 75: super93 = lit lit
! 76: super94 = lit !
! 77: super95 = dup call
! 78: super96 = over + dup cells
! 79: super97 = over + dup cells lit
! 80: super98 = over + dup cells lit +
! 81: super99 = over + dup cells lit + @
! 82: super100 = lit @ + ;s
! 83: super102 = + dup
! 84: super103 = lit -
! 85: super104 = + dup 1-
! 86: super105 = + dup 1- call
! 87: super106 = lit - ;s
! 88: super107 = within lit
! 89: super108 = within lit and
! 90: super110 = nip nip
! 91: super111 = lit @ and lit
! 92: super112 = swap lit @ *
! 93: super113 = swap lit @ * +
! 94: super114 = swap lit @ * + ;s
! 95: super115 = drop ;s
! 96: super116 = lit @ lit @ and
! 97: super118 = lit @ + call
! 98: super119 = lit @ + dup call
! 99: super120 = over + dup @
! 100: super121 = cells lit @
! 101: super122 = cells lit @ +
! 102: super123 = cells lit @ + ;s
! 103: super124 = lit @ + dup lit
! 104: super125 = drop (loop)
! 105: super126 = @ 2dup
! 106: super127 = @ 2dup <
! 107: super128 = @ 2dup < ?branch
! 108: super129 = lit 2@
! 109: super132 = + ;s
! 110: super133 = lit @ and lit @
! 111: super134 = lit @ and lit @ =
! 112: super135 = lit @ and lit @ = ?branch
! 113: super136 = lit @ = and
! 114: super137 = 2drop ;s
! 115: super139 = nip nip ;s
! 116: super140 = 2@ call
! 117: super141 = lit 2@ rot
! 118: super142 = lit 2@ rot xor
! 119: super143 = lit 2@ rot xor >r
! 120: super144 = lit 2@ rot xor >r xor
! 121: super145 = lit 2@ rot xor >r xor r>
! 122: super146 = lit 2@ rot xor >r xor r> lit
! 123: super147 = lit 2@ rot xor >r xor r> lit 2!
! 124: super148 = lit 2@ rot xor >r xor r> lit 2! ;s
! 125: super149 = lit @ = and +
! 126: super150 = lit @ = and + ;s
! 127: super151 = + lit @
! 128: super152 = lit lit !
! 129: super153 = lit @ lit call
! 130: super154 = 2dup call
! 131: super155 = lit @ = ;s
! 132: super156 = lit ! lit
! 133: super158 = dup lit cells
! 134: super159 = dup lit cells +
! 135: super160 = dup lit cells + 2@
! 136: super161 = dup lit cells + 2@ rot
! 137: super162 = swap call
! 138: super163 = lit ! lit !
! 139: super164 = lit @ branch
! 140: super165 = lit @ 1+
! 141: super166 = dup cells
! 142: super167 = dup cells lit
! 143: super168 = dup cells lit +
! 144: super169 = dup cells lit + @
! 145: super170 = lit @ 1+ lit
! 146: super171 = dup lit !
! 147: super172 = dup 2@
! 148: super173 = + lit @ =
! 149: super174 = + lit @ = ?branch
! 150: super175 = lit @ + dup lit call
! 151: super176 = lit @ lit @ and 0=
! 152: super177 = lit @ lit @ and 0= ?branch
! 153: super178 = drop lit
! 154: super179 = drop lit @
! 155: super181 = cells swap
! 156: super182 = cells swap cells
! 157: super183 = cells swap cells lit
! 158: super184 = cells swap cells lit +
! 159: super185 = nip nip lit
! 160: super186 = nip nip lit @
! 161: super187 = nip nip lit @ and
! 162: super188 = nip nip lit @ and dup
! 163: super189 = nip nip lit @ and dup lit
! 164: super190 = nip nip lit @ and dup lit @
! 165: super191 = nip nip lit @ and dup lit @ =
! 166: super192 = nip nip lit @ and dup lit @ = swap
! 167: super193 = nip nip lit @ and dup lit @ = swap lit
! 168: super194 = nip nip lit @ and dup lit @ = swap lit @
! 169: super195 = nip nip lit @ and dup lit @ = swap lit @ =
! 170: super196 = nip nip lit @ and dup lit @ = swap lit @ = or
! 171: super197 = nip nip lit @ and dup lit @ = swap lit @ = or ;s
! 172: super198 = over call
! 173: super199 = lit @ + dup lit +
! 174: super200 = lit @ lit @ lit
! 175: super201 = cells lit + @ 0=
! 176: super202 = cells lit + @ 0= ;s
! 177: super203 = lit @ and lit *
! 178: super204 = lit @ and lit * +
! 179: super205 = lit @ and lit * + lit
! 180: super206 = lit @ and lit * + lit call
! 181: super207 = lit @ dup
! 182: super208 = lit @ dup lit
! 183: super209 = 0= ?branch
! 184: super210 = or over
! 185: super211 = or over lit
! 186: super212 = lit @ lit @ lit !
! 187: super213 = lit @ lit @ lit ! lit
! 188: super214 = lit @ lit @ lit ! lit !
! 189: super215 = lit @ lit @ lit ! lit ! lit
! 190: super216 = lit @ lit @ lit ! lit ! lit @
! 191: super217 = lit @ lit @ lit ! lit ! lit @ 0=
! 192: super218 = lit @ lit @ lit ! lit ! lit @ 0= lit
! 193: super219 = lit @ lit @ lit ! lit ! lit @ 0= lit !
! 194: super220 = lit @ lit @ lit ! lit ! lit @ 0= lit ! lit
! 195: super221 = lit @ lit @ lit ! lit ! lit @ 0= lit ! lit @
! 196: super222 = lit @ lit @ lit ! lit ! lit @ 0= lit ! lit @ negate
! 197: super223 = lit @ lit @ lit ! lit ! lit @ 0= lit ! lit @ negate lit
! 198: super224 = lit @ lit @ lit ! lit ! lit @ 0= lit ! lit @ negate lit !
! 199: super225 = lit @ lit @ lit ! lit ! lit @ 0= lit ! lit @ negate lit ! ;s
! 200: super226 = lit @ 1+ lit !
! 201: super227 = dup lit ! cells
! 202: super228 = dup lit ! cells lit
! 203: super229 = dup lit ! cells lit +
! 204: super230 = dup lit ! cells lit + @
! 205: super231 = dup lit ! cells lit + @ dup
! 206: super232 = dup lit ! cells lit + @ dup lit
! 207: super233 = dup lit ! cells lit + @ dup lit !
! 208: super234 = dup lit ! cells lit + @ dup lit ! ;s
! 209: super235 = lit @ and cells
! 210: super236 = lit @ and cells lit
! 211: super237 = lit @ and cells lit +
! 212: super238 = over lit
! 213: super239 = dup 2@ lit
! 214: super240 = dup 2@ lit 2@
! 215: super241 = dup 2@ lit 2@ d=
! 216: super242 = lit @ and dup
! 217: super243 = lit @ and dup lit
! 218: super244 = dup lit @ call
! 219: super245 = lit /mod
! 220: super246 = lit /mod rot
! 221: super247 = lit /mod rot lit
! 222: super248 = lit /mod rot lit /mod
! 223: super249 = lit /mod rot lit /mod swap
! 224: super250 = lit /mod rot lit /mod swap >r
! 225: super251 = lit /mod rot lit /mod swap >r -
! 226: super252 = lit /mod rot lit /mod swap >r - swap
! 227: super253 = lit /mod rot lit /mod swap >r - swap r>
! 228: super254 = lit /mod rot lit /mod swap >r - swap r> -
! 229: super255 = lit /mod rot lit /mod swap >r - swap r> - swap
! 230: super256 = lit /mod rot lit /mod swap >r - swap r> - swap ;s
! 231: super257 = lit and
! 232: super258 = dup lit @ =
! 233: super260 = dup lit @ = over
! 234: super261 = dup lit @ = over lit
! 235: super262 = dup lit @ = over lit @
! 236: super263 = dup lit @ = over lit @ =
! 237: super264 = dup lit @ = over lit @ = or
! 238: super265 = lit @ and dup lit call
! 239: super267 = abs swap
! 240: super268 = abs swap abs
! 241: super269 = abs swap abs =
! 242: super270 = abs swap abs = ;s
! 243: super271 = lit @ + lit
! 244: super272 = dup lit cells + 2@ rot @
! 245: super273 = dup lit cells + 2@ rot @ ;s
! 246: super274 = lit ! call
! 247: super275 = cells lit + !
! 248: super276 = cells lit + ! ;s
! 249: super277 = 0= swap
! 250: super278 = 0= swap 0=
! 251: super279 = 0= swap 0= xor
! 252: super280 = 0= swap 0= xor ;s
! 253: super281 = lit lit call
! 254: super282 = lit lit ! call
! 255: super284 = lit @ + dup cells
! 256: super285 = lit @ + dup cells lit
! 257: super286 = lit @ + dup cells lit +
! 258: super287 = lit @ + dup cells lit + @
! 259: super288 = dup lit cells + 2@ rot 2@
! 260: super289 = dup lit cells + 2@ rot 2@ ;s
! 261: super290 = dup 2@ lit 2@ d= ?branch
! 262: super291 = dup cells lit + @ call
! 263: super292 = lit @ swap
! 264: super293 = 2drop drop lit @
! 265: super294 = lit @ i
! 266: super295 = lit @ dup lit @
! 267: super296 = lit @ i call
! 268: super297 = lit @ = ?branch
! 269: super298 = lit @ * lit
! 270: super299 = lit @ * lit @
! 271: super300 = lit @ lit @ 2>r
! 272: super301 = or ;s
! 273: super302 = lit lit ! lit
! 274: super303 = lit @ + dup lit + 2@
! 275: super304 = lit @ + dup lit + 2@ rot
! 276: super305 = lit @ + dup lit + 2@ rot lit
! 277: super306 = lit @ + dup lit + 2@ rot lit +
! 278: super307 = lit @ + dup lit + 2@ rot lit + @
! 279: super308 = lit @ + dup lit + 2@ rot lit + @ ;s
! 280: super309 = lit @ lit @ and cells
! 281: super310 = lit @ lit @ and cells lit
! 282: super311 = lit @ lit @ and cells lit +
! 283: super312 = lit @ lit @ *
! 284: super313 = lit @ lit @ * lit
! 285: super314 = lit @ lit @ * lit +
! 286: super315 = lit @ lit @ * lit + ;s
! 287: super316 = lit ! lit ! call
! 288: super317 = lit @ 1+ lit ! ;s
! 289: super318 = i cells
! 290: super319 = i cells lit
! 291: super320 = i cells lit +
! 292: super321 = i cells lit + @
! 293: super322 = i cells lit + @ dup
! 294: super323 = i cells lit + @ dup lit
! 295: super324 = lit @ lit lit
! 296: super325 = lit @ lit lit @
! 297: super326 = lit @ lit lit @ *
! 298: super327 = lit fill
! 299: super328 = lit fill ;s
! 300: super329 = lit @ 0=
! 301: super330 = lit @ 0= ?branch
! 302: super331 = i cells lit + @ dup lit @
! 303: super332 = lit @ 1-
! 304: super333 = lit @ 1- lit
! 305: super334 = lit @ 1- lit !
! 306: super335 = lit @ 1- lit ! ;s
! 307: super336 = lit @ + lit +
! 308: super337 = lit @ + lit + @
! 309: super338 = lit @ + lit + @ ;s
! 310: super339 = lit @ lit *
! 311: super340 = lit @ lit * lit
! 312: super341 = i cells lit + @ dup lit @ =
! 313: super342 = i cells lit + @ dup lit @ = ?branch
! 314: super343 = lit @ lit lit @ * call
! 315: super344 = lit @ + dup lit + @
! 316: super345 = lit @ + dup lit + @ swap
! 317: super346 = lit @ + dup lit + @ swap lit
! 318: super347 = lit @ + dup lit + @ swap lit +
! 319: super348 = lit @ + dup lit + @ swap lit + @
! 320: super349 = lit @ + dup lit + @ swap lit + @ ;s
! 321: super350 = lit and +
! 322: super352 = lit @ lit * lit @
! 323: super353 = lit @ lit * lit @ *
! 324: super354 = lit @ lit * lit @ * lit
! 325: super355 = lit @ lit * lit @ * lit +
! 326: super356 = lit @ lit * lit @ * lit + ;s
! 327: super357 = tuck !
! 328: super358 = tuck ! lit
! 329: super359 = tuck ! lit cells
! 330: super360 = tuck ! lit cells +
! 331: super361 = tuck ! lit cells + 2!
! 332: super362 = tuck ! lit cells + 2! ;s
! 333: super363 = swap lit @ +
! 334: super364 = swap lit @ + swap
! 335: super365 = swap lit @ + swap 2@
! 336: super366 = swap lit @ + swap 2@ d0=
! 337: super367 = swap lit @ + swap 2@ d0= ?branch
! 338: super368 = lit lit @
! 339: super369 = lit @ * lit @ lit
! 340: super370 = lit @ * lit @ lit and
! 341: super371 = lit @ * lit @ lit and lit
! 342: super372 = lit @ * lit @ lit and lit @
! 343: super373 = lit @ * lit @ lit and lit @ +
! 344: super374 = lit @ * lit @ lit and lit @ + +
! 345: super375 = lit @ * lit @ lit and lit @ + + ;s
! 346: super376 = lit and ;s
! 347: super377 = dup lit call
! 348: super378 = over lit @
! 349: super379 = dup 0<
! 350: super380 = >r call
! 351: super381 = lit *
! 352: super382 = lit * +
! 353: super383 = or over lit +
! 354: super384 = or over lit + call
! 355: super385 = + call
! 356: super387 = or swap
! 357: super388 = or swap lit
! 358: super389 = r> 2r>
! 359: super390 = lit @ dup lit @ *
! 360: super391 = lit @ dup lit @ * +
! 361: super392 = lit @ dup lit @ * + lit
! 362: super393 = lit @ dup lit @ * + lit @
! 363: super394 = lit @ dup lit @ * + lit @ *
! 364: super395 = lit @ dup lit @ * + lit @ * lit
! 365: super396 = lit @ dup lit @ * + lit @ * lit +
! 366: super397 = lit @ dup lit @ * + lit @ * lit + ;s
! 367: super398 = over + dup lit
! 368: super399 = over + dup lit @
! 369: super400 = over + dup lit @ =
! 370: super401 = over + dup lit @ = over
! 371: super402 = over + dup lit @ = over cells
! 372: super403 = over + dup lit @ = over cells lit
! 373: super404 = over + dup lit @ = over cells lit +
! 374: super405 = over + dup lit @ = over cells lit + @
! 375: super406 = over + dup lit @ = over cells lit + @ or
! 376: super407 = over + dup lit @ = over cells lit + @ or ?branch
! 377: super408 = lit +
! 378: super409 = + lit @ lit
! 379: super410 = lit @ + @
! 380: super411 = lit @ + @ ;s
! 381: super412 = lit @ lit @ and ?branch
! 382: super413 = lit ! lit lit
! 383: super414 = lit ! lit lit !
! 384: super415 = swap lit @ and
! 385: super416 = nip swap
! 386: super417 = nip swap negate
! 387: super418 = nip swap negate call
! 388: super419 = swap lit @ and ?branch
! 389: super420 = lit lit ! lit @
! 390: super421 = - lit
! 391: super422 = - lit cells
! 392: super423 = - lit cells -
! 393: super424 = - lit cells - call
! 394: super425 = lit ! lit lit ! ;s
! 395: super426 = lit @ dup lit cells
! 396: super427 = lit @ dup lit cells -
! 397: super428 = lit @ dup lit cells - @
! 398: super429 = lit @ dup lit cells - @ lit
! 399: super430 = lit @ dup lit cells - @ lit !
! 400: super431 = lit @ dup lit cells - @ lit ! dup
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>