diff --git a/CHANGELOG.markdown b/CHANGELOG.markdown
--- a/CHANGELOG.markdown
+++ b/CHANGELOG.markdown
@@ -1,3 +1,7 @@
+0.9.4 [2021.02.17]
+------------------
+* Export `identity` from `Data.Interned.IntSet`.
+
 0.9.3 [2020.09.30]
 ------------------
 * Add `Hashable` instances for `InternedString`, `InternedByteString`,
diff --git a/Data/Interned/IntSet.hs b/Data/Interned/IntSet.hs
--- a/Data/Interned/IntSet.hs
+++ b/Data/Interned/IntSet.hs
@@ -49,6 +49,8 @@
             -- * Set type
               IntSet          -- instance Eq,Show
 
+            , identity
+
             -- * Operators
             , (\\)
 
@@ -186,6 +188,7 @@
 bin_ :: Prefix -> Mask -> IntSet -> IntSet -> IntSet
 bin_ p m l r = intern (UBin p m l r)
 
+-- | A unique integer ID associated with each interned set.
 identity :: IntSet -> Id
 identity Nil = 0
 identity (Tip i _) = i
diff --git a/README.markdown b/README.markdown
--- a/README.markdown
+++ b/README.markdown
@@ -1,7 +1,7 @@
 intern
 ======
 
-[![Hackage](https://img.shields.io/hackage/v/intern.svg)](https://hackage.haskell.org/package/intern) [![Build Status](https://secure.travis-ci.org/ekmett/intern.png?branch=master)](http://travis-ci.org/ekmett/intern)
+[![Hackage](https://img.shields.io/hackage/v/intern.svg)](https://hackage.haskell.org/package/intern) [![Build Status](https://github.com/ekmett/intern/workflows/Haskell-CI/badge.svg)](https://github.com/ekmett/intern/actions?query=workflow%3AHaskell-CI)
 
 Efficient hash-consing for arbitrary data types.
 
diff --git a/intern.cabal b/intern.cabal
--- a/intern.cabal
+++ b/intern.cabal
@@ -1,6 +1,6 @@
 name:          intern
 category:      Data, Data Structures
-version:       0.9.3
+version:       0.9.4
 license:       BSD3
 cabal-version: >= 1.10
 license-file:  LICENSE
@@ -35,7 +35,7 @@
 library
   build-depends:
     base                 >= 4     && < 5,
-    bytestring           >= 0.9   && < 0.11,
+    bytestring           >= 0.9   && < 0.12,
     text                 >= 0.11  && < 1.3,
     hashable             >= 1.1   && < 1.4,
     unordered-containers >= 0.2.1 && < 0.3,
