LCPQ/qmcchem
10
1
Fork 1
mirror of https://gitlab.com/scemama/qmcchem.git synced 2024-12-21 11:53:30 +01:00
Code Releases Activity

Fix running averages

Browse Source
This commit is contained in:
Anthony Scemama 2022-01-12 14:43:29 +01:00
parent bb64e47ac9
commit 70dbec8ab8
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ocaml/Block.ml
View File

@ -110,7 +110,9 @@ let read_bytes b idx =
Bytes.get_int64_ne b idx
|> Int64.to_int
in
Some (Bytes.sub b (idx+8) m, idx+8+m)
try
Some (Bytes.sub b (idx+8) m, idx+8+m)
with Invalid_argument _ -> None