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

On branch  : master

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

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

commit a624378d7d6a3cb2481466cc2e11cc5f1caf0a3f
Author: Simon Marlow <[email protected]>
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
[email protected]
http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to