diff options
-rw-r--r-- | parsing/pptactic.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/pptactic.ml b/parsing/pptactic.ml index 58df67424..9d68f1cd9 100644 --- a/parsing/pptactic.ml +++ b/parsing/pptactic.ml @@ -378,7 +378,7 @@ let pr_as_ipat = function let pr_as_name = function | Anonymous -> mt () - | Name id -> str "as " ++ pr_lident (dummy_loc,id) + | Name id -> str " as " ++ pr_lident (dummy_loc,id) let pr_pose_as_style prc na c = spc() ++ prc c ++ pr_as_name na |