| 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)[_mode, throw(r, mkclasstype(class))][jvmref -- mkfs(class0, ty, fieldvar) '], ty, addobj(r, class, [], st)[_mode, throw(r, mkclasstype(class))]) |
⊦ rk .ref = jvmref → (validrefval(str, val, ty, st[rk, val0]) ↔ validrefval(str, val, ty, st))
_mode .ref = jvmref, 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)[_mode, throw(r, mkclasstype(class))][jvmref -- mkfs(class0, ty, fieldvar) '], ty, addobj(r, class, [], st))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ _mode .ref = jvmref], [CSIMPSEQ : ⊦ newref(r, st) ∧ r0 ∈ st ∧ r0 ≠ jvmref → r ≠ r0])], [EXTRATERMS : (throw(r, mkclasstype(class)), _mode, addobj(r, class, [], st), ty, addobj(r, class, [], st) [_mode, throw(r, mkclasstype(class)) ] [jvmref -- mkfs(class0, ty, fieldvar) ' ], str)]]