dynare/dynare++/kord/kord_exception.hh

// Copyright 2005, Ondra Kamenik

// Exception

/* This is a simple code defining an exception and two convenience macros. */

#ifndef KORD_EXCEPTION_H
#define KORD_EXCEPTION_H

#include <cstring>
#include <cstdio>

#define KORD_RAISE(mes)                         \
  throw KordException(__FILE__, __LINE__, mes);

#define KORD_RAISE_IF(expr, mes)                                \
  if (expr) throw KordException(__FILE__, __LINE__, mes);

#define KORD_RAISE_X(mes, c)                            \
  throw KordException(__FILE__, __LINE__, mes, c);

#define KORD_RAISE_IF_X(expr, mes, c)                           \
  if (expr) throw KordException(__FILE__, __LINE__, mes, c);

class KordException
{
protected:
  char fname[50];
  int lnum;
  char message[500];
  int cd;
public:
  KordException(const char *f, int l, const char *mes, int c = 255)
  {
    strncpy(fname, f, 50); fname[49] = '\0';
    strncpy(message, mes, 500); message[499] = '\0';
    lnum = l;
    cd = c;
  }
  virtual ~KordException()
  = default;
  virtual void
  print() const
  {
    printf("At %s:%d:(%d):%s\n", fname, lnum, cd, message);
  }
  virtual int
  code() const
  {
    return cd;
  }
  const char *
  get_message() const
  {
    return message;
  }
};

// |KordException| error code definitions
#define KORD_FP_NOT_CONV 254
#define KORD_FP_NOT_FINITE 253
#define KORD_MD_NOT_STABLE 252

#endif