diff options
| author | Pierre-Marie Pédrot | 2015-12-21 00:38:00 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2015-12-21 19:36:38 +0100 |
| commit | 44ac395761d6b46866823b89addaea0ab45f4ebc (patch) | |
| tree | 36b9a02321e6cdc0bf978a54066e96636e820abd /dev | |
| parent | 5835804bd69a193b9ea29b6d4c8d0cc03530ccdd (diff) | |
Finer-grained types for toplevel values.
Diffstat (limited to 'dev')
| -rw-r--r-- | dev/top_printers.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/dev/top_printers.ml b/dev/top_printers.ml index 20c8f690bd..0894e0378d 100644 --- a/dev/top_printers.ml +++ b/dev/top_printers.ml @@ -468,7 +468,7 @@ let pp_generic_argument arg = let prgenarginfo arg = let Val.Dyn (tag, _) = arg in - let tpe = str (Val.repr tag) in + let tpe = Val.repr tag in (** FIXME *) (* try *) (* let data = Pptactic.pr_top_generic (Global.env ()) arg in *) |