compiler/clib/__assert_kernel.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: assert() function for the kernel.
   6     Lang: english
   7 */
   8 #include <exec/execbase.h>
   9 #include <exec/alerts.h>
  10 #include <proto/exec.h>
  11 #include <assert.h>
  12 #include <aros/arossupportbase.h>
  13
  14 extern struct ExecBase *SysBase;
  15
  16 void __assert (const char * expr, const char * file, unsigned int line)
  17 {
  18     /* TODO: Make this call the kernel.resource KernelAssertFail() fn */
  19
  20     /* Awkward, but I need a global SysBase variable */
  21     struct AROSSupportBase *AROSSupportBase;
  22
  23     AROSSupportBase = (struct AROSSupportBase *)SysBase->DebugData;
  24
  25     /* Basically, this is the body of an KASSERT() */
  26     AROSSupportBase->kprintf("\x07%s::%ld: assertion failed: %s\n",
  27                 file, line, expr);
  28
  29     Alert(AG_BadParm);
  30 } /* assert */