From 23e78b8380339f05060094d0f5a2e87351ae1dcf Mon Sep 17 00:00:00 2001 From: Daniel Ehrenberg Date: Sun, 25 Apr 2010 02:18:45 -0500 Subject: [PATCH] Removing hack with >fixnum, now subsumed by a more general optimization --- .../compiler/tree/propagation/transforms/transforms.factor | 6 ------ 1 file changed, 6 deletions(-) diff --git a/basis/compiler/tree/propagation/transforms/transforms.factor b/basis/compiler/tree/propagation/transforms/transforms.factor index a3afc8f555..da081800df 100644 --- a/basis/compiler/tree/propagation/transforms/transforms.factor +++ b/basis/compiler/tree/propagation/transforms/transforms.factor @@ -312,12 +312,6 @@ M\ set intersect [ intersect-quot ] 1 define-partial-eval [ \ push def>> ] [ f ] if ] "custom-inlining" set-word-prop -! Speeds up fasta benchmark -\ >fixnum [ - in-d>> first value-info class>> fixnum \ f class-or class<= - [ [ dup [ \ >fixnum no-method ] unless ] ] [ f ] if -] "custom-inlining" set-word-prop - ! We want to constant-fold calls to heap-size, and recompile those ! calls when a C type is redefined \ heap-size [