m_backup.c: Move interface to own file.

[nmh] / sbr / done.c

diff --git a/sbr/done.c b/sbr/done.c
index 02465ea07431bc733afe7db6b1c6187bfc7b0863..8b197b256db4799ac924d83e9f8dba4b7808ace6 100644 (file)
--- a/sbr/done.c
+++ b/sbr/done.c
@@ -1,14 +1,33 @@
-
-/*
- * done.c -- terminate the program
+/* done.c -- terminate the program

  *
  *

- * $Id$
+ * This code is Copyright (c) 2002, by the authors of nmh.  See the
+ * COPYRIGHT file in the root directory of the nmh distribution for
+ * complete copyright information.

  */
 
  */
 

-#include <h/mh.h>
+#include "h/mh.h"
+#include "error.h"
+
+static void (*altexit)(int) NORETURN = exit;

 
 

+/* set_done changes the path of done() from exit(3), or back to exit(3).
+ * Anything else will work, but a standard-error warning will report the
+ * old non-exit() value has been trampled. */

 void
 void

-done (int status)
+set_done(void (*new)(int) NORETURN)
+{
+    generic_pointer gpo, gpn;
+
+    if (altexit != exit && new != exit) {
+        gpo.f = (void (*)(void))altexit;
+        gpn.f = (void (*)(void))new;
+        inform("altexit trampled: %p %p", gpo.v, gpn.v);
+    }
+    altexit = new;
+}
+
+void NORETURN
+done(int status)

 {
 {

-    exit (status);
+    (*altexit)(status);

 }
 }