aboutsummaryrefslogtreecommitdiff
path: root/plugins/extraction
diff options
context:
space:
mode:
authorHugo Herbelin2020-10-05 22:21:04 +0200
committerHugo Herbelin2020-10-08 23:47:14 +0200
commitdb278921c54201a01543953cc0986fc0fb126615 (patch)
tree70115f7e9365b34c4464affbb9a8cf71a925317c /plugins/extraction
parente18ed350f7b5710c382ea1306e7b1e7e2fb0c9f8 (diff)
Dropping the misleading int argument of Pp.h.
An h-box inhibits the breaking semantics of any cut/spc/brk in the enclosed box. We tentatively replace its occurrence by an h or hv, assuming in particular that if the indentation is not 0, an hv box was intended.
Diffstat (limited to 'plugins/extraction')
-rw-r--r--plugins/extraction/scheme.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/extraction/scheme.ml b/plugins/extraction/scheme.ml
index ee50476b10..f671860bd5 100644
--- a/plugins/extraction/scheme.ml
+++ b/plugins/extraction/scheme.ml
@@ -28,7 +28,7 @@ let keywords =
"error"; "delay"; "force"; "_"; "__"]
Id.Set.empty
-let pp_comment s = str";; "++h 0 s++fnl ()
+let pp_comment s = str ";; " ++ h s ++ fnl ()
let pp_header_comment = function
| None -> mt ()