rb-threadframe 0.39 → 0.40

data/ext/thread_frame.h

@@ -1,4 +0,0 @@
-VALUE thread_frame_sp(VALUE klass, VALUE index) ;
-VALUE thread_frame_prev(int argc, VALUE *argv, VALUE klass);
-
-

data/ext/thread_pthread.h

@@ -1,24 +0,0 @@
-/**********************************************************************
-
-  thread_pthread.h -
-
-  $Author$
-
-  Copyright (C) 2004-2007 Koichi Sasada
-
-**********************************************************************/
-
-#ifndef RUBY_THREAD_PTHREAD_H
-#define RUBY_THREAD_PTHREAD_H
-
-#include <pthread.h>
-typedef pthread_t rb_thread_id_t;
-typedef pthread_mutex_t rb_thread_lock_t;
-typedef pthread_cond_t rb_thread_cond_t;
-
-typedef struct native_thread_data_struct {
-    void *signal_thread_list;
-    pthread_cond_t sleep_cond;
-} native_thread_data_t;
-
-#endif /* RUBY_THREAD_PTHREAD_H */

data/test/ruby/test_brkpt.rb

@@ -1,60 +0,0 @@
-require 'test/unit'
-
-class TestISeqBrkpt < Test::Unit::TestCase
-
-  def setup
-    @original_compile_option = RubyVM::InstructionSequence.compile_option
-    RubyVM::InstructionSequence.compile_option = {
-      :trace_instruction => false,
-      :specialized_instruction => false
-    }
-  end
-
-  def teardown
-    set_trace_func(nil)
-    RubyVM::InstructionSequence.compile_option = @original_compile_option
-  end
-
-  def test_iseq_brkpt
-    iseq = RubyVM::InstructionSequence.compile('x=1; y=2')
-    assert iseq
-    assert_equal(nil, iseq.brkpts)
-    assert_equal(true, iseq.brkpt_alloc)
-    assert_equal([], iseq.brkpts)
-    assert_equal(false, iseq.brkpt_alloc)
-    
-    assert_equal(true, iseq.brkpt_set(0))
-    assert_equal(1,    iseq.brkpts.size)
-    assert_equal(true, iseq.brkpt_get(0), 'Offset 0 should be set')
-    assert_equal(true, iseq.brkpt_unset(0),'Offset 0 should be unset')
-    assert_equal(false, iseq.brkpt_get(0), 'Offset 0 should be unset now')
-    assert_equal(true, iseq.brkpt_unset(0), 
-                 'Offset 0 should be unset again')
-    assert_raises TypeError do iseq.brkpt_get(100) end
-    assert_equal(true, iseq.brkpt_dealloc)
-    assert_equal(false, iseq.brkpt_dealloc)
-    assert_equal(true, iseq.brkpt_unset(0),
-                 'Offset 0 should be unset even when deallocated')
-
-    assert_raises TypeError do iseq.brkpt_set('a') end
-
-    iseq.brkpt_set(2)    
-    iseq.brkpt_set(4)    
-    events = []
-    eval <<-EOF.gsub(/^.*?: /, "")
-     1: set_trace_func(Proc.new { |event, file, lineno, mid, binding, klass|
-     2:   events << [event, lineno, mid, klass]
-     3: })
-     4: iseq.eval
-     5: set_trace_func(nil)
-    EOF
-    # puts iseq.disassemble
-    brkpt_events = events.select{|item| item[0] == 'brkpt'}
-    assert_equal(2, brkpt_events.size, 
-                 "Expecting to see 2 brkpts in #{events}.inspect")
-    assert_equal(true, iseq.brkpt_dealloc)
-  end
-end
-
-# We want to double-check we didn't mess up any pointers somewhere.
-at_exit { GC.start  }

data/test/ruby/test_disasm.rb

@@ -1,17 +0,0 @@
-# Some simple tests of RubyVM::InstructionSequence#disasm, and
-# #disasm_nochildren
-require 'test/unit'
-
-class TestDisasmClass < Test::Unit::TestCase
-
-  def test_basic
-    assert_equal(RubyVM::InstructionSequence.compile('1+2').disassemble,
-                 RubyVM::InstructionSequence.compile('1+2').disasm)
-
-    p='def five; 5 end; five'
-    s1=RubyVM::InstructionSequence.compile(p).disasm
-    assert_equal String, s1.class, 'disasm output should be a string'
-    s2=RubyVM::InstructionSequence.compile(p).disasm_nochildren
-    assert_equal true, s1.size > s2.size
-  end
-end

data/test/ruby/test_iseq.rb

@@ -1,50 +0,0 @@
-# See that setting ISEQS__ and SCRIPT_ISEQS__ saves 
-# RubyVM::Instruction_sequenses
-require 'test/unit'
-
-class TestIseqAccess < Test::Unit::TestCase
-  def setup
-    old_verbosity = $VERBOSE
-    $VERBOSE = nil
-    Kernel.const_set(:ISEQS__, {})
-    Kernel.const_set(:SCRIPT_ISEQS__, {})
-    $VERBOSE = old_verbosity
-  end
-
-  def teardown
-    old_verbosity = $VERBOSE
-    $VERBOSE = nil
-    Kernel.const_set(:ISEQS__, nil)
-    Kernel.const_set(:SCRIPT_ISEQS__, nil)
-    $VERBOSE = old_verbosity
-  end
-
-  def test_basic
-    sizes=[]
-    [ISEQS__, SCRIPT_ISEQS__].each do |iseq_hash|
-      sizes << iseq_hash.size
-    end
-    # defining five should trigger five instruction sequence additions
-    # to ISEQS__ and SCRIPT_ISEQS__
-    # 
-    eval 'def five; 5 end'
-    assert_equal sizes[0], sizes[1]
-    [SCRIPT_ISEQS__, ISEQS__].each do |iseq_hash|
-      assert_equal true, iseq_hash.size > sizes.pop
-      assert_equal Hash, iseq_hash.class
-      a = iseq_hash.first
-      assert_equal Array, a.class
-      assert_equal RubyVM::InstructionSequence, iseq_hash.values[0][0].class
-    end
-  end
-
-  # Check RubyVM::InstructionSequence#arity
-  def test_arity
-    eval 'def five; 5 end'
-    eval 'def add(a,b); a+b end'
-    eval 'def splat(*a); 5 end'
-    [['five', 0,], ['add', 2], ['splat', -1]].each do |meth, expect|
-      assert_equal(expect, ISEQS__[meth][0].arity)
-    end
-  end
-end

data/test/ruby/test_tracefunc_raise.rb

@@ -1,26 +0,0 @@
-require 'test/unit'
-
-# tests that we a trace hook has access to the runtime exception Object
-# when it is called through a raise event
-
-class TestTracefuncRaise < Test::Unit::TestCase
-
-  def test_basic
-    tuples = []
-    p = Proc.new { 
-      |event, file, lineno, mid, binding, klass|
-      tuples << klass
-    }
-    msg = 'this is a message'
-    set_trace_func(p, 0x0080)
-    begin ; x = 1/0; rescue; end
-    begin ; raise RuntimeError, msg; rescue; end
-    clear_trace_func
-    assert_equal(2, tuples.size, 
-                 "Wrong number of tuples captured #{tuples.inspect}")
-    assert_equal msg, tuples[1].message
-    assert_equal([ZeroDivisionError, RuntimeError], tuples.map{|t| t.class},
-                 "Mismatched tuples classes in #{tuples.inspect}")
-    
-  end
-end