summaryrefslogtreecommitdiff
path: root/vm_core.h
diff options
context:
space:
mode:
Diffstat (limited to 'vm_core.h')
-rw-r--r--vm_core.h19
1 files changed, 13 insertions, 6 deletions
diff --git a/vm_core.h b/vm_core.h
index b28a222..6530fbf 100644
--- a/vm_core.h
+++ b/vm_core.h
@@ -2,7 +2,7 @@
vm_core.h -
- $Author: marcandre $
+ $Author: usa $
created at: 04/01/01 19:41:38 JST
Copyright (C) 2004-2007 Koichi Sasada
@@ -22,7 +22,7 @@
#include "vm_opts.h"
#include "id.h"
#include "method.h"
-#include "atomic.h"
+#include "ruby_atomic.h"
#if defined(_WIN32)
#include "thread_win32.h"
@@ -252,6 +252,7 @@ struct rb_iseq_struct {
/* misc */
ID defined_method_id; /* for define_method */
+ rb_num_t flip_cnt;
/* used at compile time */
struct iseq_compile_data *compile_data;
@@ -651,7 +652,7 @@ VALUE rb_vm_invoke_proc(rb_thread_t *th, rb_proc_t *proc, VALUE self,
int argc, const VALUE *argv, const rb_block_t *blockptr);
VALUE rb_vm_make_proc(rb_thread_t *th, const rb_block_t *block, VALUE klass);
VALUE rb_vm_make_env_object(rb_thread_t *th, rb_control_frame_t *cfp);
-void rb_vm_rewrite_dfp_in_errinfo(rb_thread_t *th, rb_control_frame_t *cfp);
+void rb_vm_rewrite_dfp_in_errinfo(rb_thread_t *th);
void rb_vm_inc_const_missing_count(void);
void rb_vm_gvl_destroy(rb_vm_t *vm);
VALUE rb_vm_call(rb_thread_t *th, VALUE recv, VALUE id, int argc,
@@ -728,17 +729,23 @@ void rb_thread_lock_destroy(rb_thread_lock_t *);
/* tracer */
void
-rb_threadptr_exec_event_hooks(rb_thread_t *th, rb_event_flag_t flag, VALUE self, ID id, VALUE klass);
+rb_threadptr_exec_event_hooks(rb_thread_t *th, rb_event_flag_t flag, VALUE self, ID id, VALUE klass, int pop_p);
-#define EXEC_EVENT_HOOK(th, flag, self, id, klass) do { \
+#define EXEC_EVENT_HOOK_ORIG(th, flag, self, id, klass, pop_p) do { \
rb_event_flag_t wait_event__ = (th)->event_flags; \
if (UNLIKELY(wait_event__)) { \
if (wait_event__ & ((flag) | RUBY_EVENT_VM)) { \
- rb_threadptr_exec_event_hooks((th), (flag), (self), (id), (klass)); \
+ rb_threadptr_exec_event_hooks((th), (flag), (self), (id), (klass), (pop_p)); \
} \
} \
} while (0)
+#define EXEC_EVENT_HOOK(th, flag, self, id, klass) \
+ EXEC_EVENT_HOOK_ORIG(th, flag, self, id, klass, 0)
+
+#define EXEC_EVENT_HOOK_AND_POP_FRAME(th, flag, self, id, klass) \
+ EXEC_EVENT_HOOK_ORIG(th, flag, self, id, klass, 1)
+
#if defined __GNUC__ && __GNUC__ >= 4
#pragma GCC visibility push(default)
#endif