CASLファイルとテストの整理

[YACASL2.git] / as / casl2lib / diva.casl

diff --git a/as/casl2lib/diva.casl b/as/casl2lib/diva.casl
new file mode 100644 (file)
index 0000000..eb87331
--- /dev/null
+++ b/as/casl2lib/diva.casl
@@ -0,0 +1,7 @@
+;;; -32767〜32767の範囲にある整数の割算（筆算方式）を行う
+;;; 入力 GR1:被除数 GR2:除数
+;;; 出力 GR0:商 GR3:剰余
+;;; GR2が0の場合は、GR0、GR3とも0になり、オーバーフロー
+DIVL    START
+        RET
+        END