reject .! operator

JuliaLang · Jul 13, 2016 · b001d98 · b001d98
1 parent d69dded
commit b001d98
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/julia-parser.scm b/src/julia-parser.scm
@@ -198,8 +198,8 @@
                                     (loop newop (peek-char port)))
                              str))
                        str))))
-        (if (equal? str "--")
-            (error "invalid operator \"--\""))
+        (if (or (equal? str "--") (equal? str ".!"))
+            (error (string "invalid operator \"" str "\"")))
         (string->symbol str))))
 
 (define (accum-digits c pred port lz)