diff options
| -rw-r--r-- | printing/ppvernac.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/printing/ppvernac.ml b/printing/ppvernac.ml index 28f6f3f3f..bcd38253f 100644 --- a/printing/ppvernac.ml +++ b/printing/ppvernac.ml @@ -514,7 +514,7 @@ module Make match v with | VernacPolymorphic (poly, v) -> let s = if poly then keyword "Polymorphic" else keyword "Monomorphic" in - return (s ++ pr_vernac v) + return (s ++ spc () ++ pr_vernac v) | VernacProgram v -> return (keyword "Program" ++ spc() ++ pr_vernac v) | VernacLocal (local, v) -> |