シフト演算に関するCASLコードを追加

[YACASL2.git] / as / cmd / SRA / sra.casl

diff --git a/as/cmd/SRA/sra_1.casl b/as/cmd/SRA/sra.casl
similarity index 51%
rename from as/cmd/SRA/sra_1.casl
rename to as/cmd/SRA/sra.casl
index ce1fee4..1354c87 100644 (file)
--- a/as/cmd/SRA/sra_1.casl
+++ b/as/cmd/SRA/sra.casl
@@ -1,6 +1,6 @@
 ;;; SRA r,adr
 MAIN    START
-        LAD     GR1,12
-        SRA     GR1,2
+        LAD     GR1,#6000
+        SRA     GR1,13
         RET
         END