simon/ocaml-containers
1
0
Fork 0
mirror of https://github.com/c-cube/ocaml-containers.git synced 2025-12-06 03:05:28 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

in bij, EOF -> DecodingError

Browse source
This commit is contained in:
Simon Cruanes 2013-05-15 18:09:24 +02:00
parent 5c11f945b9
commit 44bd29766c
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
bij.ml
View file

@ -452,7 +452,10 @@ module SexpDecode(Source : SOURCE) = struct
let x = decode bij in let x = decode bij in
decode_list bij (x :: l) decode_list bij (x :: l)
in in
decode bij try
decode bij
with EOF ->
raise (DecodingError "unexpected EOF")
end end
module SexpStr = struct module SexpStr = struct