add module that only exports abstract types

This commit is contained in:
Joey Hess 2010-10-14 02:12:41 -04:00
parent e47dca162a
commit eda80e44c5
7 changed files with 23 additions and 6 deletions

17
AbstractTypes.hs Normal file
View file

@ -0,0 +1,17 @@
{- git-annex data types, abstract only -}
module AbstractTypes (
Annex,
AnnexState,
makeAnnexState,
runAnnexState,
gitAnnex,
gitAnnexChange,
backendsAnnex,
backendsAnnexChange,
Key,
Backend
) where
import Types

View file

@ -24,7 +24,7 @@ import Backend
import BackendList
import UUID
import LocationLog
import Types
import AbstractTypes
{- Create and returns an Annex state object.
- Examines and prepares the git repo.

View file

@ -11,7 +11,7 @@ module CmdLine (
) where
import System.Console.GetOpt
import Types
import AbstractTypes
import Annex
data Mode = Add | Push | Pull | Want | Get | Drop | Unannex

View file

@ -32,7 +32,7 @@ import Data.Char
import GitRepo
import Utility
import UUID
import Types
import AbstractTypes
import Locations
data LogLine = LogLine {

View file

@ -9,7 +9,7 @@ module Remotes (
import Control.Monad.State (liftIO)
import qualified Data.Map as Map
import Data.String.Utils
import Types
import AbstractTypes
import GitRepo
import LocationLog
import Locations

View file

@ -20,7 +20,7 @@ import List
import System.Cmd.Utils
import System.IO
import GitRepo
import Types
import AbstractTypes
type UUID = String

View file

@ -6,7 +6,7 @@ import System.IO
import System.Environment
import Control.Exception
import CmdLine
import Types
import AbstractTypes
import Annex
main = do