projects
/
h316.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
ldc2: Cosmetic fixes and support for compiler orverride
[h316.git]
/
lib
/
hachti
/
src
/
stack.asm
diff --git
a/lib/hachti/src/stack.asm
b/lib/hachti/src/stack.asm
index a1d20d424d220164cf88d878f23a496146dd3f96..e169bc666625bc74d32754b362966ba13c39a873 100644
(file)
--- a/
lib/hachti/src/stack.asm
+++ b/
lib/hachti/src/stack.asm
@@
-45,7
+45,8
@@
* CALL S$INIT
* DAC SDATA STACK DATA
* DAC SSIZ DATA SIZE (NOT STACK DEPTH!!!)
* CALL S$INIT
* DAC SDATA STACK DATA
* DAC SSIZ DATA SIZE (NOT STACK DEPTH!!!)
-*
+* DAC 0
+*
* PUSHING AND POPPING THE A-REGISTER FROM AND TO THE STACK:
*
* CALL S$PUSH VALUE IN A REGISTER IS PUSHED.
* PUSHING AND POPPING THE A-REGISTER FROM AND TO THE STACK:
*
* CALL S$PUSH VALUE IN A REGISTER IS PUSHED.
@@
-107,7
+108,7
@@
**** SYMBOL DECLARATIONS
*
SUBR STACK,SBUF JUST A LABEL FOR THE OBJECT TAPE
**** SYMBOL DECLARATIONS
*
SUBR STACK,SBUF JUST A LABEL FOR THE OBJECT TAPE
- SUBR S$INIT,INIT INITI
TALIS
ATION
+ SUBR S$INIT,INIT INITI
ALIZ
ATION
SUBR S$PUSH,PUSH SINGLE WORD PUSH
SUBR S$POP,POP SINGLE WORD POP
SUBR S$PUSM,PUSM MEMORY RANGE PUSH
SUBR S$PUSH,PUSH SINGLE WORD PUSH
SUBR S$POP,POP SINGLE WORD POP
SUBR S$PUSM,PUSM MEMORY RANGE PUSH