SRLコマンドテストパターンを追加

diff --git a/as/cmd/SRL/srl__o2.casl b/as/cmd/SRL/srl__o2.casl
new file mode 100644 (file)
index 0000000..ed68d97
--- /dev/null
+++ b/as/cmd/SRL/srl__o2.casl
@@ -0,0 +1,6 @@
+;;; SRL r,adr オーバーフロー
+MAIN    START
+        LAD     GR1,1
+        SRL     GR1,1
+        RET
+        END