#include "primitives.h"

AllocError (string)
    char *string;
    {
    fputs ("memory allocation error in ", stderr);
    fputs (string, stderr);
    fputs ("\n", stderr);
    bomb (ALLOC_ERROR);
    }

IOError (string)
    char *string;
    {
    fputs ("input/output error in ", stderr);
    fputs (string, stderr);
    fputs ("\n", stderr);
    bomb (IO_ERROR);
    }