hyung-hwan/moo
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

removed more unused code

Browse Source
This commit is contained in:
hyunghwan.chung
2016-06-24 15:01:51 +00:00
parent 6a32e4278c
commit 102fa8abf4
4 changed files with 56 additions and 207 deletions
Download Patch File Download Diff File Expand all files Collapse all files

30
stix/kernel/Context.st
View File

@ -370,18 +370,7 @@
## --------------------------------------------------
## --------------------------------------------------
## If VM is built without STIX_USE_PROCSTK
## --------------------------------------------------
## | pc sp |
## sp := thisContext sp.
## pc := thisContext pcplus1.
## self value ifFalse: [ ^nil "^self" ].
## aBlock value.
## thisContext pc: pc sp: sp.
## --------------------------------------------------
## --------------------------------------------------
## If VM is built with STIX_USE_PROCSTK
## Non-recursive implementation
## --------------------------------------------------
| pc sp |
@ -404,7 +393,7 @@
## self whileTrue.
## --------------------------------------------------
## If VM is built with STIX_USE_PROCSTK
## Non-recursive implementation
## --------------------------------------------------
| pc |
pc := thisContext pcplus1.
@ -424,18 +413,7 @@
## --------------------------------------------------
## --------------------------------------------------
## If VM is built without STIX_USE_PROCSTK
## --------------------------------------------------
## | pc sp |
## sp := thisContext sp.
## pc := thisContext pcplus1.
## self value ifTrue: [ ^nil "^self" ].
## aBlock value.
## thisContext pc: pc sp: sp.
## --------------------------------------------------
## --------------------------------------------------
## If VM is built with STIX_USE_PROCSTK
## Non-recursive implementation
## --------------------------------------------------
## The assignment to 'pc' uses the POP_INTO_TEMPVAR_1.
## It pops a value off the stack top, stores it to the second
@ -463,7 +441,7 @@
## self whileFalse.
## --------------------------------------------------
## If VM is built with STIX_USE_PROCSTK
## Non-recursive implementation
## --------------------------------------------------
| pc |
pc := thisContext pcplus1.