| icache[m] = mkientry(true, inode1), files0[m] = mkfile(m0, md0, m1, content), err = ESUCCESS, files = files0, icache-cons(icache, dirs, files0), m ∈ files0, m ∈ icache ⊦ [afs_write_inode#(inode1; err, dirs, files; asynced1); icache0 := icache; inode := inode1; if err = ESUCCESS then {asynced := false; icache_set_status#(m, asynced; err, icache)}] (err = ESUCCESS → files[inode.ino] = (files0 ⊕ icache0)[inode.ino]) |
files0[m] = mkfile(m0, md0, m1, content), icache[m] = mkientry(true, inode1), err = ESUCCESS, files = files0, inode = inode1, icache-cons(icache, dirs, files0), m ∈ icache, m ∈ files0 ⊦ [if pre-write-inode(inode, dirs, files) then { {if inode.directory then dirs[inode.ino].meta := inode.meta else {files[inode.ino].meta := inode.meta; files[inode.ino].size := inode.size}; err := ESUCCESS} or fail#(; ; err); asynced := ?} else abort; icache0 := icache; inode := inode1; if err = ESUCCESS then {asynced := false; icache_set_status#(m, asynced; err, icache)}] (err = ESUCCESS → files[inode.ino] = (files0 ⊕ icache0)[inode.ino])
Used simplifier rules: afs_write_inode#(INODE; ERR, DIRS, FILES; ASYNCED) {if pre-write-inode(INODE, DIRS, FILES) then { {if INODE.directory then DIRS[INODE.ino].meta := INODE.meta else {FILES[INODE.ino].meta := INODE.meta; FILES[INODE.ino].size := INODE.size}; ERR := ESUCCESS} or fail#(; ; ERR); ASYNCED := ?} else abort };