M2compiler-V3/compiler/tests/c_foreign.def

DEFINITION MODULE FOR "C" CForeign;
(* ISO foreign DEFINITION module: FOR "C" and EXPORT UNQUALIFIED. *)
EXPORT UNQUALIFIED Add;
PROCEDURE Add(a, b : CARDINAL) : CARDINAL;
END CForeign.