\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}