mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-17 18:33:58 +00:00
trace/mercury_trace_cmd_browsing.c:
The "level" command was documented to reset the current ancestor level
to the level of the current event (ancestor level 0) when invoked
without arguments, but when invoked that way, it reported an error
instead. Fix this.
tests/debugger/queens_rep.inp:
tests/debugger/queens_rep.exp:
Add a test for the fix in this existing test case.
21 lines
549 B
Plaintext
21 lines
549 B
Plaintext
1: 1 1 CALL pred queens_rep.main/2-0 (cc_multi) queens_rep.m:18
|
|
mdb> echo on
|
|
Command echo enabled.
|
|
mdb> context none
|
|
Contexts will not be printed.
|
|
mdb> goto 9
|
|
9: 5 4 DISJ pred queens_rep.qdelete/3-0 (nondet) c2;d1;
|
|
mdb> up
|
|
Ancestor level set to 1:
|
|
1 pred queens_rep.qperm/2-0 (nondet)
|
|
mdb> up 2
|
|
Ancestor level set to 3:
|
|
3 pred queens_rep.main/2-0 (cc_multi)
|
|
mdb> level
|
|
Ancestor level set to 0:
|
|
0 pred queens_rep.qdelete/3-0 (nondet)
|
|
mdb> print
|
|
qdelete(_, [1, 2, 3, 4, 5], _)
|
|
mdb> continue -n -S
|
|
[1, 3, 5, 2, 4]
|