diff options
| author | glondu | 2007-07-09 15:10:16 +0000 |
|---|---|---|
| committer | glondu | 2007-07-09 15:10:16 +0000 |
| commit | 885aec961ab1a9e3c0c0bfde25742c2a43fddbc5 (patch) | |
| tree | 83a84ea0935288420121e34a09036ee517b7875d /interp | |
| parent | 9c4f65ebe124d972ae1506e388bb206cb7298ce4 (diff) | |
More natural notation for intro pattern: @a -> ?a
Caveat about a slight loss of compatibility:
Some intro patterns don't need space between them. In particular
intros ?a?b used to be legal and equivalent to intros ? a ? b. Now it
is still legal but equivalent to intros ?a ?b.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@9964 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'interp')
| -rw-r--r-- | interp/genarg.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/interp/genarg.ml b/interp/genarg.ml index 2c61fc3c9b..930cfe7394 100644 --- a/interp/genarg.ml +++ b/interp/genarg.ml @@ -87,7 +87,7 @@ let rec pr_intro_pattern = function | IntroWildcard -> str "_" | IntroIdentifier id -> pr_id id | IntroAnonymous -> str "?" - | IntroFresh id -> str "@" ++ pr_id id + | IntroFresh id -> str "?" ++ pr_id id and pr_case_intro_pattern = function | [pl] -> |