mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-24 13:53:54 +00:00
5544aed7ff
Estimated hours taken: 3
Branches: main
Change the list constructor from `./2' to `[|]/2'. `./2' will
eventually become the module qualification operator.
library/parser.m:
library/io.m:
library/sparse_bitset.m:
library/std_util.m:
library/term_io.m:
compiler/mercury_to_mercury.m:
compiler/prog_io_dcg.m:
compiler/prog_io_goal.m:
compiler/prog_io_pragma.m:
compiler/prog_io_typeclass.m:
compiler/prog_io_util.m:
browser/interactive_query.m:
extras/moose/grammar.m:
extras/moose/moose.m:
extras/morphine/source/generate_call_site_cov.m:
extras/xml/xml.encoding.m:
samples/muz/higher_order.m:
tests/debugger/declarative/app.m:
tests/dppd/transpose_impl.m:
tests/hard_coded/ground_dd.m:
tests/hard_coded/split_c_files.m:
Change all references to `./2' to use `[|]/2' instead.
compiler/typecheck.m:
Handle `./2' as a special case in `report_error_undef_cons'.
Warn about module list not being imported if `[|]/2' is undefined.
compiler/llds_out.m:
util/mdemangle.c:
profiler/demangle.m:
Add name conversions for `[|]' (f_cons) and `[]' (f_nil).
NEWS:
doc/reference_manual.texi:
w3/tutorial/lists-n-things.m4:
Document the changes.
tests/debugger/{,declarative}/*.exp*:
Update test case results. For some tests the output changed
because they output lists in the non-pretty format. For others,
the output changed because the alphabetical ordering of the
constructors of type `list/1' changed, so the numbering of
the switch branches in the goal paths changed.
125 lines
2.9 KiB
Plaintext
125 lines
2.9 KiB
Plaintext
1: 1 1 CALL pred app:main/2-0 (det) app.m:10
|
|
mdb> echo on
|
|
Command echo enabled.
|
|
mdb> register --quiet
|
|
mdb> break app
|
|
0: + stop interface pred app:app/3-0 (det)
|
|
mdb> continue
|
|
2: 2 2 CALL pred app:app/3-0 (det) app.m:26 (app.m:13)
|
|
mdb> continue
|
|
4: 3 3 CALL pred app:app/3-0 (det) app.m:26 (app.m:28)
|
|
mdb> continue
|
|
6: 4 4 CALL pred app:app/3-0 (det) app.m:26 (app.m:28)
|
|
mdb> continue
|
|
8: 5 5 CALL pred app:app/3-0 (det) app.m:26 (app.m:28)
|
|
mdb> finish -n
|
|
16: 5 5 EXIT pred app:app/3-0 (det) app.m:26 (app.m:28)
|
|
mdb> dd
|
|
pred app
|
|
[4, 5]
|
|
[6, 7, 8]
|
|
[4, 5, 6, 7, 8]
|
|
Valid? yes
|
|
No bug found.
|
|
16: 5 5 EXIT pred app:app/3-0 (det) app.m:26 (app.m:28)
|
|
mdb> continue
|
|
17: 4 4 EXIT pred app:app/3-0 (det) app.m:26 (app.m:28)
|
|
mdb> continue
|
|
18: 3 3 EXIT pred app:app/3-0 (det) app.m:26 (app.m:28)
|
|
mdb> continue
|
|
19: 2 2 EXIT pred app:app/3-0 (det) app.m:26 (app.m:13)
|
|
mdb> dd
|
|
pred app
|
|
[1, 2, 3, 4, 5]
|
|
[6, 7, 8]
|
|
[|](1, [|](2, [|](3, [|]/2)))
|
|
Valid? no
|
|
pred app
|
|
[2, 3, 4, 5]
|
|
[6, 7, 8]
|
|
[2, 3, 4, 5, 6, 7, 8]
|
|
Valid? no
|
|
pred app
|
|
[3, 4, 5]
|
|
[6, 7, 8]
|
|
[3, 4, 5, 6, 7, 8]
|
|
Valid? no
|
|
Found incorrect contour:
|
|
pred app
|
|
[3, 4, 5]
|
|
[6, 7, 8]
|
|
[3, 4, 5, 6, 7, 8]
|
|
Is this a bug? yes
|
|
17: 4 4 EXIT pred app:app/3-0 (det) app.m:26 (app.m:28)
|
|
mdb> continue
|
|
18: 3 3 EXIT pred app:app/3-0 (det) app.m:26 (app.m:28)
|
|
mdb> continue
|
|
19: 2 2 EXIT pred app:app/3-0 (det) app.m:26 (app.m:13)
|
|
mdb> continue
|
|
append([1, 2, 3, 4, 5], [6, 7, 8], [1, 2, 3, 4, 5, 6, 7, 8]).
|
|
20: 8 2 CALL pred app:app/3-0 (det) app.m:26 (app.m:18)
|
|
mdb> finish -n
|
|
67: 8 2 EXIT pred app:app/3-0 (det) app.m:26 (app.m:18)
|
|
mdb> dd
|
|
pred app
|
|
[|](1, [|](2, [|](3, [|]/2)))
|
|
[6, 7, 8]
|
|
[|](1, [|](2, [|](3, [|]/2)))
|
|
Valid? no
|
|
pred app
|
|
[|](2, [|](3, [|](4, [|]/2)))
|
|
[6, 7, 8]
|
|
[|](2, [|](3, [|](4, [|]/2)))
|
|
Valid? no
|
|
pred app
|
|
[|](3, [|](4, [|](5, [|]/2)))
|
|
[6, 7, 8]
|
|
[|](3, [|](4, [|](5, [|]/2)))
|
|
Valid? no
|
|
pred app
|
|
[|](4, [|](5, [|](6, [|]/2)))
|
|
[6, 7, 8]
|
|
[|](4, [|](5, [|](6, [|]/2)))
|
|
Valid? no
|
|
pred app
|
|
[|](5, [|](6, [|](7, [|]/2)))
|
|
[6, 7, 8]
|
|
[|](5, [|](6, [|](7, [|]/2)))
|
|
Valid? no
|
|
pred app
|
|
[|](6, [|](7, [|](8, [|]/2)))
|
|
[6, 7, 8]
|
|
[|](6, [|](7, [|](8, [|]/2)))
|
|
Valid? no
|
|
pred app
|
|
[|](7, [|](8, [|](9, [|]/2)))
|
|
[6, 7, 8]
|
|
[|](7, [|](8, [|](9, [|]/2)))
|
|
Valid? no
|
|
pred app
|
|
[|](8, [|](9, [|](0, [|]/2)))
|
|
[6, 7, 8]
|
|
[|](8, [|](9, [|](0, [|]/2)))
|
|
Valid? no
|
|
pred app
|
|
[9, 0, 1, 2, 3, 4, 5]
|
|
[6, 7, 8]
|
|
[|](9, [|](0, [|](1, [|]/2)))
|
|
Valid? no
|
|
pred app
|
|
[0, 1, 2, 3, 4, 5]
|
|
[6, 7, 8]
|
|
[|](0, [|](1, [|](2, [|]/2)))
|
|
Valid? no
|
|
Found incorrect contour:
|
|
pred app
|
|
[3, 4, 5]
|
|
[6, 7, 8]
|
|
[3, 4, 5, 6, 7, 8]
|
|
Is this a bug? yes
|
|
55: 20 14 EXIT pred app:app/3-0 (det) app.m:26 (app.m:28)
|
|
mdb> continue
|
|
56: 19 13 EXIT pred app:app/3-0 (det) app.m:26 (app.m:28)
|
|
mdb> quit
|
|
mdb: are you sure you want to quit? y
|