Remove unused locals.

release
Erik Charlebois 2010-04-12 01:18:58 -07:00
parent 0448c867e2
commit ef365bfa53
1 changed files with 0 additions and 2 deletions

View File

@ -58,8 +58,6 @@ SINGLETON: pbm-image
read-token :> type
read-number :> width
read-number :> height
width height * :> npixels
width 8 mod :> leftover
type {
{ "P1" [ [ [ read-ascii-bits ] ignore-errors ] B{ } make ] }