mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-23 13:23:47 +00:00
81f7dfb4c1
Estimated hours taken: 0.5 tests/invalid: Add some more tests. Also add an `Mmake' file. Currently it just checks that each file fails to compile, i.e. that `mc --errorcheck-only' returns a non-zero exit status. It doesn't check the error messages.
19 lines
265 B
Mathematica
19 lines
265 B
Mathematica
:- export_sym list/1, append/3, member.
|
|
:- export_pred append/3, member.
|
|
:- export_type list/1, bag.
|
|
|
|
fact.
|
|
rule :- fact.
|
|
|
|
:- incorrect_declaration.
|
|
|
|
:- pred p(t1).
|
|
p(a).
|
|
p(X) :- X = b.
|
|
|
|
:- type t1 ---> a ; b ; c.
|
|
:- type t2 ---> c ; d ; e.
|
|
:- type t3 = t1 + t2.
|
|
|
|
|