ps: properly ignore multiple comments in a row.
authorJoel Martin <github@martintribe.org>
Wed, 15 May 2019 17:11:21 +0000 (12:11 -0500)
committerJoel Martin <github@martintribe.org>
Wed, 15 May 2019 17:12:39 +0000 (12:12 -0500)
ps/reader.ps

index c5e19bf..88dbef3 100644 (file)
@@ -197,7 +197,7 @@ end } def
             /ch str idx get def  % current character
         } if
         % if not whitespace then exit
-        ch 32 ne ch 10 ne ch 44 ne and and { exit } if
+        ch 32 ne ch 10 ne ch 44 ne ch 59 ne and and and { exit } if
         /idx idx 1 add def % increment idx
     } loop