(* Release 3.10 *)
(*-------------------------------------------------------------------------*
*                                                                          *
*  ASSERT.DEF - Modula-2 interface to ASSERT.H                             *
*                                                                          *
*  COPYRIGHT (C) 1989..1992 Clarion Software Corporation.                  *
*  All Rights Reserved                                                     *
*                                                                          *
*--------------------------------------------------------------------------*)

(*# project("#set tsc='on'") *)
(*# call(o_a_size=>off, o_a_copy=>off, c_conv=>on, result_optional=>on) *)
(*# module(implementation=>off, init_code=>off) *)
(*# name(prefix=>c) *)


DEFINITION MODULE assert;

(* assert macro cannot be used from Modula-2 *)

PROCEDURE abort();

END assert.