X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=as%2Fcasl2lib%2Ftest%2Frev%2Frev_call.casl;fp=as%2Fcasl2lib%2Ftest%2Frev%2Frev_call.casl;h=58252c295dcbdfe65edd467376c1b3841842506e;hb=05965ee87822b44616998d347d8f91fbf550eb2e;hp=0000000000000000000000000000000000000000;hpb=e53b9aa2cd0e67ff64c52fa1b83e16c048283dbd;p=YACASL2.git

diff --git a/as/casl2lib/test/rev/rev_call.casl b/as/casl2lib/test/rev/rev_call.casl
new file mode 100644
index 0000000..58252c2
--- /dev/null
+++ b/as/casl2lib/test/rev/rev_call.casl
@@ -0,0 +1,10 @@
+MAIN    START
+        OUT     STR,LEN
+        LAD     GR1,STR
+        LD      GR2,LEN
+        CALL    REV
+        OUT     STR,LEN
+        RET
+STR     DC      '12345'
+LEN     DC      5
+        END