mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-15 17:33:38 +00:00
tests/declarative_debugger/*.m:
tests/exceptions/*.m:
tests/general/*.m:
tests/grade_subdirs/*.m:
tests/purity/*.m:
tests/submodules/*.m:
tests/typeclasses/*.m:
Update programming style.
tests/declarative_debugger/*.inp:
Update line numbers in breakpoint commands.
tests/declarative_debugger/*.exp:
Update expected line numbers.
tests/exceptions/Mercury.options:
tests/general/Mercury.options:
Disable some warnings that are irrelevant to the test.
37 lines
864 B
Plaintext
37 lines
864 B
Plaintext
1: 1 1 CALL pred oracle_db.main/2-0 (det) oracle_db.m:13
|
|
mdb> echo on
|
|
Command echo enabled.
|
|
mdb> register --quiet
|
|
mdb> break a
|
|
0: + stop interface pred oracle_db.a/3-0 (semidet)
|
|
mdb> continue
|
|
3: 2 2 CALL pred oracle_db.a/3-0 (semidet) oracle_db.m:22 (oracle_db.m:14)
|
|
mdb> finish
|
|
10: 2 2 EXIT pred oracle_db.a/3-0 (semidet) oracle_db.m:22 (oracle_db.m:14)
|
|
mdb> dd -d 3 -n 7
|
|
a(99, 99, 99)
|
|
Valid? no
|
|
b(99)
|
|
Valid? yes
|
|
Found incorrect contour:
|
|
b(99)
|
|
b(99)
|
|
b(99)
|
|
a(99, 99, 99)
|
|
Is this a bug? yes
|
|
10: 2 2 EXIT pred oracle_db.a/3-0 (semidet) oracle_db.m:22 (oracle_db.m:14)
|
|
mdb> dd -R
|
|
a(99, 99, 99)
|
|
Valid? [no] no
|
|
b(99)
|
|
Valid? [yes] yes
|
|
Found incorrect contour:
|
|
b(99)
|
|
b(99)
|
|
b(99)
|
|
a(99, 99, 99)
|
|
Is this a bug? yes
|
|
10: 2 2 EXIT pred oracle_db.a/3-0 (semidet) oracle_db.m:22 (oracle_db.m:14)
|
|
mdb> continue
|
|
yes.
|