| ⊦ validFields(r, fis, addobj(r, class, fis, st)) ∧ fis .keys = instfields(class) ∧ newref(r, st) ∧ class+∃(str, class) ∧ ¬ is_abstract(class) ∧ validref(str, r, mkclasstype(class), addobj(r, class, fis, st)) ∧ fs ' × refval(refs .first) ∈ fis ∧ fs ' ∈ instfields(class) ∧ refs ≠ [] ∧ validrefs(str, refs, ty, st) → validrefs(str, r ' + refs, (addobj(r, class, fis, st)[r -- _type]) .type, addobj(r, class, fis, st)) |
fis .keys = instfields(class), validFields(r, fis, addobj(r, class, fis, st)), newref(r, st), class+∃(str, class), validref(str, r, mkclasstype(class), addobj(r, class, fis, st)), fs ' × refval(refs .first) ∈ fis, fs ' ∈ instfields(class), validrefs(str, refs, ty, st) ⊦ refs = [], r = jvmref, is_abstract(class), validrefs(str, r ' + refs, mkclasstype(class), addobj(r, class, fis, st))
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ newref(r, st) → r ≠ jvmref], [CSIMPSEQ : ⊦ typeval(ty) .type = ty], [CSIMPSEQ : ¬ _type ∈ fis ⊦ (addobj(r, class1, fis, st) [r -- _type ] ) = typeval(mkclasstype(class1))], [CSIMPSEQ : ⊦ fis .keys = instfields(class) → ¬ _type ∈ fis])]]