Skip to content

Commit

Permalink
Revert "constrain the path argument of include functions to `Abstra…
Browse files Browse the repository at this point in the history
…ctString…"

This reverts commit 060035d.
  • Loading branch information
vtjnash authored and Keno committed Oct 16, 2024
1 parent 8a79822 commit 76e8294
Show file tree
Hide file tree
Showing 2 changed files with 4 additions and 4 deletions.
4 changes: 2 additions & 2 deletions base/loading.jl
Original file line number Diff line number Diff line change
Expand Up @@ -2875,8 +2875,8 @@ function evalfile(path::AbstractString, args::Vector{String}=String[])
Expr(:toplevel,
:(const ARGS = $args),
:(eval(x) = $(Expr(:core, :eval))(__anon__, x)),
:(include(x::AbstractString) = $(Expr(:top, :include))(__anon__, x)),
:(include(mapexpr::Function, x::AbstractString) = $(Expr(:top, :include))(mapexpr, __anon__, x)),
:(include(x) = $(Expr(:top, :include))(__anon__, x)),
:(include(mapexpr::Function, x) = $(Expr(:top, :include))(mapexpr, __anon__, x)),
:(include($path))))
end
evalfile(path::AbstractString, args::Vector) = evalfile(path, String[args...])
Expand Down
4 changes: 2 additions & 2 deletions src/jlfrontend.scm
Original file line number Diff line number Diff line change
Expand Up @@ -211,11 +211,11 @@
(block
,@loc
(call (core eval) ,name ,x)))
(= (call include (:: ,x (top AbstractString)))
(= (call include ,x)
(block
,@loc
(call (core _call_latest) (top include) ,name ,x)))
(= (call include (:: ,mex (top Function)) (:: ,x (top AbstractString)))
(= (call include (:: ,mex (top Function)) ,x)
(block
,@loc
(call (core _call_latest) (top include) ,mex ,name ,x)))))
Expand Down

0 comments on commit 76e8294

Please sign in to comment.