diff options
| author | Thomas Refis <thomas.refis@gmail.com> | 2018-08-28 17:07:01 +0100 |
|---|---|---|
| committer | Thomas Refis <thomas.refis@gmail.com> | 2018-09-21 11:47:44 -0400 |
| commit | b134588f285c3a82b749f68911d1a23d9b5086e3 (patch) | |
| tree | 511d3427a518f05ffbba896faa7c239e96f2b34c /debugger/eval.ml | |
| parent | 686961f03253e6f6060ffe67556bf7b2c79bfc6b (diff) | |
| download | ocaml-b134588f285c3a82b749f68911d1a23d9b5086e3.tar.gz | |
ident: split Local into Local and Scoped
Also rename [create] into [create_scoped] and [create_var] into
[create_local].
Diffstat (limited to 'debugger/eval.ml')
| -rw-r--r-- | debugger/eval.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/debugger/eval.ml b/debugger/eval.ml index 7190209d85..a90487a399 100644 --- a/debugger/eval.ml +++ b/debugger/eval.ml @@ -39,7 +39,8 @@ exception Error of error let abstract_type = Btype.newgenty ( Tconstr - (Pident (Ident.create ~scope:Btype.lowest_level "<abstr>"), [], ref Mnil) + (Pident ( + Ident.create_scoped ~scope:Btype.lowest_level "<abstr>"), [], ref Mnil) ) let rec path event = function |