mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-20 11:54:02 +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.
99 lines
4.1 KiB
Plaintext
99 lines
4.1 KiB
Plaintext
1: 1 1 CALL pred breakpoints:main/2-0 (cc_multi) breakpoints.m:17
|
|
mdb> echo on
|
|
Command echo enabled.
|
|
mdb> register --quiet
|
|
mdb> break data
|
|
Ambiguous procedure specification. The matches are:
|
|
0: pred breakpoints:data/1-0 (det)
|
|
1: func breakpoints:data/1-0 (det)
|
|
|
|
Which do you want to put a breakpoint on (0-1 or *)? *
|
|
0: + stop interface pred breakpoints:data/1-0 (det)
|
|
1: + stop interface func breakpoints:data/1-0 (det)
|
|
mdb> delete 0
|
|
0: E stop interface pred breakpoints:data/1-0 (det)
|
|
mdb> delete 1
|
|
1: E stop interface func breakpoints:data/1-0 (det)
|
|
mdb> break data
|
|
Ambiguous procedure specification. The matches are:
|
|
0: pred breakpoints:data/1-0 (det)
|
|
1: func breakpoints:data/1-0 (det)
|
|
|
|
Which do you want to put a breakpoint on (0-1 or *)? 0
|
|
0: + stop interface pred breakpoints:data/1-0 (det)
|
|
mdb> continue
|
|
3: 3 3 CALL pred breakpoints:data/1-0 (det) breakpoints.m:44 (breakpoints.m:42)
|
|
mdb> disable 0
|
|
0: - stop interface pred breakpoints:data/1-0 (det)
|
|
mdb> break info
|
|
0: - stop interface pred breakpoints:data/1-0 (det)
|
|
mdb> break qperm
|
|
1: + stop interface pred breakpoints:qperm/2-0 (nondet)
|
|
mdb> break safe
|
|
2: + stop interface pred breakpoints:safe/1-0 (semidet)
|
|
mdb> break -e qperm
|
|
3: + stop entry pred breakpoints:qperm/2-0 (nondet)
|
|
mdb> break -a qperm
|
|
4: + stop all pred breakpoints:qperm/2-0 (nondet)
|
|
mdb> break info
|
|
0: - stop interface pred breakpoints:data/1-0 (det)
|
|
1: + stop interface pred breakpoints:qperm/2-0 (nondet)
|
|
2: + stop interface pred breakpoints:safe/1-0 (semidet)
|
|
3: + stop entry pred breakpoints:qperm/2-0 (nondet)
|
|
4: + stop all pred breakpoints:qperm/2-0 (nondet)
|
|
mdb> delete 0
|
|
0: D stop interface pred breakpoints:data/1-0 (det)
|
|
mdb> break info
|
|
1: + stop interface pred breakpoints:qperm/2-0 (nondet)
|
|
2: + stop interface pred breakpoints:safe/1-0 (semidet)
|
|
3: + stop entry pred breakpoints:qperm/2-0 (nondet)
|
|
4: + stop all pred breakpoints:qperm/2-0 (nondet)
|
|
mdb> disable 3
|
|
3: - stop entry pred breakpoints:qperm/2-0 (nondet)
|
|
mdb> break nodiag
|
|
0: + stop interface pred breakpoints:nodiag/3-0 (semidet)
|
|
mdb> continue
|
|
7: 5 3 CALL pred breakpoints:qperm/2-0 (nondet) breakpoints.m:50 (breakpoints.m:47)
|
|
mdb> continue
|
|
8: 5 3 SWTC pred breakpoints:qperm/2-0 (nondet) s2; breakpoints.m:51
|
|
mdb> finish -N
|
|
12: 7 4 CALL pred breakpoints:qperm/2-0 (nondet) breakpoints.m:50 (breakpoints.m:54)
|
|
mdb> finish -n
|
|
38: 7 4 EXIT pred breakpoints:qperm/2-0 (nondet) breakpoints.m:50 (breakpoints.m:54)
|
|
mdb> continue
|
|
39: 5 3 EXIT pred breakpoints:qperm/2-0 (nondet) breakpoints.m:50 (breakpoints.m:47)
|
|
mdb> continue
|
|
40: 16 3 CALL pred breakpoints:safe/1-0 (semidet) breakpoints.m:60 (breakpoints.m:48)
|
|
mdb> finish
|
|
42: 17 4 CALL pred breakpoints:nodiag/3-0 (semidet) breakpoints.m:65 (breakpoints.m:62)
|
|
45: 17 4 FAIL pred breakpoints:nodiag/3-0 (semidet) breakpoints.m:65 (breakpoints.m:62)
|
|
46: 16 3 FAIL pred breakpoints:safe/1-0 (semidet) breakpoints.m:60 (breakpoints.m:48)
|
|
mdb> delete *
|
|
0: E stop interface pred breakpoints:nodiag/3-0 (semidet)
|
|
1: E stop interface pred breakpoints:qperm/2-0 (nondet)
|
|
2: E stop interface pred breakpoints:safe/1-0 (semidet)
|
|
3: D stop entry pred breakpoints:qperm/2-0 (nondet)
|
|
4: E stop all pred breakpoints:qperm/2-0 (nondet)
|
|
mdb> break info
|
|
There are no break points.
|
|
mdb> delete *
|
|
There are no break points.
|
|
mdb> break -i -I3 qperm
|
|
0: + stop interface pred breakpoints:qperm/2-0 (nondet)
|
|
(ignore next 3 interface events)
|
|
mdb> continue
|
|
50: 11 6 REDO pred breakpoints:qperm/2-0 (nondet) breakpoints.m:50 (breakpoints.m:54)
|
|
mdb> print *
|
|
HeadVar__1 [4, 5]
|
|
mdb> ignore -E4 0
|
|
0: + stop interface pred breakpoints:qperm/2-0 (nondet)
|
|
(ignore next 4 call events)
|
|
mdb> continue
|
|
123: 32 8 CALL pred breakpoints:qperm/2-0 (nondet) breakpoints.m:50 (breakpoints.m:54)
|
|
mdb> print *
|
|
HeadVar__1 []
|
|
mdb> delete *
|
|
0: E stop interface pred breakpoints:qperm/2-0 (nondet)
|
|
mdb> continue
|
|
[1, 3, 5, 2, 4]
|