blob: 09ff31d13f1548ab27077a46b3afd2011afc7a9f (
plain)
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
|
/************************************************
env.h -
$Author$
$Revision$
$Date$
created at: Mon Jul 11 11:53:03 JST 1994
************************************************/
#ifndef ENV_H
#define ENV_H
extern struct ENVIRON {
VALUE self;
int argc;
VALUE *argv;
struct RClass *current_module;
struct RClass *last_class;
char *file;
int line;
ID last_func;
ID *local_tbl;
VALUE *local_vars;
int in_eval;
struct BLOCK *block;
int iterator;
int flags;
struct ENVIRON *prev;
} *the_env;
#define ITERATOR_P() (the_env->iterator > 0 && the_env->iterator < 3)
#define Qself the_env->self
#define the_class the_env->current_module
#define DURING_ITERATE 1
#define DURING_RESQUE 2
#define DURING_CALL 4
#endif /* ENV_H */
|