--- freem/src/fma_globals.c	2025/01/19 02:04:04	1.1
+++ freem/src/fma_globals.c	2025/03/09 15:20:18	1.3
@@ -15,7 +15,7 @@
  *    fmadm - globals
  *
  *  
- *   Author: Serena Willis <jpw@coherent-logic.com>
+ *   Author: Serena Willis <snw@coherent-logic.com>
  *    Copyright (C) 1998 MUG Deutschland
  *    Copyright (C) 2020 Coherent Logic Development LLC
  *
@@ -54,8 +54,9 @@ void gl (char *global, short kf, short d
 int gverify (char *gpath);
 static short int g_collate ();			/* if 't' follows 's' in MUMPS collating */
 int key_check (char *key);
-void check ();
-void show ();
+void check (unsigned long blknbr);
+static short int g_collate (char s[], char t[]);			/* if 't' follows 's' in MUMPS collating */
+void show (char key[]);
 
 /* global variables for gverify */
 short   filedes;			/* file descriptor */
@@ -1008,7 +1009,7 @@ showpath ()
 	for (i = 0; i < level; i++)
 	    printf ("  path level(%d)=%ld\012\015", i, llink[i]);
     if (++exstat >= ERRLIM) {
-	fprintf (stderr, "Error limit exceeded (%hd errors)\012\015", exstat, ERRLIM);
+	fprintf (stderr, "Error limit exceeded (%hd errors)\012\015", exstat);
 	return;
     }
     return;
@@ -1044,11 +1045,7 @@ int key_check (char *key)				/* checks a
     return 0;
 }					/* end key_check */
 /******************************************************************************/
-static short int
-g_collate (s, t)			/* if 't' follows 's' in MUMPS collating */
-	char    s[];			/* sequence a TRUE is returned           */
-	char    t[];
-
+static short int g_collate (char s[], char t[])			/* if 't' follows 's' in MUMPS collating */
 {
     register int chs = *s;
     register int cht = *t;
@@ -1149,9 +1146,7 @@ g_collate (s, t)			/* if 't' follows 's'
     return dif > 0;
 }					/* end g_collate */
 /******************************************************************************/
-void
-show (key)
-	char    key[];			/* key in internal format to be expanded and shown */
+void show (char key[])
 {
     int     k,
             ch,