projects
/
YACASL2.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
READMEのCASL II仕様書へのリンクを修正
[YACASL2.git]
/
as
/
cmd
/
RPUSH
/
rpush.casl
1
;;; PUSH / POP 値の復元
2
MAIN START
3
LD GR1,A
4
LD GR1,0,GR7
5
LD GR2,1,GR7
6
LD GR3,2,GR7
7
LD GR4,3,GR7
8
LD GR5,4,GR7
9
LD GR6,5,GR7
10
LD GR7,6,GR7
11
RPUSH
12
POP GR7
13
POP GR6
14
POP GR5
15
POP GR4
16
POP GR3
17
POP GR2
18
POP GR1
19
RET
20
A DC 1,2,3,4,5,6,7
21
END