Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : ghc-7.2

http://hackage.haskell.org/trac/ghc/changeset/bfa7089f0464f279292592971f9a1b03dd77e0b1

>---------------------------------------------------------------

commit bfa7089f0464f279292592971f9a1b03dd77e0b1
Author: Simon Marlow <marlo...@gmail.com>
Date:   Fri Jul 8 10:47:57 2011 +0100

    remove getOrSetTypeableStore.  This is no longer used after the switch
    to using MD5 hashes to identify TypeReps in the Typeable library.

>---------------------------------------------------------------

 includes/rts/Globals.h |    1 -
 rts/Globals.c          |    8 --------
 rts/Linker.c           |    1 -
 3 files changed, 0 insertions(+), 10 deletions(-)

diff --git a/includes/rts/Globals.h b/includes/rts/Globals.h
index 218b7ef..9a2fbd0 100644
--- a/includes/rts/Globals.h
+++ b/includes/rts/Globals.h
@@ -17,7 +17,6 @@
 #ifndef RTS_GLOBALS_H
 #define RTS_GLOBALS_H
 
-StgStablePtr getOrSetTypeableStore(StgStablePtr value);
 StgStablePtr getOrSetGHCConcSignalSignalHandlerStore(StgStablePtr value);
 StgStablePtr getOrSetGHCConcWindowsPendingDelaysStore(StgStablePtr ptr);
 StgStablePtr getOrSetGHCConcWindowsIOManagerThreadStore(StgStablePtr ptr);
diff --git a/rts/Globals.c b/rts/Globals.c
index 7b8967f..06b2f97 100644
--- a/rts/Globals.c
+++ b/rts/Globals.c
@@ -19,7 +19,6 @@
 #include "Stable.h"
 
 typedef enum {
-    TypeableStore,
     GHCConcSignalSignalHandlerStore,
     GHCConcWindowsPendingDelaysStore,
     GHCConcWindowsIOManagerThreadStore,
@@ -80,13 +79,6 @@ static StgStablePtr getOrSetKey(StoreKey key, StgStablePtr 
ptr)
     return ret;
 }    
 
-
-StgStablePtr
-getOrSetTypeableStore(StgStablePtr ptr)
-{
-    return getOrSetKey(TypeableStore,ptr);
-}
-
 StgStablePtr
 getOrSetGHCConcSignalSignalHandlerStore(StgStablePtr ptr)
 {
diff --git a/rts/Linker.c b/rts/Linker.c
index 6d29ce7..781f705 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -787,7 +787,6 @@ typedef struct _RtsSymbolVal {
       SymI_HasProto(forkProcess)                        \
       SymI_HasProto(forkOS_createThread)                \
       SymI_HasProto(freeHaskellFunctionPtr)             \
-      SymI_HasProto(getOrSetTypeableStore)              \
       SymI_HasProto(getOrSetGHCConcSignalSignalHandlerStore)            \
       SymI_HasProto(getOrSetGHCConcWindowsPendingDelaysStore)           \
       SymI_HasProto(getOrSetGHCConcWindowsIOManagerThreadStore)         \



_______________________________________________
Cvs-ghc mailing list
Cvs-ghc@haskell.org
http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to