mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-05-01 17:24:34 +00:00
9578ff16bb
Estimated hours taken: 2.5
Alter the `dd' command in mdb so that it does not assume that the answer
to the first question asked is `no'. The question is somewhat redundant,
since the only sensible answer is `no', but I find that it gives useful
feedback about the symptom that is being diagnosed, and it makes clearer
why the following questions are asked.
browser/declarative_analyser.m:
Start analysis with a list of suspects which contains only the
topmost node of the debugging tree.
browser/declarative_debugger.m:
If the answer to the first question is something other than `no',
then end the diagnosis and report that no bugs were found.
tests/debugger/declarative/*.{inp,exp,exp2}:
Update test cases to handle the extra question.
32 lines
682 B
Plaintext
32 lines
682 B
Plaintext
1: 1 1 CALL pred backtrack:main/2-0 (det) backtrack.m:8
|
|
mdb> echo on
|
|
Command echo enabled.
|
|
mdb> register --quiet
|
|
mdb> break p
|
|
0: + stop interface pred backtrack:p/2-0 (det)
|
|
mdb> continue
|
|
2: 2 2 CALL pred backtrack:p/2-0 (det) backtrack.m:23 (backtrack.m:9)
|
|
mdb> finish
|
|
17: 2 2 EXIT pred backtrack:p/2-0 (det) backtrack.m:23 (backtrack.m:9)
|
|
mdb> dd
|
|
p(1, no)
|
|
Valid? no
|
|
q(1, 1)
|
|
Valid? yes
|
|
q(1, 2)
|
|
Valid? yes
|
|
q(1, 3)
|
|
Valid? yes
|
|
Call q(1, _)
|
|
Solutions:
|
|
q(1, 1)
|
|
q(1, 2)
|
|
q(1, 3)
|
|
Complete? yes
|
|
Found incorrect contour:
|
|
p(1, no)
|
|
Is this a bug? yes
|
|
17: 2 2 EXIT pred backtrack:p/2-0 (det) backtrack.m:23 (backtrack.m:9)
|
|
mdb> continue
|
|
no
|