escaped symbols patch

escaped-symbols

diff --git a/src/julia-parser.scm b/src/julia-parser.scm
index 549b02f..8949495 100644
--- a/src/julia-parser.scm
+++ b/src/julia-parser.scm
@@ -1677,9 +1677,14 @@
          ;; symbol/expression quote
          ((eq? t ':)
           (take-token s)
-          (if (closing-token? (peek-token s))
-              ':
-              (list 'quote (parse-atom- s))))
+          (if (eqv? (peek-char (ts:port s)) #\")
+              ;; escaped symbol
+              (begin (read-char (ts:port s))
+                     (let ((str (cadr (parse-string-literal- '_ 0 (ts:port s) s #t))))
+                       (symbol str)))
+              (if (closing-token? (peek-token s))
+                  ':
+                  (list 'quote (parse-atom- s)))))
 
          ;; misplaced =
          ((eq? t '=) (error "unexpected \"=\""))