--- freem/src/xecline.c	2025/04/02 03:02:42	1.11
+++ freem/src/xecline.c	2025/04/09 19:52:02	1.12
@@ -1,5 +1,5 @@
 /*
- *   $Id: xecline.c,v 1.11 2025/04/02 03:02:42 snw Exp $
+ *   $Id: xecline.c,v 1.12 2025/04/09 19:52:02 snw Exp $
  *    freem interpreter proper
  *
  *  
@@ -24,6 +24,9 @@
  *   along with FreeM.  If not, see <https://www.gnu.org/licenses/>.
  *
  *   $Log: xecline.c,v $
+ *   Revision 1.12  2025/04/09 19:52:02  snw
+ *   Eliminate as many warnings as possible while building with -Wall
+ *
  *   Revision 1.11  2025/04/02 03:02:42  snw
  *   Stop requiring users to pass -e to fmadm when -u or -g are passed
  *
@@ -904,8 +907,7 @@ set0:
 
                 if (isalpha (vn[0]) && *(codptr + 1) == ':') {
                     char sc_string[255];
-                    register int sci;
-                    
+
                     codptr += 2;
                     expr (NAME);
 
@@ -1037,7 +1039,9 @@ set2:
 
                 if (new_and_set == TRUE) new_and_set = FALSE;
                 if (new_object == TRUE) new_object = FALSE;
+/*                
 set1:
+*/
                 if (*codptr != ',') break;
 
                 if (*++codptr == '@') goto again;
@@ -4005,8 +4009,9 @@ off3:
                     goto set2;
                 }
 
+/*                
 post_new:
-                
+*/                
                 ch = nstx;
                 
                 while (nestc[ch] == FOR) ch--;       /* FOR does not define a NEW level */
@@ -5679,9 +5684,6 @@ zgo:
             }
 
         case ZWRITE:
-
-
-zwrite:
             {
                 short k;
                 char w_tmp[512];
@@ -7453,7 +7455,7 @@ void rbuf_dump(void)
     
     for (i = 0; i < NO_OF_RBUF; i++) {
 
-        sprintf (flgs, "");
+        flgs[0] = '\0';
         
         if (ages[i] == 0) {
             sprintf (rnam, "---------");