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

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

diff --git a/as/cmd/SRA/sra_o.casl b/as/cmd/SRA/sra_o.casl
index ab7aac9..a8703eb 100644 (file)
--- a/as/cmd/SRA/sra_o.casl
+++ b/as/cmd/SRA/sra_o.casl
@@ -1,5 +1,6 @@
+;;; SRA r,adr 正数のオーバーフロー
 MAIN    START
-        LAD     GR1,#4000
-        SLA     GR1,1
+        LAD     GR1,#6000
+        SRA     GR1,14
         RET
         END