akr	2007-12-17 22:11:13 +0900 (Mon, 17 Dec 2007)

  New Revision: 14273

  Modified files:
    trunk/.gdbinit

  Log:
    show regexp flags and encoding.


  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/.gdbinit?r1=14273&r2=14272

Index: .gdbinit
===================================================================
--- .gdbinit	(revision 14272)
+++ .gdbinit	(revision 14273)
@@ -74,10 +74,10 @@
       printf "coderange:unknown "
     else
     if ($flags & (RUBY_FL_USER12|RUBY_FL_USER13)) == RUBY_FL_USER12
-      printf "coderange:single "
+      printf "coderange:7bit "
     else
     if ($flags & (RUBY_FL_USER12|RUBY_FL_USER13)) == RUBY_FL_USER13
-      printf "coderange:multi "
+      printf "coderange:valid "
     else
       printf "coderange:broken "
     end
@@ -90,7 +90,14 @@
     set print address off
     output ((struct RRegexp*)$arg0)->str
     set print address on
-    printf " "
+    printf " len:%d ", ((struct RRegexp*)$arg0)->len
+    if $flags & RUBY_FL_USER5
+      printf "(literal) "
+    end
+    if $flags & RUBY_FL_USER4
+      printf "(fixed) "
+    end
+    printf "encoding:%d ", ($flags & (RUBY_FL_USER8|RUBY_FL_USER9|RUBY_FL_USER10|RUBY_FL_USER11)) >> RUBY_ENCODING_SHIFT
     print (struct RRegexp *)$arg0
   else
   if ($flags & RUBY_T_MASK) == RUBY_T_ARRAY

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml