Remove unused locals.

[factor.git] / basis / images / pbm / pbm.factor

diff --git a/basis/images/pbm/pbm.factor b/basis/images/pbm/pbm.factor
index 7db7ccedc6e0d53fcf1b7f076e88163377ffd7f2..9b8c7c11f94c7a315b591febe1ea4b098cfa929b 100644 (file)
--- a/basis/images/pbm/pbm.factor
+++ b/basis/images/pbm/pbm.factor
@@ -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 ] }