diff options
| author | Pierre-Marie Pédrot | 2014-09-04 19:08:45 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2014-09-04 19:09:35 +0200 |
| commit | 7057e7e9ab1160fc0e176182b6e71f720784715a (patch) | |
| tree | 0e5a06b63243b3cbcbbaf6129095484181002094 /printing/printer.ml | |
| parent | 6828b31acdf10cf7987f0e494f6f7505a15b1000 (diff) | |
Revert the two previous commits. I was testing in the wrong branch.
Diffstat (limited to 'printing/printer.ml')
| -rw-r--r-- | printing/printer.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/printing/printer.ml b/printing/printer.ml index f105e8031c..8c7dbac334 100644 --- a/printing/printer.ml +++ b/printing/printer.ml @@ -663,6 +663,9 @@ let pr_prim_rule = function | Thin ids -> (str"clear " ++ pr_sequence pr_id ids) + | ThinBody ids -> + (str"clearbody " ++ pr_sequence pr_id ids) + | Move (withdep,id1,id2) -> (str (if withdep then "dependent " else "") ++ str"move " ++ pr_id id1 ++ Miscprint.pr_move_location pr_id id2) |