コマンドテストの刷新
[YACASL2.git] / as / cmd / AND / and1.casl
index abec8ed..5c348f7 100644 (file)
@@ -1,7 +1,8 @@
-;;; AND r,adr
+;;; AND r,adr,x
 MAIN    START
         LD      GR1,A
-        AND     GR1,1,A
+        LAD     GR2,1
+        AND     GR1,A,GR2
         RET
 A       DC      #3000
         DC      #4FFF