| avol[m2] = mapped(buf0), err0 = ESUCCESS, m2 < # avol, ebm-vol-inv(avol), is-aligned(m1, EB_PAGE_SIZE), is-aligned(n, EB_PAGE_SIZE), # buf0 ≤ m1, m1 + n ≤ LEB_SIZE, n2 + n ≤ # buf, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ ⟪if n ≠ 0 then avol[m2] := mapped(avol[m2].data + mkempbuf(m1 - # avol[m2].data) + subarray(buf, n2, n))⟫ ebm-vol-inv(avol) |
avol[m2] = mapped(buf0), err0 = ESUCCESS, m2 < # avol, ebm-vol-inv(avol), is-aligned(n, EB_PAGE_SIZE), is-aligned(m1, EB_PAGE_SIZE), n2 + n ≤ # buf, m1 + n ≤ LEB_SIZE, # buf0 ≤ m1, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ ⟪avol[m2] := mapped(avol[m2].data + mkempbuf(m1 - # avol[m2].data) + subarray(buf, n2, n))⟫ ebm-vol-inv(avol), n = 0
avol[m2] = mapped(buf0), err0 = ESUCCESS, n = 0, m2 < # avol, ebm-vol-inv(avol), is-aligned(n, EB_PAGE_SIZE), is-aligned(m1, EB_PAGE_SIZE), n2 + n ≤ # buf, m1 + n ≤ LEB_SIZE, # buf0 ≤ m1, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ ⟪skip⟫ ebm-vol-inv(avol)