| asynced ↔ asynced0, pcache[datakey(m, n)] = mkpentry(true, buf0), asynced0, err = ESUCCESS, ino = m, key = datakey(ino, pageno), pageno = n, n * VFS_PAGE_SIZE < m2, datakey(m, n) ∈ pcache, err0 = ESUCCESS ∨ ⌊err0⌋ ⊦ [if key ∈ pcache then let pe = pcache[key] in {buf := pe.page; asynced := true} else asynced := false; err := ESUCCESS; if err = ESUCCESS then afs_writepage#(mkinode(m, md, boolvar, m0, m1, m2), n, buf, dirs; err, files; asynced1); if err = ESUCCESS then afs_check_commit#(dirs, files; err; asynced1); if err = ESUCCESS then {asynced := false; pcache_set_status#(m, n, asynced; err, pcache)}; n := n + 1] (err = ESUCCESS ∨ ⌊err⌋ ) |
asynced ↔ asynced0, pcache[datakey(m, n)] = mkpentry(true, buf0), asynced0, err = ESUCCESS, ino = m, key = datakey(ino, pageno), pageno = n, n * VFS_PAGE_SIZE < m2, key ∈ pcache, datakey(m, n) ∈ pcache, err0 = ESUCCESS ∨ ⌊err0⌋ ⊦ [let pe = pcache[key] in {buf := pe.page; asynced := true}; err := ESUCCESS; if err = ESUCCESS then afs_writepage#(mkinode(m, md, boolvar, m0, m1, m2), n, buf, dirs; err, files; asynced1); if err = ESUCCESS then afs_check_commit#(dirs, files; err; asynced1); if err = ESUCCESS then {asynced := false; pcache_set_status#(m, n, asynced; err, pcache)}; n := n + 1] (err = ESUCCESS ∨ ⌊err⌋ )
asynced ↔ asynced0, pcache[datakey(m, n)] = mkpentry(true, buf0), asynced0, err = ESUCCESS, ino = m, key = datakey(ino, pageno), pageno = n, n * VFS_PAGE_SIZE < m2, datakey(m, n) ∈ pcache, err0 = ESUCCESS ∨ ⌊err0⌋ ⊦ [asynced := false; err := ESUCCESS; if err = ESUCCESS then afs_writepage#(mkinode(m, md, boolvar, m0, m1, m2), n, buf, dirs; err, files; asynced1); if err = ESUCCESS then afs_check_commit#(dirs, files; err; asynced1); if err = ESUCCESS then {asynced := false; pcache_set_status#(m, n, asynced; err, pcache)}; n := n + 1] (err = ESUCCESS ∨ ⌊err⌋ ), key ∈ pcache