From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 18 Jan 2000 04:26:30 +0000 (+0000)
Subject: Eliminate compiler warning.
X-Git-Tag: 20090517-FFI~4325
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=2ec5abc457b8a2076f69df21ac260a988bfe6609;p=mit-scheme.git

Eliminate compiler warning.
---

diff --git a/v7/src/microcode/boot.c b/v7/src/microcode/boot.c
index a1120b118..0a97ca312 100644
--- a/v7/src/microcode/boot.c
+++ b/v7/src/microcode/boot.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: boot.c,v 9.102 2000/01/18 04:25:49 cph Exp $
+$Id: boot.c,v 9.103 2000/01/18 04:26:30 cph Exp $
 
 Copyright (c) 1988-2000 Massachusetts Institute of Technology
 
@@ -78,13 +78,6 @@ DEFUN (obstack_chunk_alloc, (size), unsigned int size)
 DECLARE_CRITICAL_SECTION ();
 
 #define BLOCKS_TO_BYTES(n) ((n) * 1024)
-
-static void
-DEFUN (usage, (error_string), CONST char * error_string)
-{
-  outf_fatal ("%s: %s\n\n", scheme_program_name, error_string);
-  termination_init_error ();
-}
 
 /* Exit is done in a different way on some operating systems (eg. VMS)  */