From e48596b41fb5244f6d3f9102b4d9da4d557b2d94 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Wed, 30 Mar 2005 01:03:55 +0000 Subject: [PATCH] bootstrap failure fix --- library/compiler/alien.factor | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/library/compiler/alien.factor b/library/compiler/alien.factor index 2bccecaed7..20c7851b01 100644 --- a/library/compiler/alien.factor +++ b/library/compiler/alien.factor @@ -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