Version française
Home     About     Download     Resources     Contact us    
Browse thread
Olabldebug on classes?
[ Home ] [ Index: by date | by threads ]
[ Search: ]

[ 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)