diff --git a/ghc/runtime/hooks/FreeForeignObj.lc b/ghc/runtime/hooks/FreeForeignObj.lc
deleted file mode 100644
index 14dd4c92a8cfa628c73db97b87c345b063b21e42..0000000000000000000000000000000000000000
--- a/ghc/runtime/hooks/FreeForeignObj.lc
+++ /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}