[project @ 1997-03-14 03:13:24 by sof]
authorsof <unknown>
Fri, 14 Mar 1997 03:13:24 +0000 (03:13 +0000)
committersof <unknown>
Fri, 14 Mar 1997 03:13:24 +0000 (03:13 +0000)
Remnant from MallocPtr days removed

ghc/runtime/hooks/FreeForeignObj.lc [deleted file]

diff --git a/ghc/runtime/hooks/FreeForeignObj.lc b/ghc/runtime/hooks/FreeForeignObj.lc
deleted file mode 100644 (file)
index 14dd4c9..0000000
+++ /dev/null
@@ -1,18 +0,0 @@
-\section{FreeForeignObj}
-
-ToDo: obliterate -- SOF
-
-This is the default definition of freeForeignObj.  It is a file by
-itself so that the linker can choose to ignore it if it has already
-seen a definition of freeForeignObj.
-
-\begin{code}
-#include "rtsdefs.h"
-
-void
-freeForeignObj (StgForeignObj mp)
-{
-    fprintf(stderr, "Error: No deallocation routine for ForeignObj %lx\n", (W_) mp);
-    EXIT(EXIT_FAILURE);
-}
-\end{code}