[
Home
]
[ Index:
by date
|
by threads
]
[ Message by date: previous | next ] [ Message in thread: previous | next ] [ Thread: previous | next ]
[ Message by date: previous | next ] [ Message in thread: previous | next ] [ Thread: previous | next ]
| Date: | -- (:) |
| From: | Jerome Vouillon <Jerome.Vouillon@i...> |
| Subject: | Re: Olabldebug on classes? |
Hello,
> Perhaps I am simply being a bit slow today, but I cannot seem to get
> olabldebug to print/display class instance variables, mutable or
> otherwise.
This is a bug of the debugger (it has not been kept up to date with
respect to the compiler). The following patch fixes this problem.
-- Jérôme
Index: debugger/eval.ml
===================================================================
RCS file: /net/pauillac/caml/repository/csl/debugger/eval.ml,v
retrieving revision 1.20
diff -u -r1.20 eval.ml
--- eval.ml 1998/08/03 13:51:08 1.20
+++ eval.ml 1999/02/22 15:20:24
@@ -71,8 +71,10 @@
begin try
let (p, valdesc) = Env.lookup_value lid env in
(begin match valdesc.val_kind with
- Val_ivar _ ->
- let (p0, _) = Env.lookup_value (Longident.Lident "*self*") env in
+ Val_ivar (_, cl_num) ->
+ let (p0, _) =
+ Env.lookup_value (Longident.Lident ("self-" ^ cl_num)) env
+ in
let v = path event p0 in
let i = path event p in
Debugcom.Remote_value.field v (Debugcom.Remote_value.obj i)