blob: 12dab8da844b17dd56f6a773c1a6f80e1db065a7 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
{- git-annex assistant commit tracking
-
- Copyright 2012 Joey Hess <joey@kitenet.net>
-
- Licensed under the GNU GPL version 3 or higher.
-}
module Assistant.Types.Commits where
import Utility.TSet
import Control.Concurrent.STM
type CommitChan = TSet Commit
data Commit = Commit
newCommitChan :: IO CommitChan
newCommitChan = atomically newTSet
|