diff options
| author | Jacques Garrigue <garrigue at math.nagoya-u.ac.jp> | 2004-04-30 08:11:49 +0000 |
|---|---|---|
| committer | Jacques Garrigue <garrigue at math.nagoya-u.ac.jp> | 2004-04-30 08:11:49 +0000 |
| commit | 3ecf8cc06b42729d62bec0a3a4c6600e424efaae (patch) | |
| tree | 5138ce3dc6c893cbf0145a64e17275458157775c /parsing/printast.ml | |
| parent | b604afa0a2116024c7422d3d04cd8bdd9414723f (diff) | |
| download | ocaml-delegate.tar.gz | |
val ... with [private] {reader|writer|accessor}delegate
git-svn-id: http://caml.inria.fr/svn/ocaml/branches/delegate@6274 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'parsing/printast.ml')
| -rw-r--r-- | parsing/printast.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/printast.ml b/parsing/printast.ml index cc054c9970..edeb21dd4b 100644 --- a/parsing/printast.ml +++ b/parsing/printast.ml @@ -430,7 +430,7 @@ and class_field i ppf x = printf "Pcf_deleg\n"; core_type (i+1) ppf t; expression (i+1) ppf e; - | Pcf_val (s, mf, e, loc) -> + | Pcf_val (s, mf, _, e, loc) -> line i ppf "Pcf_val \"%s\" %a %a\n" s fmt_mutable_flag mf fmt_location loc; expression (i+1) ppf e; |