Fix x86 typo

slava 2006-05-24 22:42:21 +00:00
parent 703b6f58dd
commit 5733a45cd4
1 changed files with 1 additions and 1 deletions

View File

@ -260,7 +260,7 @@ IN: compiler
! User environment ! User environment
: %userenv ( -- ) : %userenv ( -- )
"x" operand "userenv" f [ MOV ] 2keep "x" operand "userenv" f [ dlsym MOV ] 2keep
rel-absolute-cell rel-dlsym rel-absolute-cell rel-dlsym
"n" operand fixnum>slot@ "n" operand fixnum>slot@
"n" operand "x" operand ADD ; "n" operand "x" operand ADD ;