アセンブラファイルとテストの整理
[YACASL2.git] / as / itoa1.casl
diff --git a/as/itoa1.casl b/as/itoa1.casl
deleted file mode 100644 (file)
index f23df07..0000000
+++ /dev/null
@@ -1,34 +0,0 @@
-MAIN   START
-       LD      GR1,I
-       LAD     GR2,10
-    LAD        GR5,0
-LOOP   CPA     GR1,GR2
-       JMI     NEXT
-       CALL    DIV
-    ADDA       GR4,Z
-    ST GR4,STR,GR5
-    LAD        GR5,1,GR5
-    LD GR1,GR3
-    JUMP       LOOP
-NEXT   ADDA    GR1,Z
-       ST      GR1,STR,GR5
-       LAD     GR5,1,GR5
-       ST      GR5,LEN
-PRT OUT        STR,LEN
-       RET
-I      DC      12345
-Z      DC      '0'
-STR    DS      5
-LEN    DS      1
-    END
-;GR1をGR2で割ったときの商をGR3、剰余をGR4に格納
-DIV    LD      GR4,GR1
-       LAD     GR3,0
-DLOOP  CPA     GR4,GR2
-       JMI     DFIN
-    SUBL GR4,GR2
-    LAD        GR3,1,GR3
-    JUMP       DLOOP
-DFIN RET
-       RET
-       END