1 files changed, 44 insertions, 0 deletions
diff --git a/jni/ruby/test/ripper/test_sexp.rb b/jni/ruby/test/ripper/test_sexp.rb
new file mode 100644
index 0000000..2c5bcda
--- /dev/null
+++ b/jni/ruby/test/ripper/test_sexp.rb
@@ -0,0 +1,44 @@
+begin
+  require 'ripper'
+  require 'test/unit'
+  ripper_test = true
+  module TestRipper; end
+rescue LoadError
+end
+
+class TestRipper::Sexp < Test::Unit::TestCase
+  def test_compile_error
+    assert_nil Ripper.sexp("/")
+    assert_nil Ripper.sexp("-")
+    assert_nil Ripper.sexp("+")
+    assert_nil Ripper.sexp("*")
+    assert_nil Ripper.sexp("end")
+    assert_nil Ripper.sexp("end 1")
+    assert_nil Ripper.sexp("/*")
+    assert_nil Ripper.sexp("/*/")
+    assert_nil Ripper.sexp("/+/")
+  end
+
+  def test_regexp_content
+    sexp = Ripper.sexp('//')
+    assert_nil search_sexp(:@tstring_content, search_sexp(:regexp_literal, sexp))
+
+    sexp = Ripper.sexp('/foo/')
+    assert_equal 'foo', search_sexp(:@tstring_content, search_sexp(:regexp_literal, sexp))[1]
+
+    sexp = Ripper.sexp("/foo\nbar/")
+    assert_equal "foo\nbar", search_sexp(:@tstring_content, search_sexp(:regexp_literal, sexp))[1]
+
+    sexp = Ripper.sexp('/(?<n>a(b|\g<n>))/')
+    assert_equal '(?<n>a(b|\g<n>))', search_sexp(:@tstring_content, search_sexp(:regexp_literal, sexp))[1]
+  end
+
+  def search_sexp(sym, sexp)
+    return sexp if !sexp or sexp[0] == sym
+    sexp.find do |e|
+      if Array === e and e = search_sexp(sym, e)
+        return e
+      end
+    end
+  end
+end if ripper_test