diff options
author | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2014-02-25 17:04:51 +0100 |
---|---|---|
committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2014-02-25 17:04:51 +0100 |
commit | d35a5022f45f1082c83891a6d0af32485a9db7d6 (patch) | |
tree | 6bc5d7eb7609167ec9267a99cb0126cc9dbb85a0 /toplevel | |
parent | 2b6282c668a6340f982a7b9b52f9686d120257e7 (diff) |
Fixing printing of only_parsing notations.
Diffstat (limited to 'toplevel')
-rw-r--r-- | toplevel/metasyntax.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/toplevel/metasyntax.ml b/toplevel/metasyntax.ml index 0aec4a7b7..58f8d6d4e 100644 --- a/toplevel/metasyntax.ml +++ b/toplevel/metasyntax.ml @@ -934,7 +934,7 @@ let is_not_printable onlyparse noninjective = function if not onlyparse && noninjective then let () = msg_warning (strbrk "This notation will not be used for printing as it is not reversible.") in true - else false + else onlyparse let find_precedence lev etyps symbols = match symbols with |