mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-05-01 09:14:08 +00:00
43fffc2395
runtime/mercury.h
As above. This fixes Mantis bug #380.
Convert this module to four-space indentation.
tests/valid/bug380.m:
Peter's test case for the bug.
tests/valid/Mmakefile:
Enable the new test case.
42 lines
792 B
Mathematica
42 lines
792 B
Mathematica
%---------------------------------------------------------------------------%
|
|
% vim: ts=4 sw=4 et ft=mercury
|
|
%---------------------------------------------------------------------------%
|
|
|
|
:- module bug380.
|
|
:- interface.
|
|
|
|
:- pred word(string).
|
|
:- mode word(in) is semidet.
|
|
:- mode word(out) is multi.
|
|
|
|
:- implementation.
|
|
|
|
% :- import_module string.
|
|
|
|
word("aback").
|
|
word("abaft").
|
|
word("abandon").
|
|
word("abandoned").
|
|
word("abandoning").
|
|
word("abandonment").
|
|
word("abandons").
|
|
word("abase").
|
|
word("abased").
|
|
word("abasement").
|
|
word("abasements").
|
|
word("abases").
|
|
word("abash").
|
|
word("abashed").
|
|
word("abashes").
|
|
word("abashing").
|
|
word("abasing").
|
|
word("abate").
|
|
word("abated").
|
|
word("abatement").
|
|
word("abatements").
|
|
word("abater").
|
|
word("abates").
|
|
word("abating").
|
|
word("abbe").
|
|
word("abbey").
|