math.floats.env: don't need << >>.
parent
3649d21541
commit
9b77a785e9
|
@ -154,8 +154,8 @@ PRIVATE>
|
||||||
: without-fp-traps ( quot -- )
|
: without-fp-traps ( quot -- )
|
||||||
{ } swap with-fp-traps ; inline
|
{ } swap with-fp-traps ; inline
|
||||||
|
|
||||||
<< {
|
{
|
||||||
{ [ cpu x86? ] [ "math.floats.env.x86" require ] }
|
{ [ cpu x86? ] [ "math.floats.env.x86" require ] }
|
||||||
{ [ cpu ppc? ] [ "math.floats.env.ppc" require ] }
|
{ [ cpu ppc? ] [ "math.floats.env.ppc" require ] }
|
||||||
[ "CPU architecture unsupported by math.floats.env" throw ]
|
[ "CPU architecture unsupported by math.floats.env" throw ]
|
||||||
} cond >>
|
} cond
|
||||||
|
|
Loading…
Reference in New Issue