blob: 500faa9011d561d4fe05536b9aaeca867540d96a (
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.TList
import Control.Concurrent.STM
type CommitChan = TList Commit
data Commit = Commit
newCommitChan :: IO CommitChan
newCommitChan = atomically newTList
|
