ruby-debug-base19 0.11.15 → 0.11.16

data/AUTHORS

@@ -4,6 +4,7 @@ Kent Sibilev
 Contributors:
 Markus Barchfeld
 R. Bernstein
+Anders Lindgren
 
 Contributor and maintainer:
 Mark Moseley

data/ext/ruby_debug/breakpoint.c

@@ -71,7 +71,6 @@ check_breakpoint_by_pos(VALUE breakpoint, char *file, int line)
     return 0;
 }
 
-extern VALUE g_self;
 int
 check_breakpoint_by_method(VALUE breakpoint, VALUE klass, ID mid, VALUE self)
 {

data/ext/ruby_debug/ruby_debug.c

@@ -16,7 +16,7 @@
 #define min(x,y) ((x) < (y) ? (x) : (y))
 #endif
 
-#if RUBY_VERSION_MAJOR == 1 && RUBY_VERSION_MINOR == 9 && RUBY_VERSION_TEENY == 1 && RUBY_PATCHLEVEL > 0
+#if RUBY_VERSION_MAJOR == 1 && RUBY_VERSION_MINOR == 9 && RUBY_VERSION_TEENY == 1 && RUBY_PATCHLEVEL >= 0
 #define RUBY_VERSION_1_9_1
 #endif
 
@@ -531,6 +531,10 @@ filename_cmp(VALUE source, char *file)
             return 1;
         if(isdirsep(source_ptr[s]) && isdirsep(file_ptr[f]))
             dirsep_flag = 1;
+#ifdef DOSISH_DRIVE_LETTER
+        else if (s == 0)
+            return(toupper(source_ptr[s]) == toupper(file_ptr[f]));
+#endif
         else if(source_ptr[s] != file_ptr[f])
             return 0;
     }
@@ -784,7 +788,12 @@ debug_event_hook(rb_event_flag_t event, VALUE data, VALUE self, ID mid, VALUE kl
         else
             set_frame_source(event, debug_context, self, file, line, mid);
 
-        if (CTX_FL_TEST(debug_context, CTX_FL_CATCHING))
+        if (CTX_FL_TEST(debug_context, CTX_FL_JUMPING))
+        {
+            CTX_FL_UNSET(debug_context, CTX_FL_JUMPING);
+            break;
+        }
+        else if (CTX_FL_TEST(debug_context, CTX_FL_CATCHING))
         {
             debug_frame_t *top_frame = get_top_frame(debug_context);
             
@@ -2217,6 +2226,50 @@ context_stop_reason(VALUE self)
     return ID2SYM(rb_intern(sym_name));
 }
 
+/*
+ *   call-seq:
+ *      context.jump(line, file) -> bool
+ *
+ *   Returns +true+ if jump to +line+ in filename +file+ was successful.
+ */
+static VALUE
+context_jump(int argc, VALUE *argv, VALUE self)
+{
+    debug_context_t *debug_context;
+    debug_frame_t *debug_frame;
+    VALUE line, file;
+    const char *file_str;
+    int i;
+    struct rb_iseq_struct *iseq;
+
+    Data_Get_Struct(self, debug_context_t, debug_context);
+    debug_frame = get_top_frame(debug_context);
+
+    if ((argc <= 0) || (argc > 2))
+        rb_raise(rb_eArgError, "wrong number of arguments (%d for 1 or 2)", argc);
+    rb_scan_args(argc, argv, "11", &line, &file);
+
+    line = FIX2INT(line);
+    if (file == Qnil)
+        file_str = debug_frame->file;
+    else
+        file_str = RSTRING_PTR(file);
+
+    iseq = debug_frame->info.runtime.cfp->iseq;
+    for (i = 0; i < iseq->insn_info_size; i++)
+    {
+        if (iseq->insn_info_table[i].line_no == line)
+        {
+            if (*debug_frame->info.runtime.cfp->pc == BIN(pop))
+                debug_frame->info.runtime.cfp->sp--;
+            debug_frame->info.runtime.cfp->pc = 
+                iseq->iseq_encoded + iseq->insn_info_table[i].position;
+            CTX_FL_SET(debug_context, CTX_FL_JUMPING);
+            return Qtrue;
+        }
+    }
+    return Qfalse;
+}
 
 /*
  *   Document-class: Context
@@ -2258,6 +2311,7 @@ Init_context()
              context_breakpoint, 0);      /* in breakpoint.c */
     rb_define_method(cContext, "set_breakpoint", 
              context_set_breakpoint, -1); /* in breakpoint.c */
+    rb_define_method(cContext, "jump", context_jump, -1);
 }
 
 /*

data/ext/ruby_debug/ruby_debug.h

@@ -13,6 +13,7 @@ enum ctx_stop_reason {CTX_STOP_NONE, CTX_STOP_STEP, CTX_STOP_BREAKPOINT,
 #define CTX_FL_STEPPED      (1<<8)
 #define CTX_FL_FORCE_MOVE   (1<<9)
 #define CTX_FL_CATCHING     (1<<10)
+#define CTX_FL_JUMPING      (1<<11)
 
 #define CTX_FL_TEST(c,f)  ((c)->flags & (f))
 #define CTX_FL_SET(c,f)   do { (c)->flags |= (f); } while (0)

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: ruby-debug-base19
 version: !ruby/object:Gem::Version 
-  version: 0.11.15
+  version: 0.11.16
 platform: ruby
 authors: 
 - Kent Sibilev
@@ -10,7 +10,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2009-08-24 00:00:00 -07:00
+date: 2009-08-28 00:00:00 -07:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -43,12 +43,7 @@ dependencies:
       - !ruby/object:Gem::Version 
         version: 0.5.11
     version: 
-description: |
-  ruby-debug is a fast implementation of the standard Ruby debugger debug.rb.
-  It is implemented by utilizing a new Ruby C API hook. The core component
-  provides support that front-ends can build on. It provides breakpoint
-  handling, bindings for stack frames among other things.
-
+description: ruby-debug is a fast implementation of the standard Ruby debugger debug.rb. It is implemented by utilizing a new Ruby C API hook. The core component provides support that front-ends can build on. It provides breakpoint handling, bindings for stack frames among other things.
 email: mark@fast-software.com
 executables: []
 
@@ -72,10 +67,8 @@ files:
 - test/base/base.rb
 - test/base/binding.rb
 - test/base/catchpoint.rb
-has_rdoc: true
+has_rdoc: false
 homepage: http://rubyforge.org/projects/ruby-debug19/
-licenses: []
-
 post_install_message: 
 rdoc_options: 
 - --charset=UTF-8
@@ -96,7 +89,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
 requirements: []
 
 rubyforge_project: ruby-debug19
-rubygems_version: 1.3.4
+rubygems_version: 1.3.1
 signing_key: 
 specification_version: 3
 summary: Fast Ruby debugger - core component