20
20
21
21
#define STACK_SIZE_INCREMENT 128
22
22
23
- RUBY_EXTERN int rb_vm_get_sourceline (const rb_control_frame_t * cfp ); /* from vm.c */
23
+ int rb_vm_get_sourceline (const rb_control_frame_t * cfp ); /* from vm.c */
24
24
/* from iseq.c */
25
25
#ifdef RB_ISEQ_COMPILE_6ARGS
26
- RUBY_EXTERN VALUE rb_iseq_compile_with_option (VALUE src , VALUE file , VALUE filepath , VALUE line , VALUE opt );
26
+ VALUE rb_iseq_compile_with_option (VALUE src , VALUE file , VALUE filepath , VALUE line , VALUE opt );
27
27
#else
28
- RUBY_EXTERN VALUE rb_iseq_compile_with_option (VALUE src , VALUE file , VALUE line , VALUE opt );
28
+ VALUE rb_iseq_compile_with_option (VALUE src , VALUE file , VALUE line , VALUE opt );
29
29
#endif
30
30
31
31
typedef struct {
@@ -861,6 +861,7 @@ debug_event_hook(rb_event_flag_t event, VALUE data, VALUE self, ID mid, VALUE kl
861
861
{
862
862
rb_control_frame_t * cfp = top_frame -> info .runtime .cfp ;
863
863
VALUE hit_count ;
864
+ int c_hit_count ;
864
865
rb_iseq_t * iseq = cfp -> iseq ;
865
866
866
867
if (iseq != NULL ) {
@@ -870,7 +871,7 @@ debug_event_hook(rb_event_flag_t event, VALUE data, VALUE self, ID mid, VALUE kl
870
871
}
871
872
872
873
/* send catchpoint notification */
873
- int c_hit_count = FIX2INT (rb_hash_aref (rdebug_catchpoints , debug_context -> catch_table .mod_name )) + 1 ;
874
+ c_hit_count = FIX2INT (rb_hash_aref (rdebug_catchpoints , debug_context -> catch_table .mod_name )) + 1 ;
874
875
hit_count = INT2FIX (c_hit_count );
875
876
rb_hash_aset (rdebug_catchpoints , debug_context -> catch_table .mod_name , hit_count );
876
877
debug_context -> stop_reason = CTX_STOP_CATCHPOINT ;
@@ -999,17 +1000,17 @@ debug_event_hook(rb_event_flag_t event, VALUE data, VALUE self, ID mid, VALUE kl
999
1000
}
1000
1001
case RUBY_EVENT_RAISE :
1001
1002
{
1003
+ VALUE ancestors ;
1004
+ VALUE expn_class , aclass ;
1005
+ int i ;
1006
+
1002
1007
if (CTX_FL_TEST (debug_context , CTX_FL_CATCHING )) {
1003
1008
/* we're re-raising exception after processing line event,
1004
1009
now allow the next exception to be caught, don't setup catchers */
1005
1010
CTX_FL_UNSET (debug_context , CTX_FL_CATCHING );
1006
1011
break ;
1007
1012
}
1008
1013
1009
- VALUE ancestors ;
1010
- VALUE expn_class , aclass ;
1011
- int i ;
1012
-
1013
1014
if (debug == Qtrue ) {
1014
1015
fprintf (stderr , "stack_size %d\n" , debug_context -> stack_size );
1015
1016
for (i = 0 ; i < debug_context -> stack_size ; i ++ ) {
0 commit comments