[CF-Devel] Re: [Crossfire-cvs] CVS commit: crossfire/lib

crossfire-devel at archives.real-time.com crossfire-devel at archives.real-time.com
Mon Sep 27 00:35:49 CDT 2004


>
     
      Log Message:
     
     >
     
      Modified so the comment in arches are stripped away
     
     
  Just a note, a line like:

  if (/^#/) {
(do comment stuff)
}

  after the while <ARC> line would work better.  The change as done below will 
not catch things like:

#########################3
# block comment

  or things like:

#this is a comment


>
     
     
     >
     
     
     >
     
     
     >
     
      Start of context diffs
     
     >
     
     
     >
     
     
     >
     
      Index: crossfire/lib/collect.pl.in
     
     >
     
      diff -c crossfire/lib/collect.pl.in:1.11 crossfire/lib/collect.pl.in:1.12
     
     >
     
      *** crossfire/lib/collect.pl.in:1.11	Fri Sep 12 22:01:40 2003
     
     >
     
      --- crossfire/lib/collect.pl.in	Sat Sep 25 09:02:15 2004
     
     >
     
      ***************
     
     >
     
      *** 200,205 ****
     
     >
     
      --- 200,210 ----
     
     >
     
        line:	while(<ARC>) {
     
     >
     
        	    chop;
     
     >
     
        	    ($
      
      var, at values
      
      ) = split;
     
     >
     
      +             if ($var eq "#"){
     
     >
     
      +                 #developper comment, switch to next line
     
     >
     
      +                 $commentNum++;
     
     >
     
      +                 next line;
     
     >
     
      +             }
     
     >
     
        	    if ($var eq "Object") {
     
     >
     
        		$lface[0] = "";
     
     >
     
        		$#lface = 0;
     
     >
     
      ***************
     
     >
     
      *** 453,456 ****
     
     >
     
      --- 458,462 ----
     
     >
     
            &info(Treasures.":\t".($#treasure_files+1));
     
     >
     
            &info(Trash.":\t".$trashNum);
     
     >
     
            &info(Smooths.":\t".$smoothNum);
     
     >
     
      +     &info("Comment lines:\t".$commentNum);
     
     >
     
        }
     
     >
     
     
     >
     
     
     >
     
      -------------------------------------------------------
     
     >
     
      This SF.Net email is sponsored by: YOU BE THE JUDGE. Be one of 170
     
     >
     
      Project Admins to receive an Apple iPod Mini FREE for your judgement on
     
     >
     
      who ports your project to Linux PPC the best. Sponsored by IBM.
     
     >
     
      Deadline: Sept. 24. Go here: 
      
      http://sf.net/ppc_contest.php
      
      
     >
     
      _______________________________________________
     
     >
     
      Crossfire-cvs mailing list
     
     >
     
     
      Crossfire-cvs at lists.sourceforge.net
      
      
     >
     
     
      https://lists.sourceforge.net/lists/listinfo/crossfire-cvs
      
      
     

_______________________________________________
crossfire-devel mailing list
     
     crossfire-devel at lists.real-time.com
     
     
     https://mailman.real-time.com/mailman/listinfo/crossfire-devel
     
     
    


More information about the crossfire mailing list