Re: [PATCH] omit symbol name and line image from cache

[Hideki IWAMOTO]

On Sun, 25 May 2003 15:34:34 +0900, Hideki IWAMOTO wrote...
> It is not necessary to cache line image and symbol name.
> This change makes cache files smaller.
> 

Sorry. Previous patch is buggy. This is fixed version.

Index: htags/htags.in
===================================================================
RCS file: /cvsroot/global/global/htags/htags.in,v
retrieving revision 1.123
diff -u -r1.123 htags.in
--- htags/htags.in      24 May 2003 14:55:07 -0000      1.123
+++ htags/htags.in      25 May 2003 13:53:31 -0000
@@ -1432,7 +1432,8 @@
                                }
                                # single entry
                                if ($first_line) {
-                                       &cache'put($db, $prev, $first_line);
+                                       local($nouse, $lno, $filename) = 
split(/[ \t]+/, $first_line);
+                                       &cache'put($db, $prev, "$lno 
$filename");
                                }
                                $first_line = $_;
                                $prev = $tag;
@@ -1585,7 +1586,7 @@
                                }
                        }
                } else {
-                       local($tag, $lno, $filename) = split(/[ \t]+/, $line);
+                       local($lno, $filename) = split(/[ \t]+/, $line);
                        $filename = &'path2url($filename);
                        $url = "$'SRCS/$filename#$lno";
                        if ($'aflag) {
@@ -2290,8 +2291,7 @@
                                                $href .= " 
onMouseOver=\"show('$TYPE',-1,'')\"" if ($'use_javascript);
                                                $href .= ">$TAG</A>";
                                        } else {
-                                               local($nouse, $lno, $filename) 
= split(/[ \t]+/, $line);
-                                               $nouse = '';    # to make perl 
quiet
+                                               local($lno, $filename) = 
split(/[ \t]+/, $line);
                                                local($url) = 
&'path2url($filename);
                                                $filename =~ s!\./!!; 
                                                $href = "<A 
HREF=../$'SRCS/$url#$lno";

----
Hideki IWAMOTO  address@hidden