| # buf = VFS_PAGE_SIZE, pcache[datakey(m, n)] = mkpentry(true, buf), files0[m] = mkfile(m0, md, m1, content), err = ESUCCESS, n * VFS_PAGE_SIZE < m2, m ∈ files0, datakey(m, n) ∈ pcache, err1 = ESUCCESS ∨ ⌊err1⌋ ⊦ [pcache_set_status#(m, n, false; err, pcache); n := n + 1] (err = ESUCCESS ∨ ⌊err⌋ ) |
# 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⌋ )
Used simplifier rules: pcache_set_status#(INO, PAGENO, DIRTY; ERR, PCACHE) {let KEY = datakey(INO, PAGENO), PE = ? in if KEY ∈ PCACHE then {PE := PCACHE[KEY]; PE := mkpentry(DIRTY, PE.page); PCACHE[KEY] := PE} else ERR := EFAIL };