SUBLで、OVフラグが正常に動作しないバグの修正を開始
[YACASL2.git] / as / fe_tests / 2011_10 / Q12 / call_div.o.casl
diff --git a/as/fe_tests/2011_10/Q12/call_div.o.casl b/as/fe_tests/2011_10/Q12/call_div.o.casl
new file mode 100644 (file)
index 0000000..400f320
--- /dev/null
@@ -0,0 +1,37 @@
+MAIN   START
+       LAD     GR1,#0000                               ; #0000: #1210 #0000
+       LAD     GR2,#000F                               ; #0002: #1220 #000F
+       LAD     GR3,#0009                               ; #0004: #1230 #0009
+       CALL    #000B                           ; #0006: #8000 #000B
+       RET                             ; #0008: #8100
+       NOP                             ; #0009: #0000
+       DC      3                               ; #000A: #0003 ::      3 = #0003 = 0000000000000011
+       PUSH    #0000,GR6                               ; #000B: #7006 #0000
+       PUSH    #0000,GR7                               ; #000D: #7007 #0000
+       LD      GR6,GR1                         ; #000F: #1461
+       LD      GR7,GR2                         ; #0010: #1472
+       LD      GR1,#0032                               ; #0011: #1010 #0032
+       LD      GR2,#0033                               ; #0013: #1020 #0033
+       LD      GR4,GR6                         ; #0015: #1446
+       LD      GR5,GR7                         ; #0016: #1457
+       ADDL    GR2,#0034                               ; #0017: #2220 #0034
+       JOV     #001D                           ; #0019: #6600 #001D
+       JUMP    #001F                           ; #001B: #6400 #001F
+       ADDL    GR1,#0035                               ; #001D: #2210 #0035
+       SUBL    GR6,#0000,GR3                           ; #001F: #2363 #0000
+       JOV     #002F                           ; #0021: #6600 #002F
+       SUBL    GR7,#0001,GR3                           ; #0023: #2373 #0001
+       JOV     #0029                           ; #0025: #6600 #0029
+       JUMP    #0015                           ; #0027: #6400 #0015
+       SUBL    GR6,#0036                               ; #0029: #2360 #0036
+       JOV     #002F                           ; #002B: #6600 #002F
+       JUMP    #0015                           ; #002D: #6400 #0015
+       POP     GR7                             ; #002F: #7170
+       POP     GR6                             ; #0030: #7160
+       RET                             ; #0031: #8100
+       DC      65535                           ; #0032: #FFFF ::  65535 = #FFFF = 1111111111111111
+       DC      65535                           ; #0033: #FFFF ::  65535 = #FFFF = 1111111111111111
+       DC      1                               ; #0034: #0001 ::      1 = #0001 = 0000000000000001
+       DC      1                               ; #0035: #0001 ::      1 = #0001 = 0000000000000001
+       DC      1                               ; #0036: #0001 ::      1 = #0001 = 0000000000000001
+       END