Fix more typos

slava 2006-04-29 21:32:15 +00:00
parent d5d47b6ae8
commit 42cd1e89f8
2 changed files with 3 additions and 3 deletions

View File

@ -27,8 +27,8 @@ M: float-regs pop-return-reg
M: float-regs load-return-reg M: float-regs load-return-reg
reg-size >r ESP swap [+] r> FLD ; reg-size >r ESP swap [+] r> FLD ;
M: %unbox generate-node : %unbox ( n reg-class func -- )
drop 2 input f compile-c-call 1 input push-return-reg ; f %alien-invoke push-return-reg drop ;
: struct-ptr/size ( size func -- ) : struct-ptr/size ( size func -- )
! Load struct size ! Load struct size

View File

@ -1,8 +1,8 @@
! Copyright (C) 2005 Slava Pestov. ! Copyright (C) 2005 Slava Pestov.
! See http://factor.sf.net/license.txt for BSD license. ! See http://factor.sf.net/license.txt for BSD license.
IN: assembler
USING: arrays compiler errors generic kernel kernel-internals USING: arrays compiler errors generic kernel kernel-internals
lists math namespaces parser sequences words ; lists math namespaces parser sequences words ;
IN: assembler
! A postfix assembler for x86 and AMD64. ! A postfix assembler for x86 and AMD64.