diff options
| author | Damien Doligez <damien.doligez-inria.fr> | 2000-08-23 17:10:03 +0000 |
|---|---|---|
| committer | Damien Doligez <damien.doligez-inria.fr> | 2000-08-23 17:10:03 +0000 |
| commit | 3a43e16ae2c62b2ec0a8bcded8883b849d5b26bb (patch) | |
| tree | be9e24ff70fee6b2c61766371d5b80d08c8fa253 /byterun/debugger.c | |
| parent | 7f2c1ed367e24f2f78b20f3e0bf840633e3e3fb3 (diff) | |
ajout Weak.get_copy
Assert -> CAMLassert
suppression des conjonctions dans les Assert
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@3279 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'byterun/debugger.c')
| -rw-r--r-- | byterun/debugger.c | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/byterun/debugger.c b/byterun/debugger.c index 298642a67..8a41312a7 100644 --- a/byterun/debugger.c +++ b/byterun/debugger.c @@ -216,17 +216,20 @@ void debugger(enum event_kind event) switch(getch(dbg_in)) { case REQ_SET_EVENT: pos = getword(dbg_in); - Assert(pos >= 0 && pos < code_size); + Assert (pos >= 0); + Assert (pos < code_size); set_instruction(start_code + pos / sizeof(opcode_t), EVENT); break; case REQ_SET_BREAKPOINT: pos = getword(dbg_in); - Assert(pos >= 0 && pos < code_size); + Assert (pos >= 0); + Assert (pos < code_size); set_instruction(start_code + pos / sizeof(opcode_t), BREAK); break; case REQ_RESET_INSTR: pos = getword(dbg_in); - Assert(pos >= 0 && pos < code_size); + Assert (pos >= 0); + Assert (pos < code_size); pos = pos / sizeof(opcode_t); set_instruction(start_code + pos, saved_code[pos]); break; |