diff options
| author | Alain Frisch <alain@frisch.fr> | 2009-10-26 10:53:16 +0000 |
|---|---|---|
| committer | Alain Frisch <alain@frisch.fr> | 2009-10-26 10:53:16 +0000 |
| commit | 1e5b4a48572ec2a06d6f732e7da443fa720425bd (patch) | |
| tree | 9bdaec60181fc5ce87c5a5785fe0c71c3872eb22 /toplevel | |
| parent | 023fda3fb4151d12c029890bf689ec8d13a7f2bb (diff) | |
| download | ocaml-1e5b4a48572ec2a06d6f732e7da443fa720425bd.tar.gz | |
Merge first class modules: svn merge -r 9369:9396 $caml/branches/fstclassmod.
Adapt the Changes file. Bump magic numbers. Bootstrap.
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@9397 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'toplevel')
| -rw-r--r-- | toplevel/genprintval.ml | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/toplevel/genprintval.ml b/toplevel/genprintval.ml index 1a16bc80ce..3277004006 100644 --- a/toplevel/genprintval.ml +++ b/toplevel/genprintval.ml @@ -320,6 +320,8 @@ module Make(O : OBJ)(EVP : EVALPATH with type value = O.t) = struct tree_of_val (depth - 1) obj ty | Tunivar -> Oval_stuff "<poly>" + | Tpackage _ -> + Oval_stuff "<module>" end and tree_of_val_list start depth obj ty_list = |