X-Git-Url: https://git.dogcows.com/gitweb?a=blobdiff_plain;f=src%2Ftransform.c;h=fd2ed51ec70401101b0120693e28974a9463e477;hb=ab8711413cb411678d910332b6d36cae9275dbd5;hp=8098ae23f51ed5c15dfb233c08f494a9a525577c;hpb=6be1349236dd673d6d449747e4a6d27d6bc92fe2;p=chaz%2Ftar

diff --git a/src/transform.c b/src/transform.c
index 8098ae2..fd2ed51 100644
--- a/src/transform.c
+++ b/src/transform.c
@@ -19,7 +19,7 @@
 #include <regex.h>
 #include "common.h"
 
-enum transform_type
+static enum transform_type
   {
     transform_none,
     transform_first,
@@ -64,7 +64,7 @@ struct replace_segm
 
 /* Compiled replacement expression */
 static struct replace_segm *repl_head, *repl_tail;
-static segm_count; /* Number of elements in the above list */
+static size_t segm_count; /* Number of elements in the above list */
 
 static struct replace_segm *
 add_segment (void)
@@ -103,7 +103,7 @@ add_char_segment (int chr)
   segm->v.literal.ptr = xmalloc (2);
   segm->v.literal.ptr[0] = chr;
   segm->v.literal.ptr[1] = 0;
-  segm->v.literal.size = 2;
+  segm->v.literal.size = 1;
 }
 
 static void
@@ -377,7 +377,6 @@ bool
 _transform_name_to_obstack (char *input)
 {
   regmatch_t *rmp;
-  char *p;
   int rc;
   size_t nmatches = 0;
   enum case_ctl_type case_ctl = ctl_stop,  /* Current case conversion op */
@@ -501,7 +500,7 @@ _transform_name_to_obstack (char *input)
 bool
 transform_name_fp (char **pinput, char *(*fun)(char *))
 {
-    char *str, *p;
+    char *str;
     bool ret = _transform_name_to_obstack (*pinput);
     if (ret)
       {
@@ -526,20 +525,3 @@ transform_name (char **pinput)
   return transform_name_fp (pinput, NULL);
 }
 
-#if 0
-void
-read_and_transform_loop ()
-{
-  char buf[512];
-  while (fgets (buf, sizeof buf, stdin))
-    {
-      char *p = buf + strlen (buf);
-      if (p[-1] == '\n')
-	p[-1] = 0;
-      if (transform_name (buf, &p))
-	printf ("=> %s\n", p);
-      else
-	printf ("=\n");
-    }
-}
-#endif