[project @ 1997-09-09 17:56:30 by sof]

[ghc-hetmet.git] / ghc / compiler / basicTypes / Unique.hi-boot

diff --git a/ghc/compiler/basicTypes/Unique.hi-boot b/ghc/compiler/basicTypes/Unique.hi-boot
index 237ea4a..96175be 100644 (file)
--- a/ghc/compiler/basicTypes/Unique.hi-boot
+++ b/ghc/compiler/basicTypes/Unique.hi-boot
@@ -1,6 +1,7 @@
 _interface_ Unique 1
 _exports_
-Unique Unique mkUniqueGrimily;
+Unique Unique Uniquable(uniqueOf) mkUniqueGrimily;
 _declarations_
-1 data Unique;
-1 mkUniqueGrimily _:_ GHC.Int# -> Unique.Unique ;;
+1 class Uniquable a where {uniqueOf :: a -> Unique} ;
+1 data Unique = MkUnique GHC.Int# ;
+1 mkUniqueGrimily _:_ GHC.Int# -> Unique ;;