61ccc78

org/faddle/lang/read.lua modified (view file)

@@ -43,8 +43,16 @@   end    local function skip_whitespace()-    while pos <= len and whitespace[peek()] do-      pos = pos + 1+    while pos <= len do+      local c = peek()+      if whitespace[c] then+        pos = pos + 1+      elseif c == ";" then+        repeat pos = pos + 1+        until pos > len or peek() == "\n" or peek() == "\r"+      else+        break+      end     end   end