-
Notifications
You must be signed in to change notification settings - Fork 0
/
except.h
65 lines (49 loc) · 1.62 KB
/
except.h
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
#ifndef EXCEPT_INCLUDED
#define EXCEPT_INCLUDED
#include <setjmp.h>
#include <stdint.h>
#define T Except_T
typedef struct T{
const char *reason;
}T;
typedef struct Except_Frame Except_Frame;
struct Except_Frame{
Except_Frame *prev;
jmp_buf env;
const char *file;
int32_t line;
const T *exception;
};
enum{Except_entered=0, Except_raised, Except_handled, Except_finalized};
extern Except_Frame *Except_stack;
void Except_raise(const T *e, const char *file, int32_t line);
#define RAISE(e) Except_raise(&(e),__FILE__,__LINE__)
#define RERAISE Except_raise(Except_frame.exception, Except_frame.file,\
Except_frame.line);
#define RETURN switch(Except_stack=Except_stack->prev,0) default: return
#define TRY do{ \
volatile int32_t Except_flag; \
Except_Frame Except_frame; \
Except_frame.prev = Except_stack; \
Except_stack = &Except_frame; \
Except_flag = setjmp(Except_frame.env); \
if(Except_flag == Except_entered ){
#define EXCEPT(e) \
if(Except_flag == Except_entered ) Except_stack=Except_stack->prev; \
}else if (Except_frame.exception== &(e) ){\
Except_flag = Except_handled;
#define ELSE \
if(Except_flag == Except_entered ) Except_stack=Except_stack->prev; \
} else { \
Except_flag = Except_handled;
#define FINALLY \
if(Except_flag == Except_entered ) Except_stack=Except_stack->prev; \
} {\
if(Except_flag==Except_entered) \
Except_flag = Except_finalized;
#define END_TRY \
if(Except_flag == Except_entered ) Except_stack=Except_stack->prev; \
} if (Except_flag == Except_raised) RERAISE; \
}while(0)
#undef T
#endif