M2compiler-V3/tools/m2make/tests/LinkExtra.mod

MODULE LinkExtra;
(* Multiple extra C shims and a pkg-config/link test. *)

PROCEDURE extra_one () : INTEGER; EXTERNAL "extra_one";
PROCEDURE extra_two () : INTEGER; EXTERNAL "extra_two";

VAR ExitCode : INTEGER;

BEGIN
  IF extra_one() + extra_two() = 42 THEN
    ExitCode := 42
  ELSE
    ExitCode := 1
  END
END LinkExtra.