Fix Cachet_lwt.next #8

Merged
dinosaure merged 1 commit from fix-lwt into main 2025-01-07 17:36:15 +00:00
Showing only changes of commit df13234fe1 - Show all commits

View file

@ -94,4 +94,4 @@ let get_int64_be t logical_address =
let next t slice = let next t slice =
let pagesize = Cachet.pagesize t in let pagesize = Cachet.pagesize t in
load t (slice.Cachet.offset + (1 lsl pagesize)) load t (slice.Cachet.offset + pagesize)