core: Clojure style comments ; ... now longer supported

core/src/yamlscript/re.clj

@@ -38,14 +38,13 @@
               return |
               .
             )")                            ; Character token
-(def tend #"(?=[\.\,\s\]\}\)]|$)")        ; End of token
+(def tend #"(?=[\.\,\s\]\}\)]|$)")         ; End of token
 (def comm #";.*(?:\n|\z)")                 ; Comment token
 (def ignr #"(?x)
             (?:                            # Ignorables
               |                              # Empty
               \#\!.*\n? |                    # hashbang line
               [\s,]+    |                    # whitespace, commas,
-              ;.*\n?                         # comments
             )")
 (def spec #"(?:~@|[~@`^])")                ; Special token
 (def quot #"(?:\\')")                      ; Quote token

core/src/yamlscript/ysreader.clj

@@ -302,7 +302,8 @@
 (defn read-scalar [[token & tokens]]
   (cond
     (map? token) [token tokens]
-    (is-comment? token) []
+    (is-comment? token)
+      (die "Clojure style comments are not allowed: '" token "'.")
     (= "nil" token) [(Nil) tokens]
     (= "true" token) [(Bln token) tokens]
     (= "false" token) [(Bln token) tokens]

core/test/compiler-stack.yaml

@@ -363,7 +363,7 @@
     {:exp "; comment (foo bar)"}
   parse: |
     "=VAL", :! "yamlscript/v0", := "; comment (foo bar)"
-  print: |
+  # Semicolon comments are errors now
 
 
 - name: Switch to code mode

core/test/compiler.yaml

@@ -1078,3 +1078,11 @@
     =>: foo.?.bar
   clojure: |
     (__ foo (list _DBG) 'bar)
+
+
+- name: Error Clojure style comments
+  yamlscript: |
+    !yamlscript/v0
+    =>: 42          ;; This is not a comment :(
+  error: |
+    ~~ This is not a comment

core/test/data-mode.yaml

@@ -92,9 +92,7 @@
   yamlscript: |
     !yamlscript/v0
     ; just a comment
-  build: |
-    nil
-  print: |
+  # Semicolon comments are errors now
 
 
 - name: data mode with code mode