]> gitweb.factorcode.org Git - factor.git/commitdiff
images.pbm: use not.
authorJohn Benediktsson <mrjbq7@gmail.com>
Thu, 28 May 2020 16:13:51 +0000 (09:13 -0700)
committerJohn Benediktsson <mrjbq7@gmail.com>
Thu, 28 May 2020 16:13:51 +0000 (09:13 -0700)
extra/images/pbm/pbm.factor

index f0462df554606971bce32db9e9cb914af1384992..d953e3ff1a979ccd9c666d9218e0fd5e1fbfae9f 100644 (file)
@@ -48,7 +48,7 @@ SINGLETON: pbm-image
     bitmap width <groups> [
         width 8 align 255 pad-tail
         8 <groups> [
-            [ 255 = [ f ] [ t ] if ] { } map-as
+            [ 255 = not ] { } map-as
             >bit-array reverse bit-array>integer
             1array >byte-array write
         ] each