| apersistence_read_gblock_nodes#(LNUM, ROOTADR, ISTORE, ISTORE0, GINVAL, GSTORE, GSTORE0, NL, MAXINO, OS, PSTATE, PSYNCED; ADRLIST, GNDLIST; ERR) {if LNUM ∈ GSTORE ∧ ¬ LNUM ∈ GINVAL then {fail_or_success#(; ; ERR); if ERR = ESUCCESS then ADRLIST := ADRLIST + GSTORE[LNUM].ladrlist.to-adr(LNUM), GNDLIST := GNDLIST + GSTORE[LNUM].gndlist else ADRLIST := ?, GNDLIST := ?} else abort } |