summaryrefslogtreecommitdiff
path: root/compiler/cbits
diff options
context:
space:
mode:
authorIan Lynagh <ian@well-typed.com>2013-05-17 16:50:08 +0100
committerIan Lynagh <ian@well-typed.com>2013-05-17 16:50:08 +0100
commita08759d165ca1a0cfe9ada26f6ea6b9a38ad8853 (patch)
tree2043ea39590b0780e4e9443be680108b3bc325f5 /compiler/cbits
parent8ed0bdab7e69bfec14b1de2d662349626f587119 (diff)
downloadhaskell-a08759d165ca1a0cfe9ada26f6ea6b9a38ad8853.tar.gz
Move the genSym stuff from rts into compiler
It's no longer used by Data.Unique, so there's no need to have it in rts any more.
Diffstat (limited to 'compiler/cbits')
-rw-r--r--compiler/cbits/genSym.c9
1 files changed, 9 insertions, 0 deletions
diff --git a/compiler/cbits/genSym.c b/compiler/cbits/genSym.c
new file mode 100644
index 0000000000..2d9779b898
--- /dev/null
+++ b/compiler/cbits/genSym.c
@@ -0,0 +1,9 @@
+
+#include "Rts.h"
+
+static HsInt GenSymCounter = 0;
+
+HsInt genSym(void) {
+ return GenSymCounter++;
+}
+