Refactor the read loop into Reader

kiss/src/kiss/Kiss.hx

@@ -62,16 +62,7 @@ class Kiss {
             if (k == null)
                 k = defaultKissState();
 
-            while (true) {
+            Reader.readAndProcess(stream, k.readTable, (nextExp) -> {
-                stream.dropWhitespace();
-                if (stream.isEmpty())
-                    break;
-                var position = stream.position();
-                var nextExp = Reader.read(stream, k.readTable);
-
-                // The last expression might be a comment, in which case None will be returned
-                switch (nextExp) {
-                    case Some(nextExp):
                 #if test
                 Sys.println(nextExp.def.toString());
                 #end
@@ -87,10 +78,7 @@ class Kiss {
                     #end
                     classFields.push(field);
                 }
-                    case None:
+            });
-                        stream.dropWhitespace(); // If there was a comment, drop whitespace that comes after
-                }
-            }
 
             return classFields;
         } catch (err:CompileError) {

kiss/src/kiss/Reader.hx

@@ -148,6 +148,26 @@ class Reader {
         return array;
     }
 
+    /**
+        Read all the expressions in the given stream, processing them one by one while reading.
+    **/
+    public static function readAndProcess(stream:Stream, readTable:Map<String, ReadFunction>, process:(ReaderExp) -> Void) {
+        while (true) {
+            stream.dropWhitespace();
+            if (stream.isEmpty())
+                break;
+            var position = stream.position();
+            var nextExp = Reader.read(stream, readTable);
+            // The last expression might be a comment, in which case None will be returned
+            switch (nextExp) {
+                case Some(nextExp):
+                    process(nextExp);
+                case None:
+                    stream.dropWhitespace(); // If there was a comment, drop whitespace that comes after
+            }
+        }
+    }
+
     public static function withPos(def:ReaderExpDef, pos:Position) {
         return {
             pos: pos,