diff --git a/src/julia-syntax.scm b/src/julia-syntax.scm index dd45502a32e48..fa6b3fbed21d7 100644 --- a/src/julia-syntax.scm +++ b/src/julia-syntax.scm @@ -2366,7 +2366,7 @@ ;; pass 2: identify and rename local vars (define (check-dups locals others) - (if (pair? locals) + #;(if (pair? locals) (if (or (memq (car locals) (cdr locals)) (memq (car locals) others)) (error (string "local \"" (car locals) "\" declared twice")) (check-dups (cdr locals) others))) diff --git a/test/syntax.jl b/test/syntax.jl index c609309b517ab..23b6bf9682d01 100644 --- a/test/syntax.jl +++ b/test/syntax.jl @@ -521,7 +521,7 @@ end global x = 2 local x = 1 end")) == Expr(:error, "variable \"x\" declared both local and global") - +#= @test Meta.lower(Main, Meta.parse("let local x = 2 local x = 1 @@ -534,7 +534,7 @@ end @test Meta.lower(Main, Meta.parse("let x = 2 local x = 1 end")) == Expr(:error, "local \"x\" declared twice") - +=# # issue #23673 @test :(let $([:(x=1),:(y=2)]...); x+y end) == :(let x = 1, y = 2; x+y end)