aliasing ↦ as -> hardcoded in the parser

salehqt · Mar 17, 2013 · 8b50b9f · 8b50b9f
1 parent 560c185
commit 8b50b9f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/julia-parser.scm b/src/julia-parser.scm
@@ -727,7 +727,7 @@
       (case t
 	((|::|) (take-token s)
 	 (loop (list t ex (parse-call s))))
-	((->)   (take-token s)
+	((-> ↦)   (take-token s)
 	 ;; -> is unusual: it binds tightly on the left and
 	 ;; loosely on the right.
 	 (let ((lno (line-number-filename-node s)))