diff tools/incpri.pl @ 685:3e3cf02297e4

before intel function call order fix
author kono
date Fri, 05 Oct 2007 16:06:41 +0900
parents e055df7c1082
children
line wrap: on
line diff
--- a/tools/incpri.pl	Tue Oct 02 21:18:12 2007 +0900
+++ b/tools/incpri.pl	Fri Oct 05 16:06:41 2007 +0900
@@ -27,6 +27,8 @@
     open(OUT,">$filename");
     $d = "0000";
     while(<IN>) {
+       s/fprintf\(([^,]+,)\"\#\d+\:/fprintf\($1\"\#$d\:/;
+       s/fprintf\(([^,]+,)\"([^#])/fprintf\($1\"\#$d\:$2/;
        s/printf\(\"\#\d+\:/printf\(\"\#$d\:/;
        s/printf\(\"([^#])/printf\(\"\#$d\:$1/;
        $d++;