| # buf = VFS_PAGE_SIZE, asynced ↔ false, files0[m] = mkfile(m0, md, m1, content), pcache[datakey(m, n)] = mkpentry(true, buf), err = ESUCCESS, ino = m, pageno = n, n * VFS_PAGE_SIZE < m2, datakey(m, n) ∈ pcache, m ∈ files0, err1 = ESUCCESS ∨ ⌊err1⌋ ⊦ [let key = datakey(ino, pageno), pe = ? in if key ∈ pcache then {pe := pcache[key]; pe := mkpentry(asynced, pe.page); pcache[key] := pe} else err := EFAIL; n := n + 1] (err = ESUCCESS ∨ ⌊err⌋ ) |
# buf = VFS_PAGE_SIZE, asynced ↔ false, pcache[datakey(m, n)] = mkpentry(true, buf), files0[m] = mkfile(m0, md, m1, content), err = ESUCCESS, ino = m, key = datakey(ino, pageno), pageno = n, n * VFS_PAGE_SIZE < m2, m ∈ files0, datakey(m, n) ∈ pcache, err1 = ESUCCESS ∨ ⌊err1⌋ ⊦ [if key ∈ pcache then {pe := pcache[key]; pe := mkpentry(asynced, pe.page); pcache[key] := pe} else err := EFAIL; n := n + 1] (err = ESUCCESS ∨ ⌊err⌋ )