From 441546edcfbb1b346c87b69c5f578d1a0e522e06 Mon Sep 17 00:00:00 2001
From: shyouhei <shyouhei@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Mon, 7 Jul 2008 07:36:34 +0000
Subject: add tag v1_8_6_269

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/tags/v1_8_6_269@17937 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ruby_1_8_6/test/ruby/test_trace.rb | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100644 ruby_1_8_6/test/ruby/test_trace.rb

(limited to 'ruby_1_8_6/test/ruby/test_trace.rb')

diff --git a/ruby_1_8_6/test/ruby/test_trace.rb b/ruby_1_8_6/test/ruby/test_trace.rb
new file mode 100644
index 0000000000..6adfe0bf64
--- /dev/null
+++ b/ruby_1_8_6/test/ruby/test_trace.rb
@@ -0,0 +1,21 @@
+require 'test/unit'
+
+class TestTrace < Test::Unit::TestCase
+  def test_trace
+    $x = 1234
+    $y = 0
+    trace_var :$x, proc{$y = $x}
+    $x = 40414
+    assert_equal($x, $y)
+    
+    untrace_var :$x
+    $x = 19660208
+    assert_not_equal($x, $y)
+    
+    trace_var :$x, proc{$x *= 2}
+    $x = 5
+    assert_equal(10, $x)
+    
+    untrace_var :$x
+  end
+end
-- 
cgit v1.2.3