mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-16 18:03:36 +00:00
cb8c73c592
tests/declarative_debugger/catch.exp2:
tests/declarative_debugger/catch.exp3:
tests/declarative_debugger/find_origin.exp2:
tests/declarative_debugger/func_call.exp2:
tests/declarative_debugger/gcf.exp2:
tests/declarative_debugger/ho5.exp2:
tests/declarative_debugger/neg_conj.exp2:
tests/declarative_debugger/solns.exp2:
tests/declarative_debugger/throw.exp2:
Update .exp2 files for line number changes after recent updates
to source files.
For the catch test case, swap the .exp2 and .exp3 files first,
because it looks like the old .exp2, which is the new .exp3,
is so old that it is probably not an expected output for any
grade/options combination, and thus should be a candidate for deletion.
tests/declarative_debugger/find_origin.m:
Improve a comment,
tests/declarative_debugger/catch.m:
Delete blank last line.
36 lines
1.1 KiB
Plaintext
36 lines
1.1 KiB
Plaintext
E1: C1 CALL pred catch.main/2-0 (cc_multi) catch.m:8
|
|
mdb> echo on
|
|
Command echo enabled.
|
|
mdb> register --quiet
|
|
mdb> break p
|
|
0: + stop interface pred catch.p/2-0 (cc_multi)
|
|
mdb> continue
|
|
E2: C2 CALL pred catch.p/2-0 (cc_multi) catch.m:18 (catch.m:9)
|
|
mdb> finish
|
|
E3: C2 EXIT pred catch.p/2-0 (cc_multi) catch.m:18 (catch.m:9)
|
|
mdb> dd -d 3 -n 7
|
|
p(1, exception(univ_cons("q: bad input")))
|
|
Valid? no
|
|
Sorry, the diagnosis cannot continue because it requires support for
|
|
the following: code that catches exceptions.
|
|
The debugger is a work in progress, and this is not supported in the
|
|
current version.
|
|
E3: C2 EXIT pred catch.p/2-0 (cc_multi) catch.m:18 (catch.m:9)
|
|
mdb> continue
|
|
exception(univ_cons("q: bad input"))
|
|
E4: C3 CALL pred catch.p/2-0 (cc_multi) catch.m:18 (catch.m:12)
|
|
mdb> finish
|
|
E5: C3 EXIT pred catch.p/2-0 (cc_multi) catch.m:18 (catch.m:12)
|
|
mdb> dd -d 3 -n 7
|
|
p(2, succeeded(2))
|
|
Valid? no
|
|
q(2, 2)
|
|
Valid? yes
|
|
Found incorrect contour:
|
|
try(q(2), succeeded(2))
|
|
p(2, succeeded(2))
|
|
Is this a bug? yes
|
|
E5: C3 EXIT pred catch.p/2-0 (cc_multi) catch.m:18 (catch.m:12)
|
|
mdb> continue
|
|
succeeded(2)
|