|
DataMuseum.dkPresents historical artifacts from the history of: RC3500 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC3500 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 44544 (0xae00) Types: TextFileVerbose Names: »langextime«
└─⟦2c55ea56f⟧ Bits:30001844 SW-save af projekt 1000, Alarm-system └─⟦6b41451d2⟧ └─⟦this⟧ »langextime«
*head 1 cpu \f polm1 1981.01.06 15.40.14 cpu: 0.38 sec. *pascal80 codesize.12000 spacing.12000 survey.8 codelist.yes debugenvir 81.01.06. 15.40. pascal80 version 1980.12.16 name headline beginline endline appetite(words) outchar 77 81 87 : 9 outtext 89 93 95 : 17 writenl 97 100 107 : 11 readchar 109 111 118 : 11 getinput 120 123 134 : 7 languagetime 18 144 225 : 1187 statistics from pass5: assignment: 0 5 22 0 0 0 0 0 5 8 0 0 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2 0 0 0 104 01 000e: o. 6 1 1. 105 01 000e: o. 6 10 1. 106 01 000e: b. entry, exit, exception, c#, e#, r#, l#. 107 01 000e: l. 52 108 01 000e: 109 01 000e: b. appeval, appstat, work, linetab. 110 9.9 9 01 000e: entry: reaad linetab 111 10.6 20 01 0013: stvgd plinetab 112 7.7 28 01 0016: revgw maxstack 113 11.2 39 01 0019: uadhw bonappetite 114 4.0 43 01 001c: cgreg 115 11.2 54 01 001d: uadhw -7 116 7.3 61 01 0020: crput 117 4.9 66 01 0021: renhb appstat 118 6.0 72 01 0024: rechw 16384 119 7.6 80 01 0027: stvlw 109 120 11.2 91 01 002a: revgd semchain 121 10.6 102 01 002d: stvld osem+ 109 122 7.9 110 01 0030: reald 109 123 10.6 120 01 0033: stvgd semchain; 124 4.9 125 01 0036: renhb 16; 125 7.9 133 01 0039: reald 109 126 6.0 139 01 003c: rechw 4 127 6.0 145 01 003f: rechw 49 128 25.1 170 01 0042: pcals 22, 0, e#35 129 01 004a: l. 56 130 6.0 176 01 004a: rechw 16384 131 7.6 184 01 004d: stvlw 117 132 11.2 195 01 0050: revgd semchain 133 10.6 206 01 0053: stvld osem+ 117 134 7.9 213 01 0056: reald 117 135 10.6 224 01 0059: stvgd semchain 136 01 005c: l. 56 137 6.0 230 01 005c: rechw 16384 138 7.6 238 01 005f: stvlw 125 139 11.2 249 01 0062: revgd semchain 140 10.6 259 01 0065: stvld osem+ 125 141 7.9 267 01 0068: reald 125 142 10.6 278 01 006b: stvgd semchain 143 01 006e: l. 56 144 6.0 284 01 006e: rechw 16384 145 7.6 292 01 0071: stvlw 133 146 11.2 303 01 0074: revgd semchain 147 10.6 313 01 0077: stvld osem+ 133 148 7.9 321 01 007a: reald 133 149 10.6 332 01 007d: stvgd semchain 150 01 0080: l. 60 151 6.0 338 01 0080: rechw 16384 152 7.6 345 01 0083: stvlw 141 153 11.2 357 01 0086: revgd refchain 154 10.6 367 01 0089: stvld oref+ 141 155 7.9 375 01 008c: reald 141 156 10.6 386 01 008f: stvgd refchain 157 01 0092: l. 60 158 6.0 392 01 0092: rechw 16384 159 7.6 399 01 0095: stvlw 149 160 11.2 411 01 0098: revgd refchain 161 10.6 421 01 009b: stvld oref+ 149 162 7.9 429 01 009e: reald 149 163 10.6 440 01 00a1: stvgd refchain 164 01 00a4: l. 62 165 6.0 446 01 00a4: rechw 16384 166 7.6 453 01 00a7: stvlw 157 167 01 00aa: l. 62 168 6.0 459 01 00aa: rechw 16384 169 7.6 467 01 00ad: stvlw 161 170 01 00b0: l. 68 171 6.0 473 01 00b0: rechw 16384 172 7.6 480 01 00b3: stvlw 183 173 11.2 492 01 00b6: revgd refchain 174 10.6 502 01 00b9: stvld oref+ 183 175 7.9 510 01 00bc: reald 183 176 10.6 521 01 00bf: stvgd refchain 177 01 00c2: l. 70 178 6.0 527 01 00c2: rechw 16384 179 7.6 534 01 00c5: stvlw 191 180 11.2 546 01 00c8: revgd refchain 181 10.6 556 01 00cb: stvld oref+ 191 182 7.9 564 01 00ce: reald 191 183 10.6 575 01 00d1: stvgd refchain 184 01 00d4: l. 77 185 01 00d4: b. continue. 186 4.2 579 01 00d4: jmprw continue 187 01 00d7: l. 80 188 01 00d7: b. appeval, appstat, work, linetab. 189 01 00d7: 190 01 00d7: l. 81 191 9.9 589 01 00d7: r#76 : reaad linetab 192 10.6 599 01 00dc: stvld rlinetab 193 4.9 604 01 00df: renhb appstat 194 01 00e2: 195 01 00e2: ; 196 7.9 612 01 00e2: reagd 149 197 6.0 618 01 00e5: rechw 49 198 21.7 640 01 00e8: llock 17 199 8.9 649 01 00eb: lrese 200 01 00ec: l. 84 201 11.2 660 01 00ec: revld 17 202 11.2 671 01 00ef: revld 17 203 11.0 682 01 00f2: revsw 2 204 6.0 688 01 00f5: rechw 1 205 7.3 695 01 00f8: add 206 01 00f9: l. 85 207 11.0 706 01 00f9: stvsw 2 208 11.2 718 01 00fc: revld 17 209 11.2 729 01 00ff: reasd 18 210 11.2 740 01 0102: revld 17 211 11.0 751 01 0105: revsw 2 212 9.9 761 01 0108: reaad c#65 213 21.0 782 01 010d: index 214 7.7 790 01 010e: revlb 16 215 01 0111: l. 86 216 11.0 801 01 0111: stvsb 0 217 01 0114: l. 87 218 6.0 807 01 0114: rechw 0 219 25.0 832 01 0117: stvsf 0, 0; 220 9.1 841 01 011b: pexit 221 01 011c: work= 3 222 01 011c: appstat= 4 223 01 011c: appeval= 14 224 01 011c: c#65 : c. 6 225 01 011c: 18, 97, 1 226 01 0122: e. 227 01 0122: 228 01 0132: linetab: z. outchar 229 01 0132: e. 230 01 0132: e.; 231 01 0132: l. 92 232 01 0132: b. appeval, appstat, work, linetab. 233 01 0132: 234 01 0132: l. 93 235 9.9 851 01 0132: r#77 : reaad linetab 236 10.6 861 01 0137: stvld rlinetab 237 4.9 866 01 013a: renhb appstat 238 01 013d: 239 01 013d: b. forrep, forstore, forexit. 240 01 013d: l. 93 241 6.0 872 01 013d: rechw 1 242 5.4 878 01 0140: revpw 243 6.0 884 01 0141: rechw 12 244 5.4 889 01 0144: revpw 245 7.6 897 01 0145: stvlw 33; 246 7.7 904 01 0148: le ; 247 6.2 910 01 0149: jmzgt forstore 248 4.2 915 01 014c: jmprw forexit 249 11.2 926 01 014f: forrep: uadhw 1 250 7.6 933 01 0152: forstore: stvlw 27 251 01 0155: l. 94 252 4.9 938 01 0155: renhb 16; 253 7.9 946 01 0158: reald 15 254 7.7 954 01 015b: revlw 27 255 9.9 964 01 015e: reaad c#10 256 21.0 985 01 0163: index 257 11.0 996 01 0164: revsb 0 258 25.1 1021 01 0167: pcals 16, 1, r#76 259 01 016f: l. 95 260 7.7 1029 01 016f: revlw 27 261 5.4 1034 01 0172: revpw 262 7.7 1042 01 0173: revlw 33 263 7.7 1049 01 0176: lt ; 264 6.2 1056 01 0177: jmzgt forrep 265 4.4 1060 01 017a: forexit: stnhb 2 266 01 017d: e.; 267 9.1 1069 01 017d: pexit 268 01 017e: work= 7 269 01 017e: appstat= 8 270 01 017e: appeval= 26 271 01 017e: c#10 : c. 6 272 01 017e: 1, 12, 1 273 01 0184: e. 274 01 0184: 275 01 0194: linetab: z. outtext 276 01 0194: e. 277 01 0194: e.; 278 01 0194: l. 98 279 01 0194: b. appeval, appstat, work, linetab. 280 01 0194: 281 01 0194: l. 100 282 9.9 1079 01 0194: r#78 : reaad linetab 283 10.6 1090 01 0199: stvld rlinetab 284 4.9 1095 01 019c: renhb appstat 285 01 019f: 286 01 019f: b. ifelse, ifexit.; 287 01 019f: l. 99 288 7.9 1102 01 019f: reald 15 289 7.9 1110 01 01a2: reagd 149 290 01 01a5: b. entry, exit, exception, c#, d#, e#, r#, l# . 291 10.1 1120 01 01a5: tnill 292 11.0 1131 01 01a6: stvsb 0 293 01 01a9: e. 294 7.7 1139 01 01a9: revlb 15 295 6.1 1145 01 01ac: not 296 6.2 1151 01 01ad: jmzeq ifelse 297 01 01b0: l. 101 298 4.9 1156 01 01b0: renhb 16; 299 6.0 1162 01 01b3: rechw 10 300 25.1 1187 01 01b6: pcals 16, 1, r#76 301 01 01be: l. 102 302 7.9 1195 01 01be: reagd 149 303 11.2 1207 01 01c1: revgd 157 304 01 01c4: b. entry, exit, exception, c#, d#, e#, r#, l# . 305 58.3 1265 01 01c4: csign 306 01 01c5: e. 307 01 01c5: ifelse: 308 01 01c5: l. 103 309 01 01c5: e.; 310 01 01c5: l. 104 311 7.9 1273 01 01c5: reagd 149 312 7.9 1281 01 01c8: reagd 125 313 01 01cb: b. entry, exit, exception, c#, d#, e#, r#, l# . 314 54.7 1335 01 01cb: cwait 315 11.8 1347 01 01cc: cwtac 316 01 01cd: e. 317 01 01cd: 318 01 01cd: l. 105 319 01 01cd: ; 320 7.9 1355 01 01cd: reagd 149 321 6.0 1361 01 01d0: rechw 49 322 21.7 1383 01 01d3: llock 15 323 8.9 1392 01 01d6: lrese 324 01 01d7: l. 106 325 11.2 1403 01 01d7: revld 15 326 6.0 1409 01 01da: rechw 18 327 11.0 1420 01 01dd: stvsw 2 328 01 01e0: l. 107 329 6.0 1426 01 01e0: rechw 0 330 25.0 1451 01 01e3: stvsf 0, 0; 331 9.1 1460 01 01e7: pexit 332 01 01e8: work= 3 333 01 01e8: appstat= 4 334 01 01e8: appeval= 18 335 01 01f8: linetab: z. writenl 336 01 01f8: e. 337 01 01f8: e.; 338 01 01f8: l. 110 339 01 01f8: b. appeval, appstat, work, linetab. 340 01 01f8: 341 01 01f8: l. 111 342 9.9 1470 01 01f8: r#79 : reaad linetab 343 10.6 1480 01 01fd: stvld rlinetab 344 4.9 1485 01 0200: renhb appstat 345 01 0203: 346 01 0203: ; 347 7.9 1493 01 0203: reagd 141 348 6.0 1499 01 0206: rechw 49 349 21.7 1521 01 0209: llock 19 350 8.9 1530 01 020c: lrese 351 01 020d: l. 114 352 11.2 1541 01 020d: revld 15 353 11.2 1552 01 0210: revld 19 354 11.2 1563 01 0213: reasd 18 355 11.2 1575 01 0216: revld 19 356 11.0 1586 01 0219: revsw 4 357 9.9 1596 01 021c: reaad c#65 358 21.0 1617 01 0221: index 359 11.0 1628 01 0222: revsb 0 360 01 0225: l. 115 361 11.0 1639 01 0225: stvsb 0 362 11.2 1650 01 0228: revld 19 363 11.2 1661 01 022b: revld 19 364 11.0 1672 01 022e: revsw 4 365 6.0 1678 01 0231: rechw 1 366 7.3 1685 01 0234: add 367 01 0235: l. 116 368 11.0 1696 01 0235: stvsw 4 369 01 0238: l. 117 370 6.0 1702 01 0238: rechw 0 371 25.0 1727 01 023b: stvsf 0, 0; 372 7.7 1735 01 023f: revgw 173 373 6.0 1741 01 0242: rechw 1 374 7.3 1748 01 0245: sub 375 01 0246: l. 118 376 7.6 1756 01 0246: stvgw 173 377 9.1 1765 01 0249: pexit 378 01 024a: work= 3 379 01 024a: appstat= 4 380 01 024a: appeval= 18 381 01 025a: linetab: z. readchar 382 01 025a: e. 383 01 025a: e.; 384 01 025a: l. 121 385 01 025a: b. appeval, appstat, work, linetab. 386 01 025a: 387 01 025a: l. 123 388 9.9 1775 01 025a: r#80 : reaad linetab 389 10.6 1785 01 025f: stvld rlinetab 390 4.9 1790 01 0262: renhb appstat 391 01 0265: 392 01 0265: b. rprep.; 393 01 0265: rprep: 394 01 0265: ; 395 7.9 1798 01 0265: reagd 141 396 6.0 1804 01 0268: rechw 49 397 21.7 1826 01 026b: llock 15 398 8.9 1835 01 026e: lrese 399 01 026f: l. 124 400 11.2 1846 01 026f: revld 15 401 6.0 1852 01 0272: rechw 18 402 11.0 1863 01 0275: stvsw 4 403 01 0278: l. 125 404 6.0 1869 01 0278: rechw 0 405 25.0 1894 01 027b: stvsf 0, 0; 406 7.9 1902 01 027f: reagd 141 407 11.2 1913 01 0282: revgd 157 408 01 0285: b. entry, exit, exception, c#, d#, e#, r#, l# . 409 58.3 1971 01 0285: csign 410 01 0286: e. 411 7.9 1979 01 0286: reagd 141 412 01 0289: l. 126 413 7.9 1987 01 0289: reagd 133 414 01 028c: b. entry, exit, exception, c#, d#, e#, r#, l# . 415 54.7 2042 01 028c: cwait 416 11.8 2054 01 028d: cwtac 417 01 028e: e. 418 11.2 2065 01 028e: revgd 141 419 01 0291: l. 127 420 11.0 2076 01 0291: revsb 29 421 6.0 2082 01 0294: rechw 0 422 7.5 2089 01 0297: eq 423 6.2 2096 01 0298: jmzeq rprep 424 01 029b: e.; 425 01 029b: l. 128 426 01 029b: ; 427 7.9 2104 01 029b: reagd 141 428 6.0 2110 01 029e: rechw 49 429 21.7 2131 01 02a1: llock 15 430 8.9 2140 01 02a4: lrese 431 01 02a5: l. 131 432 11.2 2151 01 02a5: revld 15 433 11.0 2162 01 02a8: revsw 4 434 11.2 2174 01 02ab: revld 15 435 11.0 2185 01 02ae: revsw 0 436 7.3 2192 01 02b1: sub 437 01 02b2: l. 132 438 7.6 2199 01 02b2: stvgw 173 439 11.2 2211 01 02b5: revld 15 440 6.0 2217 01 02b8: rechw 18 441 01 02bb: l. 133 442 11.0 2228 01 02bb: stvsw 4 443 01 02be: l. 134 444 6.0 2234 01 02be: rechw 0 445 25.0 2259 01 02c1: stvsf 0, 0; 446 9.1 2268 01 02c5: pexit 447 01 02c6: work= 3 448 01 02c6: appstat= 4 449 01 02c6: appeval= 10 450 01 02d6: linetab: z. getinput 451 01 02d6: e. 452 01 02d6: e.; 453 01 02d6: continue: 454 01 02d6: e. 455 01 02d6: l. 144 456 4.9 2273 01 02d6: renhb 16; 457 7.9 2281 01 02d9: reagd 149 458 7.9 2288 01 02dc: reagd 109 459 7.9 2296 01 02df: reagd 125 460 25.1 2321 01 02e2: pcals 26, 0, e#2 461 01 02ea: l. 146 462 11.2 2333 01 02ea: revgd 149 463 6.0 2339 01 02ed: rechw 2 464 01 02f0: l. 148 465 11.0 2350 01 02f0: stvsb 28 466 01 02f3: ; 467 7.9 2358 01 02f3: reagd 149 468 6.0 2364 01 02f6: rechw 49 469 21.7 2385 01 02f9: llock 2341 470 8.9 2394 01 02fc: lrese 471 01 02fd: l. 151 472 11.2 2405 01 02fd: revgd 2341 473 6.0 2411 01 0300: rechw 18 474 01 0303: l. 152 475 11.0 2422 01 0303: stvsw 0 476 11.2 2434 01 0306: revgd 2341 477 11.2 2445 01 0309: reasd 6 478 9.9 2455 01 030c: reaad c#81 479 01 0311: l. 153 480 6.0 2461 01 0311: rechw 12 481 17.0 2478 01 0314: moveg 482 11.2 2489 01 0315: revgd 2341 483 11.2 2500 01 0318: reasd 18 484 6.0 2506 01 031b: rechw 18 485 9.9 2516 01 031e: reaad c#65 486 21.0 2537 01 0323: index 487 6.0 2543 01 0324: rechw 42 488 01 0327: l. 154 489 11.0 2554 01 0327: stvsb 0 490 01 032a: l. 157 491 6.0 2560 01 032a: rechw 0 492 25.0 2585 01 032d: stvsf 0, 0; 493 7.9 2593 01 0331: reagd 149 494 01 0334: b. entry, exit, exception, c#, d#, e#, r#, l# . 495 61.1 2654 01 0334: crele answer 496 01 0336: e. 497 4.9 2659 01 0336: renhb 16; 498 01 0339: l. 158 499 25.1 2684 01 0339: pcals 14, 0, r#78 500 01 0341: l. 161 501 4.9 2689 01 0341: renhb 16; 502 7.9 2697 01 0344: reagd 141 503 7.9 2705 01 0347: reagd 109 504 7.9 2713 01 034a: reagd 133 505 25.1 2738 01 034d: pcals 26, 0, e#2 506 01 0355: l. 162 507 11.2 2749 01 0355: revgd 141 508 6.0 2755 01 0358: rechw 1 509 01 035b: l. 163 510 11.0 2766 01 035b: stvsb 28 511 01 035e: ; 512 7.9 2774 01 035e: reagd 141 513 6.0 2780 01 0361: rechw 49 514 21.7 2801 01 0364: llock 2341 515 8.9 2810 01 0367: lrese 516 01 0368: l. 165 517 11.2 2822 01 0368: revgd 2341 518 6.0 2828 01 036b: rechw 18 519 01 036e: l. 166 520 11.0 2839 01 036e: stvsw 0 521 11.2 2850 01 0371: revgd 2341 522 6.0 2856 01 0374: rechw 97 523 01 0377: l. 167 524 11.0 2867 01 0377: stvsw 2 525 11.2 2878 01 037a: revgd 2341 526 11.2 2889 01 037d: reasd 6 527 9.9 2899 01 0380: reaad c#82 528 01 0385: l. 168 529 6.0 2905 01 0385: rechw 12 530 17.0 2922 01 0388: moveg 531 01 0389: l. 170 532 6.0 2928 01 0389: rechw 0 533 25.0 2953 01 038c: stvsf 0, 0; 534 4.9 2958 01 0390: renhb 16; 535 9.9 2968 01 0393: reaad c#83 536 6.0 2974 01 0398: rechw 12 537 21.0 2995 01 039b: revsm 538 25.1 3020 01 039c: pcals 26, 0, r#77 539 01 03a4: l. 173 540 01 03a4: b. rprep.; 541 4.9 3025 01 03a4: rprep: renhb 16; 542 25.1 3050 01 03a7: pcals 14, 0, r#80 543 01 03af: l. 175 544 4.9 3055 01 03af: renhb 16; 545 7.9 3063 01 03b2: reagd 2341 546 25.1 3088 01 03b5: pcals 18, 0, r#79 547 7.7 3096 01 03bd: revgb 2341 548 01 03c0: l. 178 549 7.6 3103 01 03c0: stvgb 181 550 01 03c3: b. casetab, otherwise, caseexit, x#. 551 01 03c3: l. 177 552 7.7 3111 01 03c3: revgb 181 553 16.3 3127 01 03c6: jmcht casetab 554 6.0 3133 01 03cb: x#1 : rechw 1 555 01 03ce: l. 178 556 7.6 3141 01 03ce: stvgw 175 557 4.2 3145 01 03d1: jmprw caseexit 558 7.7 3153 01 03d4: x#2 : revgw 177 559 01 03d7: l. 179 560 7.6 3160 01 03d7: stvgw 175 561 4.2 3164 01 03da: jmprw caseexit 562 7.7 3172 01 03dd: x#3 : revgw 175 563 01 03e0: l. 180 564 6.0 3178 01 03e0: rechw 1 565 7.3 3185 01 03e3: add 566 7.6 3193 01 03e4: stvgw 175 567 4.2 3197 01 03e7: jmprw caseexit 568 7.7 3205 01 03ea: x#4 : revgw 175 569 01 03ed: l. 181 570 7.7 3213 01 03ed: revgw 177 571 7.3 3220 01 03f0: add 572 7.6 3228 01 03f1: stvgw 175 573 4.2 3232 01 03f4: jmprw caseexit 574 7.9 3240 01 03f7: x#5 : reagd 2181 575 01 03fa: l. 182 576 6.0 3246 01 03fa: rechw 1 577 9.9 3256 01 03fd: reaad c#75 578 21.0 3277 01 0402: index 579 11.0 3288 01 0403: revsw 0 580 7.6 3295 01 0406: stvgw 175 581 4.2 3299 01 0409: jmprw caseexit 582 7.9 3307 01 040c: x#6 : reagd 399 583 01 040f: l. 183 584 6.0 3313 01 040f: rechw 1 585 9.9 3323 01 0412: reaad c#73 586 21.0 3344 01 0417: index 587 6.0 3350 01 0418: rechw 2 588 9.9 3360 01 041b: reaad c#72 589 21.0 3381 01 0420: index 590 11.0 3392 01 0421: revsw 0 591 7.6 3400 01 0424: stvgw 175 592 4.2 3404 01 0427: jmprw caseexit 593 7.9 3412 01 042a: x#7 : reagd 2181 594 01 042d: l. 184 595 7.7 3419 01 042d: revgw 177 596 9.9 3429 01 0430: reaad c#75 597 21.0 3450 01 0435: index 598 11.0 3461 01 0436: revsw 0 599 7.6 3469 01 0439: stvgw 175 600 4.2 3473 01 043c: jmprw caseexit 601 7.9 3481 01 043f: x#8 : reagd 399 602 01 0442: l. 185 603 7.7 3489 01 0442: revgw 177 604 9.9 3499 01 0445: reaad c#73 605 21.0 3520 01 044a: index 606 7.7 3527 01 044b: revgw 175 607 9.9 3537 01 044e: reaad c#72 608 21.0 3558 01 0453: index 609 11.0 3569 01 0454: revsw 0 610 7.6 3577 01 0457: stvgw 175 611 4.2 3581 01 045a: jmprw caseexit 612 7.7 3589 01 045d: x#9 : revgb 199 613 01 0460: l. 186 614 7.6 3596 01 0460: stvgw 175 615 4.2 3601 01 0463: jmprw caseexit 616 7.9 3608 01 0466: x#10 : reagd 201 617 01 0469: l. 187 618 7.7 3616 01 0469: revgw 177 619 9.9 3626 01 046c: reaad c#68 620 21.0 3647 01 0471: index 621 11.0 3658 01 0472: revsw 2 622 7.6 3666 01 0475: stvgw 175 623 4.2 3670 01 0478: jmprw caseexit 624 01 047b: x#11 : 625 01 047b: l. 188 626 01 047b: b. ifelse, ifexit.; 627 7.7 3678 01 047b: revgw 175 628 7.7 3685 01 047e: revgw 177 629 7.7 3693 01 0481: gt 630 6.2 3699 01 0482: jmzeq ifelse 631 7.7 3707 01 0485: revgw 177 632 6.0 3713 01 0488: rechw 17 633 20.5 3733 01 048b: mul 634 7.6 3741 01 048c: stvgw 175 635 01 048f: ifelse: 636 01 048f: e.; 637 4.2 3745 01 048f: jmprw caseexit 638 6.0 3751 01 0492: otherwise: rechw 0 639 01 0495: l. 190 640 7.6 3759 01 0495: stvgw 175 641 4.2 3763 01 0498: jmprw caseexit 642 01 049c: casetab: c. 60; 643 01 049c: $i 97 644 01 049e: $i 109 645 01 04a0: $a otherwise 646 01 04a4: $a x#1 647 01 04a8: $a x#2 648 01 04ac: $a x#3 649 01 04b0: $a x#4 650 01 04b4: $a x#5 651 01 04b8: $a x#6 652 01 04bc: $a x#7 653 01 04c0: $a x#8 654 01 04c4: $a x#9 655 01 04c8: $a x#10 656 01 04cc: $a otherwise 657 01 04d0: $a otherwise 658 01 04d4: $a x#11 659 01 04d8: e.; 660 01 04d8: caseexit: 661 01 04d8: e. 662 01 04d8: l. 193 663 01 04d8: b. whrep, whexit.; 664 7.7 3771 01 04d8: whrep: revgb 165 665 01 04db: l. 193 666 6.0 3777 01 04db: rechw 1 667 7.5 3784 01 04de: eq 668 6.2 3790 01 04df: jmzeq whexit; 669 01 04e2: l. 195 670 7.7 3798 01 04e2: revgw 175 671 6.0 3804 01 04e5: rechw 10 672 32.7 3837 01 04e8: div 673 01 04e9: l. 196 674 7.6 3844 01 04e9: stvgw 175 675 7.7 3852 01 04ec: revgw 175 676 7.7 3860 01 04ef: revgw 177 677 32.7 3892 01 04f2: div 678 01 04f3: l. 197 679 7.6 3900 01 04f3: stvgw 175 680 7.7 3908 01 04f6: revgw 175 681 6.0 3914 01 04f9: rechw 3 682 32.9 3947 01 04fc: mod 683 01 04fd: l. 198 684 7.6 3954 01 04fd: stvgw 175 685 7.7 3962 01 0500: revgw 175 686 7.7 3970 01 0503: revgw 177 687 32.9 4003 01 0506: mod 688 01 0507: l. 199 689 7.6 4010 01 0507: stvgw 175 690 7.7 4018 01 050a: revgw 175 691 6.0 4024 01 050d: rechw 20 692 7.3 4031 01 0510: add 693 01 0511: l. 200 694 7.6 4039 01 0511: stvgw 175 695 7.7 4046 01 0514: revgw 175 696 7.7 4054 01 0517: revgw 177 697 7.3 4061 01 051a: add 698 01 051b: l. 201 699 7.6 4069 01 051b: stvgw 175 700 7.7 4077 01 051e: revgw 175 701 6.0 4083 01 0521: rechw 30 702 7.3 4090 01 0524: sub 703 01 0525: l. 202 704 7.6 4098 01 0525: stvgw 175 705 7.7 4105 01 0528: revgw 175 706 7.7 4113 01 052b: revgw 177 707 7.3 4120 01 052e: sub 708 01 052f: l. 203 709 7.6 4128 01 052f: stvgw 175 710 01 0532: l. 205 711 4.2 4132 01 0532: jmprw whrep 712 01 0535: whexit: 713 01 0535: e.; 714 7.7 4140 01 0535: revgb 166 715 7.7 4148 01 0538: revgb 167 716 7.1 4155 01 053b: and 717 01 053c: l. 207 718 7.6 4162 01 053c: stvgb 165 719 7.7 4170 01 053f: revgb 166 720 7.7 4178 01 0542: revgb 167 721 7.1 4185 01 0545: or 722 01 0546: l. 209 723 7.6 4192 01 0546: stvgb 165 724 7.7 4200 01 0549: revgb 166 725 6.1 4206 01 054c: not 726 01 054d: l. 211 727 7.6 4214 01 054d: stvgb 165 728 01 0550: b. ifelse, ifexit.; 729 4.9 4219 01 0550: renhb 16; 730 7.9 4227 01 0553: reagd 2341 731 7.9 4234 01 0556: reagd 183 732 25.1 4260 01 0559: pcals 22, 0, e#6 733 7.7 4267 01 0561: revgb 2341 734 6.2 4273 01 0564: jmzeq ifelse 735 6.0 4279 01 0567: rechw 0 736 7.6 4287 01 056a: stvgb 165 737 01 056d: ifelse: 738 01 056d: e.; 739 01 056d: l. 214 740 01 056d: b. ifelse, ifexit.; 741 01 056d: l. 213 742 7.7 4295 01 056d: revgb 165 743 6.2 4301 01 0570: jmzeq ifelse 744 01 0573: l. 215 745 4.9 4306 01 0573: renhb 16; 746 7.9 4314 01 0576: reagd 183 747 7.9 4322 01 0579: reagd 109 748 7.9 4330 01 057c: reagd 117 749 25.1 4355 01 057f: pcals 26, 0, e#2 750 01 0587: l. 216 751 4.9 4360 01 0587: renhb 16; 752 7.9 4367 01 058a: reagd 191 753 7.9 4375 01 058d: reagd 109 754 7.9 4383 01 0590: reagd 117 755 25.1 4408 01 0593: pcals 26, 0, e#2 756 01 059b: l. 217 757 7.9 4416 01 059b: reagd 183 758 7.9 4424 01 059e: reagd 191 759 01 05a1: b. entry, exit, exception, c#, d#, e#, r#, l# . 760 30.2 4454 01 05a1: lpush 761 01 05a2: e. 762 7.9 4462 01 05a2: reagd 183 763 01 05a5: l. 218 764 7.9 4470 01 05a5: reagd 191 765 01 05a8: b. entry, exit, exception, c#, d#, e#, r#, l# . 766 27.8 4498 01 05a8: lpop 767 01 05a9: e. 768 01 05a9: ifelse: 769 01 05a9: l. 219 770 01 05a9: e.; 771 01 05a9: l. 221 772 7.9 4506 01 05a9: reagd 183 773 7.9 4514 01 05ac: reagd 191 774 01 05af: l. 223 775 20.6 4534 01 05af: cexch 776 01 05b0: e.; 777 01 05b0: l. 225 778 7.7 4542 01 05b0: exit: revgw maxstack 779 4.0 4546 01 05b3: cgreg 780 11.2 4557 01 05b4: uadhw -7 781 7.3 4565 01 05b7: crput 782 4.9 4569 01 05b8: renhb 16 783 25.1 4595 01 05bb: pcals 14, 0, e#34 784 9.9 4604 01 05c3: exception: reaad exit 785 10.6 4615 01 05c8: stvgd expoint 786 12.0 4627 01 05cb: mbtes 16 787 6.0 4633 01 05ce: rechw 0 788 12.0 4645 01 05d1: mbset 16 789 7.7 4653 01 05d4: revgw maxstack 790 11.2 4664 01 05d7: uadhw exitappetite 791 4.0 4668 01 05da: cgreg 792 11.2 4679 01 05db: uadhw -7 793 7.3 4686 01 05de: crput 794 4.9 4691 01 05df: renhb 16 795 7.7 4699 01 05e2: revgw exmask 796 25.1 4724 01 05e5: pcals 16, 0, e#8 797 01 05ed: 798 01 05ed: b. hardset. 799 7.7 4732 01 05ed: revgw exmask 800 9.9 4742 01 05f0: reaad hardset 801 6.0 4748 01 05f5: rechw 6 802 32.0 4780 01 05f8: setre 803 15.1 4795 01 05f9: settm 804 6.2 4801 01 05fa: jmzgt exit 805 7.7 4809 01 05fd: revgw maxstack 806 11.2 4820 01 0600: uadhw bonappetite 807 4.0 4824 01 0603: cgreg 808 11.2 4835 01 0604: uadhw -7 809 7.3 4842 01 0607: crput 810 12.0 4854 01 0608: mbset 16 811 11.2 4866 01 060b: revgd exic 812 9.9 4876 01 060e: reaad exception 813 10.6 4886 01 0613: stvgd expoint 814 5.8 4892 01 0616: jmppd 815 01 0617: 816 01 0618: hardset: c. 6 817 01 0618: 65535 818 01 061a: 65535 819 01 061c: 65535 820 01 061e: e. 821 01 061e: e. 822 01 061e: work= 2345 823 01 061e: appstat= 2236 824 01 061e: appeval= 28 825 01 061e: c#81 : c. 12 826 01 061e: 27745, 28263, 29801, 28005, 8224 827 01 0628: 8224 828 01 062a: e. 829 01 062a: 830 01 062a: c#82 : c. 12 831 01 062a: 27745, 28263, 29801, 28005, 8224 832 01 0634: 8224 833 01 0636: e. 834 01 0636: 835 01 0636: c#83 : c. 12 836 01 0636: 27745, 28263, 29801, 28005, 8224 837 01 0640: 8224 838 01 0642: e. 839 01 0642: 840 01 0642: c#75 : c. 6 841 01 0642: 1, 80, 2 842 01 0648: e. 843 01 0648: 844 01 0648: c#73 : c. 6 845 01 0648: 0, 10, 162 846 01 064e: e. 847 01 064e: 848 01 064e: c#72 : c. 6 849 01 064e: 0, 80, 2 850 01 0654: e. 851 01 0654: 852 01 0654: c#68 : c. 6 853 01 0654: 0, 10, 18 854 01 065a: e. 855 01 065a: 856 01 066a: linetab: z. languagetime 857 01 066a: e. 858 01 066a: e.; 859 01 0672: e. 860 01 0672: d. 861 01 0672: languagetime 862 01 0672: 1 863 01 0672: 864 01 0672: entry 865 01 0672: exception 866 01 0672: exit 867 01 0672: 868 01 0672: 0 869 01 0672: 110 870 01 0672: 871 01 0672: 1 872 01 0814: 29, 64 873 01 0814: 874 01 0816: 5 875 01 0816: 876 01 0822: alloc 877 01 0824: 3 878 01 0828: 13, 8 879 01 082c: 21, 8 880 01 0830: 9, 8 881 01 0832: 4 882 01 0842: e#2 883 01 0842: 884 01 084e: empty 885 01 0850: 2 886 01 0854: 33, 1 887 01 0858: 13, 8 888 01 085a: 1 889 01 085e: e#6 890 01 085e: 891 01 086a: exception 892 01 086c: 1 893 01 0870: 34, 2 894 01 0872: 1 895 01 0876: e#8 896 01 0876: 897 01 0882: ___exit___rc 898 01 0884: 0 899 01 0886: 1 900 01 088a: e#34 901 01 088a: 902 01 0896: _initpool_rc 903 01 0898: 3 904 01 089c: 9, 8 905 01 08a0: 34, 2 906 01 08a4: 34, 2 907 01 08a6: 1 \f Statistics from pass6 for languagetime ( 225 lines ) opcode use count, percentage 1 0 1 2 3 4 5 6 7 8 9 0 0 0 0 0 0 0 0 0 0 0 0 --------------------------------------------------------------------------------------> % jmphc 0 <=> 0.00% ! jmppd 1 <=> 0.21% ! jmprw 15 <=> 3.18% !-. jmcht 1 <=> 0.21% ! jmzeq 6 <=> 1.27% !. jmzne 0 <=> 0.00% ! jmzlt 0 <=> 0.00% ! jmzgt 3 <=> 0.64% !. jmzle 0 <=> 0.00% ! jmzge 0 <=> 0.00% ! csign 2 <=> 0.42% ! cwait 2 <=> 0.42% ! csens 0 <=> 0.00% ! csell 0 <=> 0.00% ! cstdr 0 <=> 0.00% ! cstop 0 <=> 0.00% ! cllst 0 <=> 0.00% ! cufst 0 <=> 0.00% ! sched 0 <=> 0.00% ! crget 0 <=> 0.00% ! crput 4 <=> 0.85% !. cskip 0 <=> 0.00% ! crram 0 <=> 0.00% ! cwram 0 <=> 0.00% ! crele 1 <=> 0.21% ! cwtac 2 <=> 0.42% ! chpro 0 <=> 0.00% ! craap 0 <=> 0.00% ! cgreg 4 <=> 0.85% !. cslev 0 <=> 0.00% ! cexch 1 <=> 0.21% ! iowc 0 <=> 0.00% ! iogo 0 <=> 0.00% ! iors 0 <=> 0.00% ! iorw 0 <=> 0.00% ! ioww 0 <=> 0.00% ! iogi 0 <=> 0.00% ! iorbb 0 <=> 0.00% ! iorbw 0 <=> 0.00% ! iowbb 0 <=> 0.00% ! iowbw 0 <=> 0.00% ! iocci 0 <=> 0.00% ! iocda 0 <=> 0.00% ! ioibx 0 <=> 0.00% ! ionci 0 <=> 0.00% ! teqad 0 <=> 0.00% ! swap 0 <=> 0.00% ! xor 0 <=> 0.00% ! neg 0 <=> 0.00% ! not 2 <=> 0.42% ! tnill 1 <=> 0.21% ! abs 0 <=> 0.00% ! compl 0 <=> 0.00% ! add 6 <=> 1.27% !. sub 4 <=> 0.85% !. mul 1 <=> 0.21% ! div 2 <=> 0.42% ! mod 2 <=> 0.42% ! sha 0 <=> 0.00% ! and 1 <=> 0.21% ! or 1 <=> 0.21% ! shc 0 <=> 0.00% ! ult 0 <=> 0.00% ! eq 2 <=> 0.42% ! ne 0 <=> 0.00% ! lt 1 <=> 0.21% ! gt 1 <=> 0.21% ! le 1 <=> 0.21% ! ge 0 <=> 0.00% ! setcr 0 <=> 0.00% ! setun 0 <=> 0.00% ! setin 0 <=> 0.00% ! setdi 0 <=> 0.00% ! seteq 0 <=> 0.00% ! setsb 0 <=> 0.00% ! setsp 0 <=> 0.00% ! settm 1 <=> 0.21% ! setad 0 <=> 0.00% ! tlock 0 <=> 0.00% ! topen 0 <=> 0.00% ! intrs 0 <=> 0.00% ! index 11 <=> 2.33% !- inprs 0 <=> 0.00% ! inpss 0 <=> 0.00% ! renpb 0 <=> 0.00% ! renhb 20 <=> 4.24% !-- rechw 61 <=> 12.92% !------. rechd 0 <=> 0.00% ! reaxd 0 <=> 0.00% ! reaad 23 <=> 4.87% !--. reard 0 <=> 0.00% ! reald 11 <=> 2.33% !- reagd 41 <=> 8.69% !----. reaid 0 <=> 0.00% ! reasd 5 <=> 1.06% !. uadhw 8 <=> 1.69% !- revpw 3 <=> 0.64% !. revpd 0 <=> 0.00% ! revab 0 <=> 0.00% ! revaw 0 <=> 0.00% ! revad 0 <=> 0.00% ! revaf 0 <=> 0.00% ! revlb 2 <=> 0.42% ! revlw 3 <=> 0.64% !. revld 14 <=> 2.97% !-. revlf 0 <=> 0.00% ! revgb 11 <=> 2.33% !- revgw 30 <=> 6.36% !--- revgd 20 <=> 4.24% !-- revgf 0 <=> 0.00% ! revib 0 <=> 0.00% ! reviw 0 <=> 0.00% ! revid 0 <=> 0.00% ! revif 0 <=> 0.00% ! revsb 3 <=> 0.64% !. revsw 11 <=> 2.33% !- revsd 0 <=> 0.00% ! revsf 0 <=> 0.00% ! revsm 1 <=> 0.21% ! moveg 2 <=> 0.42% ! moveb 0 <=> 0.00% ! stnhb 1 <=> 0.21% ! stvab 0 <=> 0.00% ! stvaw 0 <=> 0.00% ! stvad 0 <=> 0.00% ! stvaf 0 <=> 0.00% ! stvlb 0 <=> 0.00% ! stvlw 12 <=> 2.54% !-. stvld 13 <=> 2.75% !-. stvlf 0 <=> 0.00% ! stvgb 5 <=> 1.06% !. stvgw 22 <=> 4.66% !--. stvgd 11 <=> 2.33% !- stvgf 0 <=> 0.00% ! stvib 0 <=> 0.00% ! stviw 0 <=> 0.00% ! stvid 0 <=> 0.00% ! stvif 0 <=> 0.00% ! stvsb 6 <=> 1.27% !. stvsw 8 <=> 1.69% !- stvsd 0 <=> 0.00% ! stvsf 7 <=> 1.48% !. stcea 0 <=> 0.00% ! setre 1 <=> 0.21% ! setst 0 <=> 0.00% ! pcals 14 <=> 2.97% !-. pcald 0 <=> 0.00% ! pexit 5 <=> 1.06% !. lpush 1 <=> 0.21% ! lpop 1 <=> 0.21% ! lrese 7 <=> 1.48% !. llock 7 <=> 1.48% !. mnoop 0 <=> 0.00% ! mcist 0 <=> 0.00% ! mbtes 1 <=> 0.21% ! mbset 2 <=> 0.42% ! mxept 0 <=> 0.00% ! madlu 0 <=> 0.00% ! mwi 0 <=> 0.00% ! mwt 0 <=> 0.00% ! mwis 0 <=> 0.00% ! mwit 0 <=> 0.00% ! mwst 0 <=> 0.00% ! mwist 0 <=> 0.00% ! mwtac 0 <=> 0.00% ! mtime 0 <=> 0.00% ! mcis 0 <=> 0.00% ! mcit 0 <=> 0.00% ! ----------------------- total = 472 , net code size = 1392 bytes code: 0 . 1650 = 1650 bytes end of PASCAL80 compilation end blocksread = 59 *o c «eof»