pierror.h

Go to the documentation of this file.

#ifndef PERROR_H
#define PERROR_H
#include "pilisp.h"
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

enum error_types {
  NO_ERROR = -1,    
  LISP_ERROR = 1,   
  MEMORY_ERROR = 2, 
  MODE_ERROR = 3    
};

// ==================== Errors Throwing ====================
void pi_error(int CODE, char *message);
void pi_lisp_error(char *message); // throws LISP_ERROR
void pi_error_few_args();          // throws "too few args"
void pi_error_many_args();         // throws "too many args"
void pi_error_stack();             
void pi_error_stack_overflow();
void pi_error_stack_undeflow();

// ==================== Last error informations ====================
int get_last_error();
bool had_error();
void reset_error();

#endif // !PERROR_H