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.
44 lines
855 B
Plaintext
44 lines
855 B
Plaintext
1: 1 1 CALL pred browse_arg.main/2-0 (det) browse_arg.m:13
|
|
mdb> echo on
|
|
Command echo enabled.
|
|
mdb> register --quiet
|
|
mdb> break p
|
|
0: + stop interface pred browse_arg.p/2-0 (det)
|
|
mdb> continue
|
|
2: 2 2 CALL pred browse_arg.p/2-0 (det) browse_arg.m:23 (browse_arg.m:14)
|
|
mdb> finish
|
|
3: 2 2 EXIT pred browse_arg.p/2-0 (det) browse_arg.m:23 (browse_arg.m:14)
|
|
mdb> format_param depth 10
|
|
mdb> dd -d 3 -n 7
|
|
p(1, baz(1, bar))
|
|
Valid? browse 2
|
|
browser> ls
|
|
baz(1, bar)
|
|
browser> quit
|
|
dd> format verbose
|
|
dd> print
|
|
p
|
|
1-1
|
|
2-baz
|
|
1-1
|
|
2-bar
|
|
|
|
Valid? format -B pretty
|
|
dd> p
|
|
p
|
|
1-1
|
|
2-baz
|
|
1-1
|
|
2-bar
|
|
|
|
Valid? format -P pretty
|
|
dd> p
|
|
p(1, baz(1, bar))
|
|
Valid? no
|
|
Found incorrect contour:
|
|
p(1, baz(1, bar))
|
|
Is this a bug? yes
|
|
3: 2 2 EXIT pred browse_arg.p/2-0 (det) browse_arg.m:23 (browse_arg.m:14)
|
|
mdb> continue
|
|
baz(1, bar)
|