factor: more top level forms.

[factor.git] / basis / math / floats / env / env.factor

diff --git a/basis/math/floats/env/env.factor b/basis/math/floats/env/env.factor
index d019d1ee0e379c640303cc581589e6d4dedf21b2..175a6c813e26d789c21ef9105c188763b111e5d5 100644 (file)
--- a/basis/math/floats/env/env.factor
+++ b/basis/math/floats/env/env.factor
@@ -153,6 +153,9 @@ PRIVATE>
 : without-fp-traps ( quot -- )
     { } swap with-fp-traps ; inline
 
+! USE-X86: math.floats.env.x86
+! USE-PPC: math.floats.env.ppc
+
 {
     { [ cpu x86? ] [ "math.floats.env.x86" require ] }
     { [ cpu ppc? ] [ "math.floats.env.ppc" require ] }