mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-05-01 17:24:34 +00:00
136cae8302
Estimated hours taken: 1 Branches: main Fix some debugger test cases failing in grade decldebug because the library is deep traced in that grade. tests/debugger/Mmakefile Set INP variable to inp2 for decldebug grade, so loopcheck can have different input in this grade. tests/debugger/all_solutions.exp4 tests/debugger/exception_cmd.exp3 tests/debugger/print_table.exp3 tests/debugger/retry.exp3 New expected outputs with the only differences the event and depth number of some events. tests/debugger/exception_value.exp3 This expected output had its print format set to verbose for some reason, so overwrote this expected output with new output with flat format (the default) and new depth/event numbers for decldebug grade. tests/debugger/polymorphic_output.exp3 This expected output still used the non-standardized event printing, even though the test is run with standardized event printing. So replaced this expected outout file with the decldebug expected output. tests/debugger/loopcheck.exp3 tests/debugger/loopcheck.inp2 Add new input that only prints events in loopcheck module, otherwise there are just way too many events printed.
28 lines
884 B
Plaintext
28 lines
884 B
Plaintext
E1: C1 1 CALL pred exception_value.main/2-0 (cc_multi) exception_value.m:12
|
|
mdb> echo on
|
|
Command echo enabled.
|
|
mdb> register --quiet
|
|
mdb> break p
|
|
0: + stop interface pred exception_value.p/1-0 (det)
|
|
mdb> break q
|
|
1: + stop interface pred exception_value.q/1-0 (det)
|
|
mdb> continue
|
|
E2: C2 8 CALL pred exception_value.p/1-0 (det) exception_value.m:30 (exception.m:NNNN)
|
|
mdb> finish
|
|
E3: C2 8 EXCP pred exception_value.p/1-0 (det)
|
|
mdb> print exception
|
|
"p exception"
|
|
mdb> continue
|
|
exception(univ_cons("p exception"))
|
|
E4: C3 8 CALL pred exception_value.q/1-0 (det) exception_value.m:35 (exception.m:NNNN)
|
|
mdb> finish
|
|
E5: C3 8 EXCP pred exception_value.q/1-0 (det)
|
|
mdb> browse exception
|
|
browser> set depth 9
|
|
browser> set size 99
|
|
browser> ls
|
|
"q oops" - [1, 2, 3]
|
|
browser> quit
|
|
mdb> continue
|
|
exception(univ_cons("q oops" - [1, 2, 3]))
|