diff --git a/wip-duuqnd/user-side-compiler/tokenizer.lisp b/wip-duuqnd/user-side-compiler/tokenizer.lisp
index 15666ab..700d13f 100644
--- a/wip-duuqnd/user-side-compiler/tokenizer.lisp
+++ b/wip-duuqnd/user-side-compiler/tokenizer.lisp
@@ -164,13 +164,13 @@ reading immediately. Should be a subset of *SPECIAL-TOKEN-CHARS*.")
                   (next-token))
                  ;; Process and add a newline
                  ((char= char #\Newline)
-                  (setf in-comment-p nil
-                        line (1+ line)
-                        column 0)
                   (unless (zerop (length token-text-buffer))
                     (next-token))
                   (vector-push #\Newline token-text-buffer)
-                  (next-token))
+                  (next-token)
+                  (setf in-comment-p nil
+                        line (1+ line)
+                        column 0))
                  ;; Starting a comment
                  ((and (member char *line-comment-chars* :test #'char=) (not in-comment-p))
                   (unless (zerop (length token-text-buffer))