diff options
| author | Emilio Jesus Gallego Arias | 2020-03-01 02:49:04 -0500 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2020-03-08 00:44:58 -0500 |
| commit | 4ba8fabb14256cdc65e8440362d6697d9e97b7f4 (patch) | |
| tree | 6dc6168679e8b48127decd32823afa39ac77355c /vernac/vernacstate.ml | |
| parent | dbd3a4c4213b3d56908a8387de93e27aaec501a4 (diff) | |
[exn] [nit] Remove not very useful re-raises.
Cleanup: IMHO most of the re-raises here are not worth it.
Diffstat (limited to 'vernac/vernacstate.ml')
| -rw-r--r-- | vernac/vernacstate.ml | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/vernac/vernacstate.ml b/vernac/vernacstate.ml index 59557a60a6..280343f315 100644 --- a/vernac/vernacstate.ml +++ b/vernac/vernacstate.ml @@ -18,12 +18,9 @@ module Parser = struct let parse ps entry pa = Pcoq.unfreeze ps; - Flags.with_option Flags.we_are_parsing (fun () -> - try Pcoq.Entry.parse entry pa - with e when CErrors.noncritical e -> - let (e, info) = Exninfo.capture e in - Exninfo.iraise (e, info)) - () + Flags.with_option Flags.we_are_parsing + (fun () -> Pcoq.Entry.parse entry pa) + () end |
