git.maemo.org Git - opencv/blob - apps/cvenv/EiC/stdClib/assert.c

   1 /* assert.c
   2  *
   3  *      (C) Copyright Dec 20 1998, Edmond J. Breen.
   4  *                 ALL RIGHTS RESERVED.
   5  * This code may be copied for personal, non-profit use only.
   6  *
   7  */
   8
   9 #ifndef NO_ASSERT
  10 #include <stdio.h>
  11 #include <stdlib.h>
  12
  13 #include "eic.h"
  14 #include "stdliblocal.h"
  15 /*#include "assert.h"*/
  16
  17
  18 /* ASSERT.H STUFF */
  19 val_t eic_assert()
  20 {
  21     val_t v;
  22     fputs(arg(0,getargs(),ptr_t).p, stderr);
  23     fputs(" -- assert failed\n",stderr);
  24     return v;
  25 }
  26 #endif
  27 /******************************************************************/
  28 void module_assert(void)
  29 {
  30 #ifndef NO_ASSERT
  31     /* ASSERT.H STUFF */
  32     EiC_add_builtinfunc("_Assert",eic_assert);
  33 #endif
  34 }
  35
  36
  37
  38
  39
  40
  41
  42