1 files changed, 5 insertions, 0 deletions
diff --git a/source/parse.cpp b/source/parse.cpp
index 012d708..74f7e6a 100644
--- a/source/parse.cpp
+++ b/source/parse.cpp
@@ -45,22 +45,27 @@ void parseSource()
     auto start = (char *)DICT[DIdxSource];
     auto end = start;
 
+    // Try to build words while we have input available.
     while (haskey()) {
         end = (char *)++DICT[DIdxSource];
         --DICT[DIdxSrcLen];
 
         if (isspace(*end)) {
+            // May have collected a word.
+            // parseword() will check if start != end.
             parseword(start, end);
             start = (char *)(DICT[DIdxSource] + 1);
         }
     }
 
+    // Parse the final word if it is non-empty.
     if (start != end)
         parseword(start, end);
 }
 
 void parse()
 {
+    // Reset source buffer and try to fill it with getinput().
     DICT[DIdxSource] = (Cell)&DICT[DIdxBegin];
     DICT[DIdxSrcLen] = 0;
     getinput();