'not', 'and' are no longer inline to enable compiler optimizations

diff --git a/core/kernel/kernel.factor b/core/kernel/kernel.factor
index 2540ee39cdcf2f89243c1043a40a2fa2a42a356d..68feb7a94aaa25dc6295b3eced2cd52f01b59773 100755 (executable)
--- a/core/kernel/kernel.factor
+++ b/core/kernel/kernel.factor
@@ -165,11 +165,15 @@ GENERIC: boa ( ... class -- tuple )
     compose compose ; inline
 
 ! Booleans
-: not ( obj -- ? ) f eq? ; inline
+: not ( obj -- ? )
+    #! Not inline because its special-cased by compiler.
+    f eq? ;
 
-: >boolean ( obj -- ? ) t f ? ; inline
+: and ( obj1 obj2 -- ? )
+    #! Not inline because its special-cased by compiler.
+    over ? ;
 
-: and ( obj1 obj2 -- ? ) over ? ; inline
+: >boolean ( obj -- ? ) t f ? ; inline
 
 : or ( obj1 obj2 -- ? ) dupd ? ; inline