* ricsin/ricsin.rb: moved from tool/ricsin.rb.

ko1 · ko1 · commit 173cd7289afb · 2008-09-24T05:50:28.000Z
* ricsin/ricsin.rb: fix to skip string and comment
	  while preprocessing C source.


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ricsin@19515 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
diff --git a/ricsin/ChangeLog b/ricsin/ChangeLog
@@ -0,0 +1,6 @@
+Wed Sep 24 14:47:29 2008  Koichi Sasada  <ko1@atdot.net>
+
+	* ricsin/ricsin.rb: moved from tool/ricsin.rb.
+
+	* ricsin/ricsin.rb: fix to skip string and comment
+	  while preprocessing C source.
diff --git a/ricsin/Makefile b/ricsin/Makefile
diff --git a/ricsin/ricsin.rb b/ricsin/ricsin.rb
@@ -84,14 +84,25 @@ def generate_dll
     }
   end
 
+  Str = /("[^\\"]*(?:\\.[^\\"]*)*")/m
+  Com = /(\/\*.*?\*\/)/m
+  Oth = /([\w\W]+?(?=[\"\/]|\z))/m
+  CProg = /\G(?:#{Str}|#{Com}|#{Oth})/m
+
   def preprocess_c src
-    src.gsub(/\$(\w+)\b/){
-      # @ids[$~.to_s] = $1
-      "RGV(#{$1})"
-    }.gsub(/\@(\w+)\b/){
-      @ids[$~.to_s] = $1
-      "RIV(#{$1})"
+    ret = ''
+    src.scan(CProg){|str, comm, body|
+      ret << str if str
+      ret << comm if comm
+      ret << body.gsub(/\$(\w+)\b/){
+        # @ids[$~.to_s] = $1
+        "RGV(#{$1})"
+      }.gsub(/\@(\w+)\b/){
+        @ids[$~.to_s] = $1
+        "RIV(#{$1})"
+      } if body
     }
+    ret
   end
 
   def csrc_function name, params, src, pre_csrc, fastcall = true
diff --git a/ricsin/t.rcb b/ricsin/t.rcb
@@ -1,3 +1,10 @@
+
+$foo = 42
+p __C__('return $foo; /* $foo */')
+
+
+__END__
+
 p __C__('return INT2FIX(42);')
 
 __END__
