/**************************************************************************/
/*                                                                        */
/*                                                                        */
/*                                                                        */
/*                EXCEPTION HANDLER / CHIP STACK                          */
/*               ==========================================               */
/*                                                                        */
/*                                                                        */
/*  MODULE      : Exception                                               */
/*  NOM         : EIInit.c                                                */
/*  FONCTION    :                                                         */
/*                                                                        */
/*  RESPONSABLE : HEWES Gerald                                            */
/*  TEL         : 33 (1) 46 24 20 27                                      */
/*                                                                        */
/**************************************************************************/

/**************************************************************************/
/*                                                                        */
/* HEW 880310 Ver 0.1 : First Soft Version                                */
/* HEW 880324 Ver 0.2 : Handle 68000 exceptions                           */
/* HEW 880413 Ver 0.3 : Handle 680X0 Formats                              */
/* HEW 880508 Ver 0.4 : First Released version : routines split           */
/*                      Major name changes for better homogeneity         */
/* HEW 880517 Ver 0.5 : include change. No more puts in library           */
/* HEW 880605 Ver 0.6 : Disable/Enable Function + Prototypes              */
/*                                                                        */
/**************************************************************************/

#include <stdio.h>
#include "local:excption.h"
#include <exec/tasks.h>
#include <proto/exec.h>

extern E_ErrorStatus  E_global;  /* Declaration of Necessary Data */

/***************************** CODE ***************************************/

extern void EIInit(dike)
E_ErrorStatus *dike;  /* Needed for the library version */

                /************************************************/
                /* Initialises The Exception Handling           */
                /* Routines                                     */
                /************************************************/


{
 struct Task *taskloc;

   dike->E_top.E_pred = 0            ; /* Nothing before   */
   dike->E_top.E_state = E_PROTECTED ; /* state of handler */
   dike->E_up = &(dike->E_top)       ; /* hack             */
   dike->E_top.E_magic = EM_MAGIC    ; /* enable handler   */

   taskloc = (struct Task *)FindTask(0);        /* Get Task Info      */
   dike->E_OldTrapCode = taskloc->tc_TrapCode;  /* Keep Old Info      */
   dike->E_OldTrapData = taskloc->tc_TrapData;
   taskloc->tc_TrapCode = (APTR)EIExcpHandler;  /* Put in new handler */
   taskloc->tc_TrapData = (APTR)dike;           /* For the Handler    */

   return;
}

/*************************  CIVILISATION ENDS HERE  ***********************/