steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Typo

db4
Slava Pestov 2008-10-06 00:20:24 -05:00
parent 33d775890c
commit 4ca06ae50f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/cpu/x86/architecture/architecture.factor
View File

@ -69,7 +69,7 @@ M: x86 %prologue ( n -- )
3 cells - decr-stack-reg ; 3 cells - decr-stack-reg ;
: incr-stack-reg ( n -- ) : incr-stack-reg ( n -- )
dup 0 = [ ] [ stack-reg swap ADD ] if ; dup 0 = [ drop ] [ stack-reg swap ADD ] if ;
M: x86 %epilogue ( n -- ) cell - incr-stack-reg ; M: x86 %epilogue ( n -- ) cell - incr-stack-reg ;