summaryrefslogtreecommitdiff
path: root/ghc/lib/std/cbits/allocMem.c
diff options
context:
space:
mode:
authorsimonmar <unknown>2000-11-07 10:42:57 +0000
committersimonmar <unknown>2000-11-07 10:42:57 +0000
commitf5448f5c5efe0630cb865ee0d21691a23ea932d3 (patch)
treeee73d098cf0cd96f120555bc82982b1ed7233ad4 /ghc/lib/std/cbits/allocMem.c
parent6cf31336921352120aa88065d75ec587cf9b03a5 (diff)
downloadhaskell-f5448f5c5efe0630cb865ee0d21691a23ea932d3.tar.gz
[project @ 2000-11-07 10:42:55 by simonmar]
merge before-ghci -> before-ghci-branch-merged into the ghc (non-compiler) parts of the tree.
Diffstat (limited to 'ghc/lib/std/cbits/allocMem.c')
-rw-r--r--ghc/lib/std/cbits/allocMem.c24
1 files changed, 0 insertions, 24 deletions
diff --git a/ghc/lib/std/cbits/allocMem.c b/ghc/lib/std/cbits/allocMem.c
deleted file mode 100644
index 609e8828e9..0000000000
--- a/ghc/lib/std/cbits/allocMem.c
+++ /dev/null
@@ -1,24 +0,0 @@
-/*
- * (c) The GRASP/AQUA Project, Glasgow University, 1994-1998
- *
- * $Id: allocMem.c,v 1.3 1999/11/25 16:54:14 simonmar Exp $
- *
- * malloc interface
- */
-
-#include "Rts.h"
-#include "stgio.h"
-
-StgAddr
-allocMemory__(StgInt sz/* bytes */)
-{
- StgAddr ptr;
-
- if ( (ptr = malloc(sz*sizeof(char))) == NULL) {
- ghc_errtype = ERR_RESOURCEEXHAUSTED;
- ghc_errstr = "malloc failed";
- return NULL;
- }
- return ptr;
-
-}