diff --git a/TODO.FACTOR.txt b/TODO.FACTOR.txt index 43c6ab1449..c21408ef5c 100644 --- a/TODO.FACTOR.txt +++ b/TODO.FACTOR.txt @@ -1,7 +1,7 @@ + portability: - port ffi to win64 -- update x86 for %unbox-struct and callbacks +- update x86 for callbacks - update amd64 for %unbox-struct and callbacks - get factor running on mac intel diff --git a/library/compiler/amd64/alien.factor b/library/compiler/amd64/alien.factor index c76c980a2e..9c40973b71 100644 --- a/library/compiler/amd64/alien.factor +++ b/library/compiler/amd64/alien.factor @@ -34,7 +34,7 @@ M: %unbox generate-node ( vop -- ) ! Store the return value on the C stack 0 input 1 input store-insn ; -M: %parameter generate-node ( vop -- ) +M: %stack>freg generate-node ( vop -- ) ! Move a value from the C stack into the fastcall register drop 0 input 1 input 2 input load-insn ;