diff options
author | Maxime Dénès <mail@maximedenes.fr> | 2017-06-06 00:24:57 +0200 |
---|---|---|
committer | Maxime Dénès <mail@maximedenes.fr> | 2017-06-06 00:24:57 +0200 |
commit | cc0f9d254c394db742473299336fb20b82ae4aa1 (patch) | |
tree | cbc89906c862624d4285f367d1fa9f0f61f16f05 /vernac/command.ml | |
parent | b377bd30f23f430882902f534eaf31b1314ecd07 (diff) | |
parent | 88fdd28815747520bdc555a2d1b8600e114ab341 (diff) |
Merge PR#716: Don't double up on periods in anomalies
Diffstat (limited to 'vernac/command.ml')
-rw-r--r-- | vernac/command.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/vernac/command.ml b/vernac/command.ml index 87e7e50ec..0f9dee12c 100644 --- a/vernac/command.ml +++ b/vernac/command.ml @@ -674,7 +674,7 @@ let extract_coercions indl = let extract_params indl = let paramsl = List.map (fun (_,params,_,_) -> params) indl in match paramsl with - | [] -> anomaly (Pp.str "empty list of inductive types") + | [] -> anomaly (Pp.str "empty list of inductive types.") | params::paramsl -> if not (List.for_all (eq_local_binders params) paramsl) then user_err Pp.(str "Parameters should be syntactically the same for each inductive type."); |