Files
mercury/tests/invalid_nodepend/bad_foreign_import_module.m
Zoltan Somogyi 6413b4fb08 Create invalid_nodepend and invalid_onlydepend.
tests/invalid_onlydepend:
    Move the one test case in tests/invalid for which we want to check
    the error messages generated during the generation of dependencies
    to this new test directory.

tests/invalid_nodepend:
    Move all test cases in tests/invalid which get errors during the
    generation of dependencies but for which we want to check the error
    messages generated during normal compilation to this new test directory.

tests/invalid_nodepend/Mmakefile:
tests/invalid_nodepend/Mercury.options:
tests/invalid_onlydepend/Mmakefile:
tests/invalid_onlydepend/Mercury.options:
    Versions of the same files in tests/invalid, but containing only
    the entries relevant to the moved test cases.

tests/invalid/Mmakefile:
tests/invalid/Mercury.options:
    Delete the entries that refer to the moved test cases.

tests/README:
    Document the two new test directories.

tools/bootcheck:
    Add invalid_onlydepend and invalid_nodepend to the list of
    test directories.
2021-07-28 00:59:04 +10:00

32 lines
773 B
Mathematica

%---------------------------------------------------------------------------%
% vim: ft=mercury ts=4 sw=4 et wm=0 tw=0
%---------------------------------------------------------------------------%
%
% Test for error messages produced by syntax errors in 'foreign_import_module'
% pragmas.
%
:- module bad_foreign_import_module.
:- interface.
:- type foo ---> foo.
:- implementation.
% Incorrect number of arguments.
%
:- pragma foreign_import_module("C").
% Invalid foreign language.
%
:- pragma foreign_import_module("InvalidForeignLang", int).
% Check that contexts for the language and import term are correct.
%
:- pragma foreign_import_module(
"InvalidForeignLang",
int(int)
).
:- pragma foreign_import_module("Erlang", int).