2000-05-01 13:42:38 +04:00
|
|
|
/**********************************************************************
|
1998-01-16 15:13:05 +03:00
|
|
|
|
|
|
|
env.h -
|
|
|
|
|
|
|
|
$Author$
|
|
|
|
$Date$
|
|
|
|
created at: Mon Jul 11 11:53:03 JST 1994
|
|
|
|
|
2000-05-01 13:42:38 +04:00
|
|
|
Copyright (C) 1993-2000 Yukihiro Matsumoto
|
|
|
|
|
|
|
|
**********************************************************************/
|
|
|
|
|
1998-01-16 15:13:05 +03:00
|
|
|
#ifndef ENV_H
|
|
|
|
#define ENV_H
|
|
|
|
|
|
|
|
extern struct FRAME {
|
1999-01-20 07:59:39 +03:00
|
|
|
VALUE self;
|
1998-01-16 15:13:05 +03:00
|
|
|
int argc;
|
|
|
|
VALUE *argv;
|
|
|
|
ID last_func;
|
1998-01-16 15:19:22 +03:00
|
|
|
VALUE last_class;
|
1998-01-16 15:13:05 +03:00
|
|
|
VALUE cbase;
|
|
|
|
struct FRAME *prev;
|
1999-08-13 09:45:20 +04:00
|
|
|
struct FRAME *tmp;
|
1998-01-16 15:13:05 +03:00
|
|
|
char *file;
|
|
|
|
int line;
|
|
|
|
int iter;
|
2000-08-15 13:04:32 +04:00
|
|
|
int flags;
|
1999-01-20 07:59:39 +03:00
|
|
|
} *ruby_frame;
|
1998-01-16 15:13:05 +03:00
|
|
|
|
1999-01-20 07:59:39 +03:00
|
|
|
void rb_gc_mark_frame _((struct FRAME *));
|
1998-01-16 15:19:22 +03:00
|
|
|
|
2000-08-15 13:04:32 +04:00
|
|
|
#define FRAME_ALLOCA 0
|
|
|
|
#define FRAME_MALLOC 1
|
|
|
|
|
1998-01-16 15:13:05 +03:00
|
|
|
extern struct SCOPE {
|
|
|
|
struct RBasic super;
|
|
|
|
ID *local_tbl;
|
|
|
|
VALUE *local_vars;
|
|
|
|
int flag;
|
1999-01-20 07:59:39 +03:00
|
|
|
} *ruby_scope;
|
1998-01-16 15:13:05 +03:00
|
|
|
|
|
|
|
#define SCOPE_ALLOCA 0
|
|
|
|
#define SCOPE_MALLOC 1
|
|
|
|
#define SCOPE_NOSTACK 2
|
|
|
|
|
1999-08-13 09:45:20 +04:00
|
|
|
extern int ruby_in_eval;
|
1998-01-16 15:13:05 +03:00
|
|
|
|
1999-01-20 07:59:39 +03:00
|
|
|
extern VALUE ruby_class;
|
1998-01-16 15:13:05 +03:00
|
|
|
|
|
|
|
struct RVarmap {
|
|
|
|
struct RBasic super;
|
|
|
|
ID id;
|
|
|
|
VALUE val;
|
|
|
|
struct RVarmap *next;
|
|
|
|
};
|
1999-01-20 07:59:39 +03:00
|
|
|
extern struct RVarmap *ruby_dyna_vars;
|
1998-01-16 15:13:05 +03:00
|
|
|
|
|
|
|
#endif /* ENV_H */
|