Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
7 changes: 7 additions & 0 deletions base/compiler/abstractinterpretation.jl
Original file line number Diff line number Diff line change
Expand Up @@ -1421,6 +1421,13 @@ end

function abstract_eval_statement(interp::AbstractInterpreter, @nospecialize(e), vtypes::VarTable, sv::InferenceState)
if !isa(e, Expr)
if isa(e, PhiNode)
rt = Union{}
for val in e.values
rt = tmerge(rt, abstract_eval_special_value(interp, val, vtypes, sv))
end
return rt
end
return abstract_eval_special_value(interp, e, vtypes, sv)
end
e = e::Expr
Expand Down
39 changes: 33 additions & 6 deletions base/compiler/optimize.jl
Original file line number Diff line number Diff line change
Expand Up @@ -593,14 +593,23 @@ function renumber_ir_elements!(body::Vector{Any}, changemap::Vector{Int})
return renumber_ir_elements!(body, changemap, changemap)
end

function renumber_ir_elements!(body::Vector{Any}, ssachangemap::Vector{Int}, labelchangemap::Vector{Int})
for i = 2:length(labelchangemap)
labelchangemap[i] += labelchangemap[i - 1]
function cumsum_ssamap!(ssamap::Vector{Int})
rel_change = 0
for i = 1:length(ssamap)
rel_change += ssamap[i]
if ssamap[i] == -1
# Keep a marker that this statement was deleted
ssamap[i] = typemin(Int)
else
ssamap[i] = rel_change
end
end
end

