From 31bab456b0bf066576eafaf9b98b4e8c1d4bdb40 Mon Sep 17 00:00:00 2001
From: MadMaurice <madmaurice@zom.bi>
Date: Fri, 2 Apr 2021 16:05:22 +0200
Subject: [PATCH] Add support for comments

---
 lib/Minilisp.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/lib/Minilisp.pm b/lib/Minilisp.pm
index dbd3b3c..50515b8 100644
--- a/lib/Minilisp.pm
+++ b/lib/Minilisp.pm
@@ -21,7 +21,11 @@ sub tokenize {
 
   while ($str)
     {
-      if ($str =~ s/^\(//)
+      if ($str =~ s/^;.*\n//)
+        {
+          # Comment. do nothing
+        }
+      elsif ($str =~ s/^\(//)
         {
           push @tokens, { type => LPAREN };
         }