diff options
| -rw-r--r-- | camlp4/camlp4/pcaml.ml | 2 | ||||
| -rw-r--r-- | camlp4/ocaml_src/camlp4/pcaml.ml | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/camlp4/camlp4/pcaml.ml b/camlp4/camlp4/pcaml.ml index 8c139c9d5..2a3dbc66b 100644 --- a/camlp4/camlp4/pcaml.ml +++ b/camlp4/camlp4/pcaml.ml @@ -373,7 +373,7 @@ value pr_fun name pr lab = ; pr_str_item.pr_fun := pr_fun "str_item" pr_str_item; -pr_sig_item.pr_fun := pr_fun "str_item" pr_sig_item; +pr_sig_item.pr_fun := pr_fun "sig_item" pr_sig_item; pr_expr.pr_fun := pr_fun "expr" pr_expr; pr_patt.pr_fun := pr_fun "patt" pr_patt; diff --git a/camlp4/ocaml_src/camlp4/pcaml.ml b/camlp4/ocaml_src/camlp4/pcaml.ml index 611582739..99a8aa127 100644 --- a/camlp4/ocaml_src/camlp4/pcaml.ml +++ b/camlp4/ocaml_src/camlp4/pcaml.ml @@ -377,7 +377,7 @@ let pr_fun name pr lab = ;; pr_str_item.pr_fun <- pr_fun "str_item" pr_str_item;; -pr_sig_item.pr_fun <- pr_fun "str_item" pr_sig_item;; +pr_sig_item.pr_fun <- pr_fun "sig_item" pr_sig_item;; pr_expr.pr_fun <- pr_fun "expr" pr_expr;; pr_patt.pr_fun <- pr_fun "patt" pr_patt;; |