From 98bd974d6a0f48c33c3c13af54a18a4c766f3235 Mon Sep 17 00:00:00 2001 From: simonmar Date: Wed, 28 Mar 2001 16:40:48 +0000 Subject: [PATCH] [project @ 2001-03-28 16:40:48 by simonmar] add performGC --- ghc/rts/Linker.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/ghc/rts/Linker.c b/ghc/rts/Linker.c index 8e3a7c7..6455feb 100644 --- a/ghc/rts/Linker.c +++ b/ghc/rts/Linker.c @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: Linker.c,v 1.33 2001/03/22 03:51:10 hwloidl Exp $ + * $Id: Linker.c,v 1.34 2001/03/28 16:40:48 simonmar Exp $ * * (c) The GHC Team, 2000 * @@ -180,6 +180,7 @@ typedef struct _RtsSymbolVal { SymX(prog_argv) \ SymX(prog_argc) \ SymX(resetNonBlockingFd) \ + SymX(performGC) \ SymX(getStablePtr) \ SymX(stable_ptr_table) \ SymX(shutdownHaskellAndExit) \ -- 1.7.10.4