| st[r -- sk] = refval(r0), st[r -- _type] .type = mkclasstype(class), hasSharing(r0, st), sk ∈ instfields(class) ⊦ r = jvmref, hasSharing(r, st) |
⊦ hasSharing(r, st) ↔ (∃ sks1, sks2. fits(r, sks1, st) ∧ fits(r, sks2, st) ∧ sks1 ≠ sks2 ∧ sks1 ≠ [] ∧ sks2 ≠ [] ∧ st[r -- sks1] .refval ≠ jvmref ∧ st[r -- sks1] = st[r -- sks2])
st[r -- sk] = refval(r0), st[r -- _type] .type = mkclasstype(class), ∃ sks1, sks2. fits(r0, sks1, st) ∧ fits(r0, sks2, st) ∧ sks1 ≠ sks2 ∧ sks1 ≠ [] ∧ sks2 ≠ [] ∧ st[r0 -- sks1] .refval ≠ jvmref ∧ st[r0 -- sks1] = st[r0 -- sks2], sk ∈ instfields(class) ⊦ r = jvmref, hasSharing(r, st)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, r0)]]