Skip to content

Commit

Permalink
Adapt to binding world-age changes (JuliaLang/julia#57102)
Browse files Browse the repository at this point in the history
  • Loading branch information
topolarity committed Feb 10, 2025
1 parent b60bb2b commit e33d4d0
Show file tree
Hide file tree
Showing 2 changed files with 32 additions and 14 deletions.
42 changes: 30 additions & 12 deletions src/Tracy.jl
Original file line number Diff line number Diff line change
Expand Up @@ -52,20 +52,38 @@ const ID = gensym(:id)
const META = gensym(:meta)
const METAType = Vector{TracySrcLoc}

function meta(m::Module; autoinit::Bool=true)
if !isdefined(m, META) || getfield(m, META) === nothing
autoinit ? initmeta(m) : return nothing
@static if VERSION >= v"1.12-DEV"
function meta(m::Module; autoinit::Bool=true)
if !isdefinedglobal(m, META)
autoinit ? invokelatest(initmeta, m) : return nothing
end
return invokelatest(getfield, m, META)::METAType
end

function initmeta(m::Module)
if !isdefinedglobal(m, META)
Core.eval(m, :($META = $(METAType())))
Core.eval(m, :($ID() = nothing))
Core.eval(m, :($Tracy.tracepoint_enabled(::Val{$ID}, ::Val) = true))
end
nothing
end
else
function meta(m::Module; autoinit::Bool=true)
if !isdefined(m, META) || getfield(m, META) === nothing
autoinit ? initmeta(m) : return nothing
end
return getfield(m, META)::METAType
end
return getfield(m, META)::METAType
end

function initmeta(m::Module)
if !isdefined(m, META) || getfield(m, META) === nothing
Core.eval(m, :($META = $(METAType())))
Core.eval(m, :($ID() = nothing))
Core.eval(m, :($Tracy.tracepoint_enabled(::Val{$ID}, ::Val) = true))
function initmeta(m::Module)
if !isdefined(m, META) || getfield(m, META) === nothing
Core.eval(m, :($META = $(METAType())))
Core.eval(m, :($ID() = nothing))
Core.eval(m, :($Tracy.tracepoint_enabled(::Val{$ID}, ::Val) = true))
end
nothing
end
nothing
end

const modules = Set{Module}()
Expand Down Expand Up @@ -112,7 +130,7 @@ function __init__()
for m in modules
for (i, srcloc) in enumerate(meta(m))
if pointer_from_objref(srcloc) == tracy_srcloc_ptr
m_id = getfield(m, ID)
m_id = invokelatest(getfield, m, ID)
old_enable = srcloc.enabled
if enable != old_enable
if old_enable == 0xFF
Expand Down
4 changes: 2 additions & 2 deletions src/tracepoint.jl
Original file line number Diff line number Diff line change
Expand Up @@ -141,7 +141,7 @@ function _tracepoint(name::Union{String, Nothing}, func::Union{String, Nothing},
push!(meta(mod), srcloc)

N = length(meta(mod))
m_id = getfield(mod, ID)
m_id = invokelatest(getfield, mod, ID)

return quote
if tracepoint_enabled(Val($m_id), Val($N))
Expand Down Expand Up @@ -211,7 +211,7 @@ existing code containing the tracepoint(s).
It is strongly recommended to use `enable_tracepoint` instead.
"""
function configure_tracepoint(m::Module, enable::Bool; name="", func="", file="")
m_id = getfield(m, ID)
m_id = invokelatest(getfield, m, ID)
for (i, srcloc) in enumerate(meta(m))
contains(srcloc.name, name) || continue
contains(srcloc.func, func) || continue
Expand Down

0 comments on commit e33d4d0

Please sign in to comment.