gnue/geas/tools gcdverifier.c

[Neil Tiffin]

CVSROOT:        /home/cvs
Module name:    gnue
Changes by:     Neil Tiffin <address@hidden>    01/05/27 15:19:51

Modified files:
        geas/tools     : gcdverifier.c 

Log message:
        Revise in preparation for moving dir scan code to classdefs.c. [T191].

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/gnue/geas/tools/gcdverifier.c.diff?cvsroot=OldCVS&tr1=1.19&tr2=1.20&r1=text&r2=text

Patches:
Index: gnue/geas/tools/gcdverifier.c
diff -u gnue/geas/tools/gcdverifier.c:1.19 gnue/geas/tools/gcdverifier.c:1.20
--- gnue/geas/tools/gcdverifier.c:1.19  Fri May 25 12:34:52 2001
+++ gnue/geas/tools/gcdverifier.c       Sun May 27 15:19:51 2001
@@ -20,7 +20,7 @@
    along with this program; if not, write to the Free Software Foundation,
    Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  
  
-   $Id: gcdverifier.c,v 1.19 2001/05/25 19:34:52 ntiffin Exp $
+   $Id: gcdverifier.c,v 1.20 2001/05/27 22:19:51 ntiffin Exp $
 */
 
 #include <glib.h>
@@ -37,9 +37,9 @@
 
 /* #define errormsg(fmt,args...) 
error_message_out("error",__FILE__,__PRETTY_FUNCTION__,__LINE__ , fmt , ##args 
) */
 
-void verify_class_files (const char *name);
+void get_files_from_dir (odl_filenamelist * filelist, const char *name);
 
-odl_filenamelist *fl = NULL;
+/* odl_filenamelist *fl = NULL; */
 
 /** \brief Message output function
  */
@@ -111,6 +111,7 @@
 int
 main (int argc, char *argv[])
 {
+  odl_filenamelist *fl = NULL;
   odl_tree *t = NULL;
   int i, count;
   gboolean fullname = FALSE;
@@ -141,7 +142,7 @@
           else if (strcmp (argv[i], "--version") == 0)
             {
               GString *revision;
-              revision = g_string_new ("$Revision: 1.19 $");
+              revision = g_string_new ("$Revision: 1.20 $");
               if (revision->len > 14)
                 {
                   revision = g_string_erase (revision, 0, 11);  /* remove the 
'$Revsion:' part */
@@ -167,7 +168,7 @@
               /* must be a directory */
               /* means directories with .gcd at the end will not work */
               number_entries++;
-              verify_class_files (argv[i]);
+              get_files_from_dir (fl, argv[i]);
             }
         }
       if (number_entries > 0)
@@ -203,7 +204,7 @@
  * 
 \* ------------------------------------------------------------------------- */
 void
-verify_class_files (const char *name)
+get_files_from_dir (odl_filenamelist * filelist, const char *name)
 {
   struct dirent *next;
   DIR *reading;
@@ -317,7 +318,7 @@
                   if (tmp)
                     {
                       /* debug_output(DEBUGLEVEL_MEDIUM,"Adding %s to odl file 
name list", tmp); */
-                      fl = odl_filenamelist_add (fl, tmp);
+                      filelist = odl_filenamelist_add (filelist, tmp);
                       g_free (tmp);
                     }
                 }
@@ -340,7 +341,7 @@
       tmp = g_list_next (tmp);
     }
   g_list_free (subdirs);
-  if (!fl)
+  if (!filelist)
     {
       error_message_out
         ("error", __FILE__, __PRETTY_FUNCTION__, __LINE__,