| files0[m] = mkfile(m0, md0, m1, content), icache-cons(icache, dirs, files0), m ∈ files0 ⊦ [let ino = m, asynced0 = ?, asynced = ? in {icache_check_inode#(ino, icache; asynced0, asynced, err); inode := mkinode(m, md, false, m1, 0, m2); if err = ESUCCESS ∧ asynced0 ∧ asynced then icache_get#(ino, icache; asynced0, inode, err); files := files0; if err = ESUCCESS ∧ asynced0 ∧ asynced then afs_write_inode#(inode; err, dirs, files; asynced1); icache0 := icache; if err = ESUCCESS then {asynced := false; icache_set_status#(ino, asynced; err, icache)}}] (err = ESUCCESS → files[inode.ino] = (files0 ⊕ icache0)[inode.ino]) |
files0[m] = mkfile(m0, md0, m1, content), ino = m, icache-cons(icache, dirs, files0), m ∈ files0 ⊦ [icache_check_inode#(ino, icache; asynced0, asynced, err); inode := mkinode(m, md, false, m1, 0, m2); if err = ESUCCESS ∧ asynced0 ∧ asynced then icache_get#(ino, icache; asynced0, inode, err); files := files0; if err = ESUCCESS ∧ asynced0 ∧ asynced then afs_write_inode#(inode; err, dirs, files; asynced1); icache0 := icache; if err = ESUCCESS then {asynced := false; icache_set_status#(ino, asynced; err, icache)}] (err = ESUCCESS → files[inode.ino] = (files0 ⊕ icache0)[inode.ino])