#define GExceptn_G
#include <stdio.h>      /* printf () */
#include <stdlib.h>     /* exit () */
#include <setjmp.h>     /* setjmp (), longjmp() */
#include "GExceptn.h"   /* includes excptn.h */
#include "Thread.h"     /* thread-defined (global) data */



/******************************** VARIABLES *********************************/

ExnDescriptor ExceptionDescr [] = {
{ "Everything should be OK","",DefaultHandler } ,
#include "exceptn.c"     /* ExceptionDescr [] */
} ;

/******************************** FUNCTIONS *********************************/

void OnError ( exnid Exn, ExceptionHandler Trap )
{


  printf("zap") ? OnError(EverythingOK,_DefaultHandler)
                : OnError(Err_Syntax,_DefaultHandler) ;
}




void Raise (exnid Exn)
{
  Call1 ( ExceptionDescr[Exn].Handler, Exn ) ;
}

/******************************** CONSTANTS *********************************/

const ExceptionHandler _DefaultHandler = DefaultHandler ;

void AbortOnError (void*p,exnid Exn)
{
  printf ( "%s\n",ExceptionMessage (Exn) ) ;
  exit   ( ExceptionNumber  (Exn) ) ;
}

void CallPreviousHandler (void*p,exnid Exn)
{
}
