steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Remove redundant call to normalize-path

db4
Slava Pestov 2008-12-15 19:46:43 -06:00
parent daf2857d7b
commit ad2a44ddc7
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
extra/graphics/bitmap/bitmap.factor
View File

@ -1,7 +1,7 @@
! Copyright (C) 2007 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
USING: alien arrays byte-arrays combinators summary io.backend
USING: alien arrays byte-arrays combinators summary
graphics.viewer io io.binary io.files kernel libc math
math.functions math.bitwise namespaces opengl opengl.gl
prettyprint sequences strings ui ui.gadgets.panes fry
@ -91,7 +91,7 @@ M: bitmap-magic summary
dup color-index-length read >>color-index drop ;
: load-bitmap ( path -- bitmap )
normalize-path binary [
binary [
bitmap new
dup parse-file-header
dup parse-bitmap-header