コマンドのテスト名を整理

[YACASL2.git] / as / cmd / CALL / call__both.casl

diff --git a/as/cmd/CALL/call__both.casl b/as/cmd/CALL/call__both.casl
new file mode 100644 (file)
index 0000000..324b10c
--- /dev/null
+++ b/as/cmd/CALL/call__both.casl
@@ -0,0 +1,14 @@
+;;; CALL
+;;; 同じプログラムの中とほかのプログラムの入口名の両方で定義されたラベルを指定
+;;; YACASL2では、ほかのプログラムの入口名を優先
+MAIN    START   BEGIN
+BEGIN   LAD     GR1,29
+        CALL    COPY
+        RET
+COPY    LD      GR2,GR1
+        RET
+        END
+COPY    START
+        LD      GR2,GR1
+        RET
+        END