diff options
| -rw-r--r-- | byterun/debugger.c | 7 | ||||
| -rw-r--r-- | byterun/debugger.h | 3 |
2 files changed, 0 insertions, 10 deletions
diff --git a/byterun/debugger.c b/byterun/debugger.c index d615e485e..5f3c74a87 100644 --- a/byterun/debugger.c +++ b/byterun/debugger.c @@ -281,13 +281,6 @@ void debugger(event) putval(dbg_out, *extern_sp); flush(dbg_out); break; - case REQ_GET_OBJ: - val = getval(dbg_in); - putword(dbg_out, Hd_val(val)); - for (size = Wosize_val(val), p = &Field(val, 0); size > 0; size--, p++) - putval(dbg_out, *p); - flush(dbg_out); - break; case REQ_GET_HEADER: val = getval(dbg_in); putword(dbg_out, Hd_val(val)); diff --git a/byterun/debugger.h b/byterun/debugger.h index 3d2146111..2aeed9af2 100644 --- a/byterun/debugger.h +++ b/byterun/debugger.h @@ -73,9 +73,6 @@ enum debugger_request { /* Return the specified global variable. Reply is one value. */ REQ_GET_ACCU = 'A', /* no args */ /* Return the current contents of the accumulator. Reply is one value. */ - REQ_GET_OBJ = 'O', /* mlvalue v */ - /* Send the contents of the given value v. - Reply is one uint32 for the header, then N values for the fields. */ REQ_GET_HEADER = 'H', /* mlvalue v */ /* As REQ_GET_OBJ, but sends only the header. */ REQ_GET_FIELD = 'F', /* mlvalue v, uint32 fieldnum */ |