X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fcic%2FcicParser.ml;h=f9d6d880ed122be497f803d4841ecd3fca478cb5;hb=c90dd454864f9383d7b05cd060e656fbe69b52bd;hp=a7ad3c9cf1f88c8cc56cfdadad7c119c3098bc45;hpb=55b82bd235d82ff7f0a40d980effe1efde1f5073;p=helm.git diff --git a/helm/software/components/cic/cicParser.ml b/helm/software/components/cic/cicParser.ml index a7ad3c9cf..f9d6d880e 100644 --- a/helm/software/components/cic/cicParser.ml +++ b/helm/software/components/cic/cicParser.ml @@ -751,6 +751,7 @@ let parse uri filename = | Failure "int_of_string" -> parse_error ctxt "integer number expected" | Invalid_argument "bool_of_string" -> parse_error ctxt "boolean expected" | P.Parse_error msg -> parse_error ctxt ("parse error: " ^ msg) + | Sys.Break | Parser_failure _ | Getter_failure _ as exn -> raise exn