function renumber_ir_elements!(body::Vector{Any}, ssachangemap::Vector{Int}, labelchangemap::Vector{Int})
cumsum_ssamap!(labelchangemap)
if ssachangemap !== labelchangemap
for i = 2:length(ssachangemap)
ssachangemap[i] += ssachangemap[i - 1]
end
cumsum_ssamap!(ssachangemap)
end
if labelchangemap[end] == 0 && ssachangemap[end] == 0
return
Expand All @@ -621,6 +630,24 @@ function renumber_ir_elements!(body::Vector{Any}, ssachangemap::Vector{Int}, lab
end
elseif isa(el, SSAValue)
body[i] = SSAValue(el.id + ssachangemap[el.id])
elseif isa(el, PhiNode)
i = 1
edges = el.edges
values = el.values
while i <= length(edges)
was_deleted = ssachangemap[edges[i]] == typemin(Int)
if was_deleted
deleteat!(edges, i)
deleteat!(values, i)
else
edges[i] += ssachangemap[edges[i]]
val = values[i]
if isa(val, SSAValue)
values[i] = SSAValue(val.id + ssachangemap[val.id])
end
i += 1
end
end
elseif isa(el, Expr)
if el.head === :(=) && el.args[2] isa Expr
el = el.args[2]::Expr
Expand Down
4 changes: 1 addition & 3 deletions base/compiler/typeinfer.jl
Original file line number Diff line number Diff line change
Expand Up @@ -672,9 +672,7 @@ function type_annotate!(sv::InferenceState, run_optimizer::Bool)
deleteat!(src.codelocs, i)
deleteat!(sv.stmt_info, i)
nexpr -= 1
if oldidx < length(changemap)
changemap[oldidx + 1] = -1
Copy link
Member

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Wha? Was this a bug?

Copy link
Member Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

No, the changemap was just offset by one, but as a result, nothing was recorded for the last statement, but here I do need to know if the last statement got deleted (so I can update the relevant phi nodes if any), so I changed the ordering to be non-offset.

end
changemap[oldidx] = -1
continue
else
body[i] = Const(expr) # annotate that this statement actually is dead
Expand Down
10 changes: 10 additions & 0 deletions base/compiler/utilities.jl
Original file line number Diff line number Diff line change
Expand Up @@ -267,6 +267,8 @@ function find_ssavalue_uses(body::Vector{Any}, nvals::Int)
push!(uses[e.id], line)
elseif isa(e, Expr)
find_ssavalue_uses(e, uses, line)
elseif isa(e, PhiNode)
find_ssavalue_uses(e, uses, line)
end
end
return uses
Expand All @@ -287,6 +289,14 @@ function find_ssavalue_uses(e::Expr, uses::Vector{BitSet}, line::Int)
end
end

function find_ssavalue_uses(e::PhiNode, uses::Vector{BitSet}, line::Int)
for val in e.values
if isa(val, SSAValue)
push!(uses[val.id], line)
end
end
end

function is_throw_call(e::Expr)
if e.head === :call
f = e.args[1]
Expand Down
8 changes: 6 additions & 2 deletions src/codegen.cpp
Original file line number Diff line number Diff line change
Expand Up @@ -4087,9 +4087,13 @@ static void emit_vi_assignment_unboxed(jl_codectx_t &ctx, jl_varinfo_t &vi, Valu
static void emit_phinode_assign(jl_codectx_t &ctx, ssize_t idx, jl_value_t *r)
{
jl_value_t *ssavalue_types = (jl_value_t*)ctx.source->ssavaluetypes;
assert(jl_is_array(ssavalue_types));
jl_value_t *phiType = NULL;
if (jl_is_array(ssavalue_types)) {
phiType = jl_array_ptr_ref(ssavalue_types, idx);
} else {
phiType = (jl_value_t*)jl_any_type;
}
jl_array_t *edges = (jl_array_t*)jl_fieldref_noalloc(r, 0);
jl_value_t *phiType = jl_array_ptr_ref(ssavalue_types, idx);
BasicBlock *BB = ctx.builder.GetInsertBlock();
auto InsertPt = BB->getFirstInsertionPt();
if (phiType == jl_bottom_type) {
Expand Down
32 changes: 32 additions & 0 deletions test/compiler/inference.jl
Original file line number Diff line number Diff line change
Expand Up @@ -3323,3 +3323,35 @@ end |> first === Tuple{Int, String}
primitive type UInt24ish 24 end
f34288(x) = Core.Intrinsics.checked_sdiv_int(x, Core.Intrinsics.trunc_int(UInt24ish, 0))
@test Base.return_types(f34288, (UInt24ish,)) == Any[UInt24ish]

# Inference of PhiNode showing up in lowered AST
function f_convert_me_to_ir(b, x)
a = b ? sin(x) : cos(x)
return a
end

let
# Test the presence of PhiNodes in lowered IR by taking the above function,
# running it through SSA conversion and then putting it into an opaque
# closure.
mi = Core.Compiler.specialize_method(first(methods(f_convert_me_to_ir)),
Tuple{Bool, Float64}, Core.svec())
ci = Base.uncompressed_ast(mi.def)
ci.ssavaluetypes = Any[Any for i = 1:ci.ssavaluetypes]
sv = Core.Compiler.OptimizationState(mi, Core.Compiler.OptimizationParams(),
Core.Compiler.NativeInterpreter())
ir = Core.Compiler.convert_to_ircode(ci, Core.Compiler.copy_exprargs(ci.code),
false, 2, sv)
ir = Core.Compiler.slot2reg(ir, ci, 2, sv)
ir = Core.Compiler.compact!(ir)
Core.Compiler.replace_code_newstyle!(ci, ir, 3)
ci.ssavaluetypes = length(ci.code)
@test any(x->isa(x, Core.PhiNode), ci.code)
oc = @eval b->$(Expr(:new_opaque_closure, Tuple{Bool, Float64}, false, Any, Any,
Expr(:opaque_closure_method, nothing, 2, LineNumberNode(0, nothing), ci)))(b, 1.0)
@test Base.return_types(oc, Tuple{Bool}) == Any[Float64]

oc = @eval ()->$(Expr(:new_opaque_closure, Tuple{Bool, Float64}, false, Any, Any,
Expr(:opaque_closure_method, nothing, 2, LineNumberNode(0, nothing), ci)))(true, 1.0)
@test Base.return_types(oc, Tuple{}) == Any[Float64]
end