mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-05-01 17:24:34 +00:00
eafc1a1031
Estimated hours taken: 1
Branches: main
Fix some tests that fail in the decldebug grades.
tests/debugger/Mmakefile:
Don't run the tailrec1 test in decldebug grades, as the tail
recursion optimisation isn't supported in those grades.
tests/debugger/loopcheck.exp3:
Update an event number. Presumably this changed because of
changes to the standard library.
tests/debugger/declarative/condition_bug.exp:
tests/debugger/declarative/condition_bug.inp:
Break on stream.put/4 instead of io.write_string/4.
Don't expect context for put method calls.
tests/debugger/declarative/condition_bug.m:
Remove a comment that doesn't seem to apply anymore.
tests/debugger/declarative/solns.exp3:
tests/debugger/declarative/solns.inp3:
Fix the input and expected output for this test in the
decldebug grade.
46 lines
1.5 KiB
Plaintext
46 lines
1.5 KiB
Plaintext
E1: C1 CALL pred condition_bug.main/2-0 (det) condition_bug.m:14
|
|
mdb> mdb> echo on
|
|
Command echo enabled.
|
|
mdb> untrust 0
|
|
mdb> table_io start
|
|
I/O tabling started.
|
|
mdb> break stream.put/4
|
|
0: + stop interface pred stream.put/4-0 (det)
|
|
mdb> condition 2 = "english"
|
|
0: + stop interface pred stream.put/4-0 (det)
|
|
2 = "english"
|
|
mdb> continue
|
|
<?xml version="1.0"?>
|
|
<translations>
|
|
<word>
|
|
< E2: C2 CALL pred stream.put/4-0 (det) (term_to_xml.m:NNNN)
|
|
mdb> finish
|
|
english E3: C2 EXIT pred stream.put/4-0 (det) (term_to_xml.m:NNNN)
|
|
mdb> dd
|
|
put(stream(1, output, preopen, stdout), "english", _, state(c_pointer(0x1)))
|
|
1 tabled IO action:
|
|
write_string_2(stream(1, output, preopen, stdout), "english")
|
|
Valid? browse 2
|
|
browser> track
|
|
>critical</english>
|
|
<dutch>kritiek</dutch>
|
|
</word>
|
|
<word>
|
|
<english>mission</english>
|
|
<dutch>missie</dutch>
|
|
</word>
|
|
</translations>
|
|
|
|
translation_pairs_to_xml([-("critical", "kritiek"), -("mission", "missie")]) = [elem("word", [], [|]/2), elem("word", [], [|]/2)]
|
|
Valid? info
|
|
Context of current question : condition_bug.m:38 (condition_bug.m:33)
|
|
Search mode : top down
|
|
The current question was chosen because the marked subterm was bound by
|
|
the unification inside the function
|
|
condition_bug.translation_pairs_to_xml/2 (condition_bug.m:41). The path
|
|
to the subterm in the atom is 2/1/3/1/1.
|
|
dd> quit
|
|
Diagnosis aborted.
|
|
E3: C2 EXIT pred stream.put/4-0 (det) (term_to_xml.m:NNNN)
|
|
mdb> quit -y
|