mirror of
https://github.com/Mercury-Language/mercury.git
synced 2025-12-14 13:23:53 +00:00
94 lines
2.5 KiB
Matlab
94 lines
2.5 KiB
Matlab
%---------------------------------------------------------------------------%
|
|
% Copyright (C) 1995 University of Melbourne.
|
|
% This file may only be copied under the terms of the GNU Library General
|
|
% Public License - see the file COPYING.LIB in the Mercury distribution.
|
|
%---------------------------------------------------------------------------%
|
|
%
|
|
% Main author: fjh.
|
|
%
|
|
% This file should be prepended to any of the .nl files before
|
|
% compilation with nc.
|
|
% This is done automatically by the Makefile.
|
|
% We should perhaps use :- ensure_loaded or :- include to achieve this,
|
|
% but the former declaration is broken in NU-Prolog, and the second
|
|
% isn't even implemented.
|
|
%
|
|
%-----------------------------------------------------------------------------%
|
|
|
|
% Declare the appropriate operators.
|
|
|
|
:- op(1199, fx, (module)).
|
|
:- op(1199, fx, (end_module)).
|
|
|
|
:- op(1199, fx, (export_module)).
|
|
:- op(1199, fx, (export_sym)).
|
|
:- op(1199, fx, (export_pred)).
|
|
:- op(1199, fx, (export_cons)).
|
|
:- op(1199, fx, (export_type)).
|
|
:- op(1199, fx, (export_adt)).
|
|
:- op(1199, fx, (export_op)).
|
|
|
|
:- op(1199, fx, (import_module)).
|
|
:- op(1199, fx, (import_sym)).
|
|
:- op(1199, fx, (import_pred)).
|
|
:- op(1199, fx, (import_cons)).
|
|
:- op(1199, fx, (import_type)).
|
|
:- op(1199, fx, (import_adt)).
|
|
:- op(1199, fx, (import_op)).
|
|
|
|
:- op(1199, fx, (use_module)).
|
|
:- op(1199, fx, (use_sym)).
|
|
:- op(1199, fx, (use_pred)).
|
|
:- op(1199, fx, (use_cons)).
|
|
:- op(1199, fx, (use_type)).
|
|
:- op(1199, fx, (use_adt)).
|
|
:- op(1199, fx, (use_op)).
|
|
|
|
:- op(1199, fx, (rule)).
|
|
|
|
:- op(1199, fx, (mode)).
|
|
:- op(1199, fx, (inst)).
|
|
:- op(1179, xfy, (--->)).
|
|
:- op(1175, xfx, (::)).
|
|
|
|
% Prevent warnings about undefined predicates
|
|
% when the compiler tries to execute the new declarations.
|
|
|
|
:- assert(rule(_)).
|
|
|
|
:- assert(mode(_)).
|
|
:- assert(inst(_)).
|
|
|
|
:- assert(module(_)).
|
|
:- assert(end_module(_)).
|
|
:- assert(interface).
|
|
:- assert(implementation).
|
|
|
|
:- assert(import_module(_)).
|
|
:- assert(import_sym(_)).
|
|
:- assert(import_pred(_)).
|
|
:- assert(import_cons(_)).
|
|
:- assert(import_type(_)).
|
|
:- assert(import_adt(_)).
|
|
:- assert(import_op(_)).
|
|
|
|
:- assert(export_module(_)).
|
|
:- assert(export_sym(_)).
|
|
:- assert(export_pred(_)).
|
|
:- assert(export_cons(_)).
|
|
:- assert(export_type(_)).
|
|
:- assert(export_adt(_)).
|
|
:- assert(export_op(_)).
|
|
|
|
:- assert(use_module(_)).
|
|
:- assert(use_sym(_)).
|
|
:- assert(use_pred(_)).
|
|
:- assert(use_cons(_)).
|
|
:- assert(use_type(_)).
|
|
:- assert(use_adt(_)).
|
|
:- assert(use_op(_)).
|
|
|
|
:- assert(external(_)).
|
|
|
|
%-----------------------------------------------------------------------------%
|