From a981a5e32c14c0207882684cfcae9d5e666ddc84 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Thu, 16 Aug 1990 19:19:49 +0000 Subject: [PATCH] Export `add_reload_cleanup'. --- v7/src/microcode/extern.h | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/v7/src/microcode/extern.h b/v7/src/microcode/extern.h index 4ee9a08b4..26e4c52b0 100644 --- a/v7/src/microcode/extern.h +++ b/v7/src/microcode/extern.h @@ -1,6 +1,6 @@ /* -*-C-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/extern.h,v 9.36 1990/06/20 17:40:07 cph Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/extern.h,v 9.37 1990/08/16 19:19:49 cph Exp $ Copyright (c) 1987, 1988, 1989, 1990 Massachusetts Institute of Technology @@ -220,6 +220,8 @@ extern CONST char * EXFUN (string_option_argument, (CONST char * name)); extern long EXFUN (numeric_option_argument, (CONST char * name, long defval)); extern Boolean Restore_History (); extern Boolean interpreter_applicable_p (); +extern void EXFUN + (add_reload_cleanup, (void EXFUN ((*cleanup_procedure), (void)))); /* Memory management utilities */ extern SCHEME_OBJECT Purify_Pass_2 (); -- 2.25.1