From: Chris Hanson <org/chris-hanson/cph>
Date: Sun, 1 May 2011 09:03:47 +0000 (-0700)
Subject: Revert misguided change.
X-Git-Tag: 20110609-Gtk~5^2~20
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=2050cb6e82ec8201b8ceab0684c057add361e232;p=mit-scheme.git

Revert misguided change.
---

diff --git a/src/microcode/outf.c b/src/microcode/outf.c
index c8ffeffb7..1daa0b1ea 100644
--- a/src/microcode/outf.c
+++ b/src/microcode/outf.c
@@ -168,22 +168,10 @@ outf_flush_error (void)
     fflush (stderr);
 }
 
-static unsigned int
-find_fatal_buf_nul (void)
-{
-  unsigned int scan = 0;
-  while (scan < MAX_FATAL_BUF)
-    if ((fatal_buf[scan++]) == '\0')
-      return (scan - 1);
-  /* There's no NUL character in the buffer. */
-  (fatal_buf[0]) = '\0';
-  return (0);
-}
-
 void
 voutf_fatal (const char * format, va_list args)
 {
-  unsigned int end = (find_fatal_buf_nul ());
+  unsigned int end = (strlen (fatal_buf));
   VSNPRINTF ((& (fatal_buf[end])), (MAX_FATAL_BUF - end), format, args);
 }