fix JuliaLang#9704, allow interpolating var in catch block

Sacha0 · Feb 3, 2015 · bf58fa6 · bf58fa6
1 parent 42e28c8
commit bf58fa6
Show file tree

Hide file tree

Showing 2 changed files with 13 additions and 1 deletion.
diff --git a/src/julia-parser.scm b/src/julia-parser.scm
@@ -1172,7 +1172,7 @@
  #f
  finalb)
  (let* ((var (parse-eq* s))
- (var? (and (not nl) (symbol? var)))
+ (var? (and (not nl) (or (symbol? var) (and (length= var 2) (eq? (car var) '$)))))
  (catch-block (if (eq? (require-token s) 'finally)
  '(block)
  (parse-block s))))

diff --git a/test/parser.jl b/test/parser.jl
@@ -10,3 +10,15 @@ let
  @test ex1.args[3] === :x && (ex1.args[3] === ex2.args[3])
  end
 end
+
+# issue #9704
+let a = :a
+ @test :(try
+ catch $a
+ end) == :(try
+ catch a
+ end)
+ @test :(module $a
+ end) == :(module a
+ end)
+end