Forgot about float= intrinsic

db4
Slava Pestov 2008-11-03 07:15:09 -06:00
parent 75e9708488
commit 82e9eedd39
1 changed files with 2 additions and 1 deletions

View File

@ -76,6 +76,7 @@ IN: compiler.cfg.intrinsics
math.private:float<=
math.private:float>
math.private:float>=
math.private:float=
alien.accessors:alien-float
alien.accessors:set-alien-float
alien.accessors:alien-double
@ -108,7 +109,7 @@ IN: compiler.cfg.intrinsics
{ \ math.private:float<= [ drop cc<= emit-float-comparison ] }
{ \ math.private:float>= [ drop cc>= emit-float-comparison ] }
{ \ math.private:float> [ drop cc> emit-float-comparison ] }
{ \ math.private:float= [ drop cc> emit-float-comparison ] }
{ \ math.private:float= [ drop cc= emit-float-comparison ] }
{ \ math.private:float>fixnum [ drop emit-float>fixnum ] }
{ \ math.private:fixnum>float [ drop emit-fixnum>float ] }
{ \ slots.private:slot [ emit-slot ] }