remove debug, fix bootstrap

2009-08-26 14:45:02 -05:00 · 2009-08-26 14:45:02 -05:00 · bdb95d7fc3
parent 725a07b62d
commit bdb95d7fc3
2 changed files with 1 additions and 2 deletions
--- a/basis/images/loader/loader.factor
+++ b/basis/images/loader/loader.factor
@ -30,7 +30,7 @@ GENERIC: stream>image ( stream class -- image )
    swap types get set-at ;

 : load-image ( path -- image )
-    [ open-image-file ] [ image-class new ] bi load-image* ;
+    [ open-image-file ] [ image-class ] bi load-image* ;

 M: byte-array load-image*
    [ binary <byte-reader> ] dip stream>image ;
--- a/basis/images/tiff/tiff.factor
+++ b/basis/images/tiff/tiff.factor
@ -449,7 +449,6 @@ ERROR: unhandled-compression compression ;
    dup strips>> concat >>bitmap ;

 : (strips-predictor) ( ifd -- ifd )
-B
    [ ]
    [ image-width find-tag ]
    [ samples-per-pixel find-tag ] tri