コマンド動作検証用のCASL2プログラム整理を開始

[YACASL2.git] / as / macro / out / hello1.casl

diff --git a/as/CMD/svc2_out.casl b/as/macro/out/hello1.casl
similarity index 57%
rename from as/CMD/svc2_out.casl
rename to as/macro/out/hello1.casl
index 5902866..a697251 100644 (file)
--- a/as/CMD/svc2_out.casl
+++ b/as/macro/out/hello1.casl
@@ -1,16 +1,15 @@
-;;; 「OUT」と同等のプログラム
-OTEST   START
+MAIN    START
         PUSH    0,GR1
         PUSH    0,GR2
         LAD     GR1,OBUF
-        LD      GR2,LEN
+        LAD     GR2,LEN
         SVC     2
         LAD     GR1,=#A
-        LAD     GR2,1
+        LAD     GR2,=1
         SVC     2
         POP     GR2
         POP     GR1
         RET
-OBUF    DC      'abcd'
-LEN     DC      4
+OBUF    DC      'Hello, World!'
+LEN     DC      13
         END