bootstrap failure fix
parent
6ac4c9900f
commit
e48596b41f
|
@ -110,6 +110,8 @@ SYMBOL: alien-parameters
|
|||
[ set-alien-parameters ] keep
|
||||
set-alien-returns ;
|
||||
|
||||
DEFER: alien-invoke
|
||||
|
||||
: infer-alien-invoke ( -- )
|
||||
\ alien-invoke "infer-effect" word-prop car ensure-d
|
||||
pop-literal
|
||||
|
@ -123,6 +125,8 @@ SYMBOL: alien-parameters
|
|||
cons #alien-global dataflow,
|
||||
set-alien-returns ;
|
||||
|
||||
DEFER: alien-global
|
||||
|
||||
: infer-alien-global ( -- )
|
||||
\ alien-global "infer-effect" word-prop car ensure-d
|
||||
pop-literal
|
||||
|
|
Loading…
Reference in New Issue