| jvmref -- mkfs(class0, ty, fieldvar) ' ≠ _mode, type∃(str, ty), is_reftype(ty), is_predefined_class(class), newref(r, st), mkfs(class0, ty, fieldvar) ' ∈ statfields(class0), tdname∃(str, class0), initdone(class0, st), jvmref -- mkfs(class0, ty, fieldvar) ' ∈ st, is_referencevalue(st[jvmref -- mkfs(class0, ty, fieldvar) ']), validrefval(str, st[jvmref -- mkfs(class0, ty, fieldvar) '], ty, st), jvmref ∈ st ⊦ r = jvmref, ty = void_type, validrefval(str, addobj(r, class, [], st)[jvmref -- mkfs(class0, ty, fieldvar) '], ty, addobj(r, class, [], st)) |
type∃(str, ty), is_reftype(ty), is_predefined_class(class), newref(r, st), mkfs(class0, ty, fieldvar) ' ∈ statfields(class0), tdname∃(str, class0), initdone(class0, st), jvmref -- mkfs(class0, ty, fieldvar) ' ∈ st, is_referencevalue(st[jvmref -- mkfs(class0, ty, fieldvar) ']), validrefval(str, st[jvmref -- mkfs(class0, ty, fieldvar) '], ty, st), jvmref ∈ st ⊦ r = jvmref, ty = void_type, validrefval(str, st[jvmref -- mkfs(class0, ty, fieldvar) '], ty, addobj(r, class, [], st))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r0 ∈ st ∧ newref(r, st) → (addobj(r, class1, fis, st) [r0 -- sk ] ) = st[r0 -- sk]], [CSIMPSEQ : ⊦ mkfs(class1, ty, fieldvar) = mkfs(class2, ty0, fieldvar0) ↔ ¬ ¬ ( class1 = class2 ∧ ty = ty0 ∧ fieldvar = fieldvar0)], [CSIMPSEQ : ⊦ fs ' = fs0 ' ↔ fs = fs0], [CSIMPSEQ : ⊦ _mode = jvmref -- sk ↔ sk = mkfs (`java.lang.Object' .class, void_type, `mode' .field) '])]]