| afs-cons(dirs, files) ⊦ [vfs_writepage#(inode, n, buf, m, n0, n1, dirs; err, files, asynced)] afs-cons(dirs, files) |
buf0 = buf, ino = n0, ino0 = m, n = n1, pageno = n2, afs-cons(dirs, files) ⊦ [let buf = mkbuf(VFS_PAGE_SIZE) in {afs_readpage#(inode, pageno, dirs, files, asynced; buf, err); if err = ESUCCESS then afs_check_commit#(dirs, files; err; asynced); if err = ESUCCESS then {buf := copy(buf0, ino0, buf, ino, n); afs_writepage#(inode, pageno, buf, dirs; err, files; asynced)}}] afs-cons(dirs, files)
Used simplifier rules: vfs_writepage# (INODE, PAGENO, BUF, TOTAL, OFFSET, N, DIRS; ERR, FILES, ASYNCED) {let PBUF = mkbuf(VFS_PAGE_SIZE) in {afs_readpage#(INODE, PAGENO, DIRS, FILES, ASYNCED; PBUF, ERR); if ERR = ESUCCESS then afs_check_commit#(DIRS, FILES; ERR; ASYNCED); if ERR = ESUCCESS then {PBUF := copy(BUF, TOTAL, PBUF, OFFSET, N); afs_writepage# (INODE, PAGENO, PBUF, DIRS; ERR, FILES; ASYNCED)}} };