File tree Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Original file line number Diff line number Diff line change @@ -3249,15 +3249,15 @@ let pp_modsig ?(long=false) ppe fmt (p,ms) =
3249
3249
Format. fprintf fmt " (* %a *)@ " EcSymbols. pp_qsymbol qs in
3250
3250
3251
3251
Format. fprintf fmt
3252
- " @[<v>@[<hv 2>%amodule type %s%t@;<0 -2>@] = {@, @[<v>%a@]@,}@]"
3252
+ " @[<v>@[<hv 2>%amodule type %s%t@;<0 -2>@] = {@, @[<v>%a@]@,}. @]"
3253
3253
pp_long p
3254
3254
(EcPath. basename p) pp
3255
3255
(pp_list " @,@," (pp_sigitem (Some ms.mis_oinfos) ppe)) ms.mis_body
3256
3256
3257
3257
(* Printing of a module signature with no restrictions. *)
3258
3258
let pp_modsig_smpl ppe fmt (p ,ms ) =
3259
3259
let (ppe,pp) = pp_mod_params ppe ms.miss_params in
3260
- Format. fprintf fmt " @[<v>module type %s%t = {@, @[<v>%a@]@,}@]"
3260
+ Format. fprintf fmt " @[<v>module type %s%t = {@, @[<v>%a@]@,}. @]"
3261
3261
(EcPath. basename p) pp
3262
3262
(pp_list " @,@," (pp_sigitem None ppe)) ms.miss_body
3263
3263
You can’t perform that action at this time.
0 commit comments