X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=ghc%2Fruntime%2Fc-as-asm%2FFreeMallocPtr.lc;fp=ghc%2Fruntime%2Fc-as-asm%2FFreeMallocPtr.lc;h=0000000000000000000000000000000000000000;hb=5eb1c77c795f92ed0f4c8023847e9d4be1a4fd0d;hp=8dd9d03e0f649aa465b45d3cf8090cdbe33f2d6d;hpb=f7ecf7234c224489be8a5e63fced903b655d92ee;p=ghc-hetmet.git diff --git a/ghc/runtime/c-as-asm/FreeMallocPtr.lc b/ghc/runtime/c-as-asm/FreeMallocPtr.lc deleted file mode 100644 index 8dd9d03..0000000 --- a/ghc/runtime/c-as-asm/FreeMallocPtr.lc +++ /dev/null @@ -1,22 +0,0 @@ -\section[freemallocptr]{FreeMallocPtr} - -ToDo: obliterate -- SOF - -This is the default definition of FreeMallocPtr. It is a file by -itself so that the linker can choose to ignore it if it has already -seen a definition of FreeMallocPtr. - -\begin{code} -#ifndef PAR - -#include "rtsdefs.h" - -void -FreeMallocPtr (StgForeignObj mp) -{ - fprintf(stderr, "Error: No deallocation routine for MallocPtr %lx\n", (W_) mp); - EXIT(EXIT_FAILURE); -} - -#endif /* not PAR */ -\end{code}