modules/src/em_code/internerr.c

   1 /* $Id: internerr.c,v 1.3 1994/06/24 11:11:22 ceriel Exp $ */
   2 /*
   3  * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
   4  * See the copyright notice in the ACK home directory, in the file "Copyright".
   5  */
   6 #include <system.h>
   7
   8 void
   9 C_internal_error()
  10 {
  11         sys_write(STDERR,"internal error\n",15);
  12         sys_stop(S_EXIT);
  13 }