home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Distributions / ucb / spencer_2bsd.tar.gz / 2bsd.tar / src / pascal / tests / x < prev   
Encoding:
Text File  |  1980-02-17  |  1.4 KB  |  109 lines
  1.  1026    TRA    0 
  2.  1030    TRA    4 
  3.     patch 1030 8
  4.  1034    BEG
  5.  1036    CONG:8    sneaky
  6.  1046        5 
  7.  1048    LINO    6 
  8.  1052    LV:2    -8 
  9.  1056    RV4:2    -8 
  10.  1060    RV4:4    16 
  11.  1064    SUB4
  12.  1066    AS4
  13.  1068    LINO    7 
  14.  1072    LV:4    20 
  15.  1076    RV4:4    16 
  16.  1080    SQR4
  17.  1082    AS4
  18.  1084    END
  19.     patch 1034 0
  20.     patch 1026 60
  21.  1086    BEG
  22.  1088    CONG:8    sideffect
  23.  1098        9 
  24.  1100    LINO    10 
  25.  1104    LV:2    -8 
  26.  1108    CON2:10
  27.  1110    AS24
  28.  1112    LINO    11 
  29.  1116    LV:2    -4 
  30.  1120    PUSH:-4
  31.  1122    RV4:2    -8 
  32.  1126    CALL:2    4 
  33.  1130    POP:4
  34.  1132    AS4
  35.  1134    LINO    12 
  36.  1138    UNITOUT
  37.  1140    RV4:2    -4 
  38.  1144    WRIT4
  39.  1146    RV4:2    -8 
  40.  1150    WRIT4
  41.  1152    WRITLN
  42.  1154    LINO    13 
  43.  1158    LV:2    -8 
  44.  1162    CON2:10
  45.  1164    AS24
  46.  1166    LINO    14 
  47.  1170    LV:2    -4 
  48.  1174    PUSH:-4
  49.  1176    CON2:10
  50.  1178    STOI
  51.  1180    CALL:2    4 
  52.  1184    POP:4
  53.  1186    PUSH:-4
  54.  1188    RV4:2    -8 
  55.  1192    CALL:2    4 
  56.  1196    POP:4
  57.  1198    MUL4
  58.  1200    AS4
  59.  1202    LINO    15 
  60.  1206    UNITOUT
  61.  1208    RV4:2    -4 
  62.  1212    WRIT4
  63.  1214    RV4:2    -8 
  64.  1218    WRIT4
  65.  1220    WRITLN
  66.  1222    LINO    16 
  67.  1226    LV:2    -8 
  68.  1230    CON2:10
  69.  1232    AS24
  70.  1234    LINO    17 
  71.  1238    LV:2    -4 
  72.  1242    PUSH:-4
  73.  1244    RV4:2    -8 
  74.  1248    CALL:2    4 
  75.  1252    POP:4
  76.  1254    PUSH:-4
  77.  1256    CON2:10
  78.  1258    STOI
  79.  1260    CALL:2    4 
  80.  1264    POP:4
  81.  1266    MUL4
  82.  1268    AS4
  83.  1270    LINO    18 
  84.  1274    UNITOUT
  85.  1276    RV4:2    -4 
  86.  1280    WRIT4
  87.  1282    RV4:2    -8 
  88.  1286    WRIT4
  89.  1288    WRITLN
  90.  1290    END
  91.     patch 1086 -8
  92. 1252    POP:4
  93.  1254    PUSH:-4
  94.  1256    CON2:10
  95.  1258    STOI
  96.  1260    CALL:2    4 
  97.  1264    POP:4
  98.  1266    MUL4
  99.  1268    AS4
  100.  1270    LINO    18 
  101.  1274    UNITOUT
  102.  1276    RV4:2    -4 
  103.  1280    WRIT4
  104.  1282    RV4:2    -8 
  105.  1286    WRIT4
  106.  1288    WRITLN
  107.  1290    END
  108.     patch 1086 -8
  109.