| st[_mode] = return(val, ty), compatrefs(str, st), compatstatic(str, st), _mode ∈ st, newref(r, st), is_predefined_class(class), okval(val, ty) ∧ ( is_referencevalue(val) ∧ val .refval ≠ jvmref → val .refval -- _type ∈ st ∧ is_typevalue(st[val .refval -- _type]) ∧ is_reftype(st[val .refval -- _type] .type) ∧ (has_classtype(st[val .refval -- _type] .type) → tdname+∃(str, st[val .refval -- _type] .type .jtelemtype .class)) ∧ (is_classtype(st[val .refval -- _type] .type) → class+∃(str, st[val .refval -- _type] .type .class)) ∧ asgcomp(str, val, ty, st)) ⊦ r = jvmref, return(val, ty) = return(noval, void_type), compat(str, val, ty, st[r -- _type, typeval(mkclasstype(class))]) |
st[_mode] = return(val, ty), compatrefs(str, st), compatstatic(str, st), _mode ∈ st, newref(r, st), is_predefined_class(class), okval(val, ty), is_referencevalue(val) ∧ val .refval ≠ jvmref → val .refval -- _type ∈ st ∧ is_typevalue(st[val .refval -- _type]) ∧ is_reftype(st[val .refval -- _type] .type) ∧ (has_classtype(st[val .refval -- _type] .type) → tdname+∃(str, st[val .refval -- _type] .type .jtelemtype .class)) ∧ (is_classtype(st[val .refval -- _type] .type) → class+∃(str, st[val .refval -- _type] .type .class)) ∧ is_subtype(str, st[val .refval -- _type] .type, ty) ⊦ r = jvmref, return(val, ty) = return(noval, void_type), compat(str, val, ty, st[r -- _type, typeval(mkclasstype(class))])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ asgcomp(str, val, ty, st) ↔ ¬ is_referencevalue(val) ∨ val .refval = jvmref ∨ is_subtype (str, st[val .refval -- _type] .type, ty)])]]