mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-28 15:54:18 +00:00
7000b89a1f
Estimated hours taken: 0.4 Branches: main tests/debugger/declarative/Mmakefile: tests/debugger/declarative/ho5.exp: tests/debugger/declarative/ho5.exp2: tests/debugger/declarative/throw.exp: tests/debugger/declarative/throw.exp2: Use standardised mdb output for these test cases. The event numbers had become incorrect in the decldebug grade, presumably because something in the library was changed.
54 lines
1.4 KiB
Plaintext
54 lines
1.4 KiB
Plaintext
E1: C1 CALL pred throw.main/2-0 (cc_multi) throw.m:10
|
|
mdb> echo on
|
|
Command echo enabled.
|
|
mdb> register --quiet
|
|
mdb> break p
|
|
0: + stop interface pred throw.p/1-0 (cc_nondet)
|
|
mdb> break q
|
|
1: + stop interface pred throw.q/1-0 (semidet)
|
|
mdb> continue
|
|
E2: C2 CALL pred throw.p/1-0 (cc_nondet) throw.m:20
|
|
mdb> finish
|
|
E3: C2 EXCP pred throw.p/1-0 (cc_nondet) q!;c2; throw.m:22
|
|
mdb> dd -d 3 -n 7
|
|
Call p(_)
|
|
Throws "Too big"
|
|
Expected? no
|
|
a(3)
|
|
Valid? yes
|
|
Call b(3, _)
|
|
Throws "Too big"
|
|
Expected? yes
|
|
Found unhandled or incorrect exception:
|
|
p(_)
|
|
"Too big"
|
|
Is this a bug? yes
|
|
E3: C2 EXCP pred throw.p/1-0 (cc_nondet) q!;c2; throw.m:22
|
|
mdb> continue
|
|
mdb: warning: reached unknown label
|
|
This may result in some exception events
|
|
being omitted from the trace.
|
|
exception(univ_cons("Too big"))
|
|
E4: C3 CALL pred throw.q/1-0 (semidet) throw.m:48
|
|
mdb> finish
|
|
E5: C3 EXCP pred throw.q/1-0 (semidet) c2;~;q!;c2;~;q!;c2; throw.m:52
|
|
mdb> dd -d 3 -n 7
|
|
Call q(_)
|
|
Throws "Too big"
|
|
Expected? no
|
|
a2(3)
|
|
Valid? yes
|
|
Call b2(3, _)
|
|
Throws "Too big"
|
|
Expected? yes
|
|
Found unhandled or incorrect exception:
|
|
q(_)
|
|
"Too big"
|
|
Is this a bug? yes
|
|
E5: C3 EXCP pred throw.q/1-0 (semidet) c2;~;q!;c2;~;q!;c2; throw.m:52
|
|
mdb> continue
|
|
mdb: warning: reached unknown label
|
|
This may result in some exception events
|
|
being omitted from the trace.
|
|
exception(univ_cons("Too big"))
|