micropolis-activity: fails to build with clang instead of gcc

[micropolis] / src / tcl / tclenv.c

diff --git a/src/tcl/tclenv.c b/src/tcl/tclenv.c
index be330e14b2f50de291bf8b38badfb6077c3906cf..e85089191eb1fdd0d5dd572fca554ad5965d3130 100644 (file)
--- a/src/tcl/tclenv.c
+++ b/src/tcl/tclenv.c
@@ -58,7 +58,7 @@ static char *         EnvTraceProc _ANSI_ARGS_((ClientData clientData,
 static int             FindVariable _ANSI_ARGS_((char *name, int *lengthPtr));
 
 void                   setenv_tcl _ANSI_ARGS_((char *name, char *value));
-int                    unsetenv_tcl _ANSI_ARGS_((char *name));
+void                   unsetenv_tcl _ANSI_ARGS_((char *name));
 
 \f
 /*
@@ -277,7 +277,7 @@ setenv_tcl(name, value)
  *----------------------------------------------------------------------
  */
 
-int
+void
 unsetenv_tcl(name)
     char *name;                        /* Name of variable to remove. */
 {