テストの整理

[YACASL2.git] / as / err / err_203.casl

diff --git a/as/err/err_203.casl b/as/err/err_203.casl
index 8181baf..10d97d2 100644 (file)
--- a/as/err/err_203.casl
+++ b/as/err/err_203.casl
@@ -1,7 +1,8 @@
 ;;; casl2 -M32 err_203.casl
 MAIN    START
-        OUT     BUF,LEN
+        RPUSH
+        LD      GR0,A
+        RPOP
         RET
-BUF     DC      ' !'
-LEN     DC      60
+A       DC      7
         END