projects
/
YACASL2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
CASLファイルの整理
[YACASL2.git]
/
as
/
casl2lib
/
test
/
divl
/
divl1
/
divl1.casl
diff --git a/as/casl2lib/test/divl/divl1/divl1.casl
b/as/casl2lib/test/divl/divl1/divl1.casl
new file mode 100644
(file)
index 0000000..
bd84ab3
--- /dev/null
+++ b/
as/casl2lib/test/divl/divl1/divl1.casl
@@ -0,0
+1,18
@@
+;;; casl2 divl1.casl ../casl2lib/outl.casl
+MAIN START
+BEGIN LD GR1,X
+ CALL OUTL
+ LD GR2,Y
+ PUSH 0,GR1
+ LD GR1,GR2
+ CALL OUTL
+ POP GR1
+ CALL DIVL
+ LD GR1,GR0
+ CALL OUTL
+ LD GR1,GR3
+ CALL OUTL
+ RET
+X DC 123
+Y DC 10
+ END