From: panne <unknown>
Date: Sat, 12 Jun 2004 12:04:19 +0000 (+0000)
Subject: [project @ 2004-06-12 12:04:19 by panne]
X-Git-Tag: Initial_conversion_from_CVS_complete~1803
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=cc42f9eb35c726ad9df6689bceee0b564e4673ef;p=ghc-hetmet.git

[project @ 2004-06-12 12:04:19 by panne]
Tell the linker that we barf in lockFile now. Nuked an evil $Id$ on the way.
---

diff --git a/ghc/rts/Linker.c b/ghc/rts/Linker.c
index d18fd04..964f6fb 100644
--- a/ghc/rts/Linker.c
+++ b/ghc/rts/Linker.c
@@ -1,7 +1,6 @@
 /* -----------------------------------------------------------------------------
- * $Id: Linker.c,v 1.147 2004/05/15 15:35:47 dons Exp $
  *
- * (c) The GHC Team, 2000-2003
+ * (c) The GHC Team, 2000-2004
  *
  * RTS Object Linker
  *
@@ -364,6 +363,7 @@ typedef struct _RtsSymbolVal {
       SymX(__int_encodeDouble)			\
       SymX(__int_encodeFloat)			\
       SymX(andIntegerzh_fast)			\
+      SymX(barf)				\
       SymX(blockAsyncExceptionszh_fast)		\
       SymX(catchzh_fast)			\
       SymX(cmp_thread)				\