]> gitweb.factorcode.org Git - factor.git/commitdiff
stack-checker: old bug, float>fixnum was not foldable!!
authorDoug Coleman <doug.coleman@gmail.com>
Thu, 13 Aug 2015 21:47:01 +0000 (14:47 -0700)
committerDoug Coleman <doug.coleman@gmail.com>
Thu, 13 Aug 2015 21:47:01 +0000 (14:47 -0700)
basis/stack-checker/known-words/known-words.factor

index aa7c8d07acfa21250643e8534a716f9103cd66ff..b324bd2e66de1ad2cd78aac2fc5b63f59e990b40 100644 (file)
@@ -412,7 +412,7 @@ M: object infer-call* \ call bad-macro-input ;
 \ float>= { float float } { object } define-primitive \ float>= make-foldable
 \ float>bignum { float } { bignum } define-primitive \ float>bignum make-foldable
 \ float>bits { real } { integer } define-primitive \ float>bits make-foldable
-\ float>fixnum { float } { fixnum } define-primitive \ bignum>fixnum make-foldable
+\ float>fixnum { float } { fixnum } define-primitive \ float>fixnum make-foldable
 \ fpu-state { } { } define-primitive
 \ fputc { object alien } { } define-primitive
 \ fread-unsafe { integer c-ptr alien } { integer } define-primitive