アセンブラファイルの整理
[YACASL2.git] / as / casl2lib / test / divl / divl0 / call_divl.casl
diff --git a/as/casl2lib/test/divl/divl0/call_divl.casl b/as/casl2lib/test/divl/divl0/call_divl.casl
deleted file mode 100644 (file)
index eb5fdea..0000000
+++ /dev/null
@@ -1,18 +0,0 @@
-;; CASL2LIB > DIVLを呼び出し、65535 / 256 の商と剰余を表示
-MAIN    START
-BEGIN   LD      GR1,A
-        LD      GR2,B
-        CALL    DIVL
-        JOV     ERR
-        LD      GR1,GR0
-        CALL    OUTA
-        LD      GR1,GR3
-        CALL    OUTA
-        JUMP    FIN        
-ERR     OUT     EMSG,ELEN
-FIN     RET
-A       DC      65535
-B       DC      256
-EMSG    DC      'error'
-ELEN   DC      5
-        END