diff options
| author |  Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2016-06-06 17:08:55 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2016-06-07 15:54:22 +0200 |
| commit | d7737ba9b3a811b8415ce87d8e3e091c9e49d32e (patch) | |
| tree | e0ae4f5739bd6e49fe5827da38e800913b2c9712 /printing | |
| parent | 5520db62486ad628f91737833623aa69c4c1b8af (diff) | |
Adding an only printing flag to notations.
Diffstat (limited to 'printing')
| -rw-r--r-- | printing/ppvernac.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/printing/ppvernac.ml b/printing/ppvernac.ml index 10b2bda05..cd7434843 100644 --- a/printing/ppvernac.ml +++ b/printing/ppvernac.ml @@ -357,6 +357,7 @@ module Make | SetAssoc RightA -> keyword "right associativity" | SetAssoc NonA -> keyword "no associativity" | SetEntryType (x,typ) -> str x ++ spc() ++ pr_set_entry_type typ + | SetOnlyPrinting -> keyword "only printing" | SetOnlyParsing Flags.Current -> keyword "only parsing" | SetOnlyParsing v -> keyword("compat \"" ^ Flags.pr_version v ^ "\"") | SetFormat("text",s) -> keyword "format " ++ pr_located qs s |