| darcs-2.4.3: a distributed, interactive, smart revision control system | Source code | Contents | Index
Darcs.Repository
Contents
Recorded and unrecorded and pending. Index.
Synopsis
data Repository p
($-) :: ((forall p. RepoPatch p => Repository p -> IO a) -> IO a) -> (forall p. RepoPatch p => Repository p -> IO a) -> IO a
maybeIdentifyRepository :: [DarcsFlag] -> String -> IO (Either String (Repository p))
identifyRepositoryFor :: forall p. RepoPatch p => Repository p -> String -> IO (Repository p)
withRepoLock :: [DarcsFlag] -> (forall p. RepoPatch p => Repository p -> IO a) -> IO a
withRepoReadLock :: [DarcsFlag] -> (forall p. RepoPatch p => Repository p -> IO a) -> IO a
withRepository :: [DarcsFlag] -> (forall p. RepoPatch p => Repository p -> IO a) -> IO a
withRepositoryDirectory :: forall a. [DarcsFlag] -> String -> (forall p. RepoPatch p => Repository p -> IO a) -> IO a
withGutsOf :: Repository p -> IO () -> IO ()
makePatchLazy :: RepoPatch p => Repository p -> PatchInfoAnd p -> IO (PatchInfoAnd p)
writePatchSet :: RepoPatch p => PatchSet p -> [DarcsFlag] -> IO (Repository p)
findRepository :: [DarcsFlag] -> IO (Either String ())
amInRepository :: [DarcsFlag] -> IO (Either String ())
amNotInRepository :: [DarcsFlag] -> IO (Either String ())
slurp_pending :: RepoPatch p => Repository p -> IO Slurpy
replacePristine :: Repository p -> Tree IO -> IO ()
slurp_recorded :: RepoPatch p => Repository p -> IO Slurpy
slurp_recorded_and_unrecorded :: RepoPatch p => Repository p -> IO (Slurpy, Slurpy)
withRecorded :: RepoPatch p => Repository p -> ((AbsolutePath -> IO a) -> IO a) -> (AbsolutePath -> IO a) -> IO a
read_repo :: RepoPatch p => Repository p -> IO (PatchSet p)
prefsUrl :: Repository p -> String
add_to_pending :: RepoPatch p => Repository p -> FL Prim -> IO ()
tentativelyAddPatch :: RepoPatch p => Repository p -> [DarcsFlag] -> PatchInfoAnd p -> IO ()
tentativelyRemovePatches :: RepoPatch p => Repository p -> [DarcsFlag] -> FL (Named p) -> IO ()
tentativelyAddToPending :: forall p. RepoPatch p => Repository p -> [DarcsFlag] -> FL Prim -> IO ()
tentativelyReplacePatches :: forall p. RepoPatch p => Repository p -> [DarcsFlag] -> FL (Named p) -> IO ()
tentativelyMergePatches :: RepoPatch p => Repository p -> String -> [DarcsFlag] -> FL (PatchInfoAnd p) -> FL (PatchInfoAnd p) -> IO (Sealed (FL Prim))
considerMergeToWorking :: RepoPatch p => Repository p -> String -> [DarcsFlag] -> FL (PatchInfoAnd p) -> FL (PatchInfoAnd p) -> IO (Sealed (FL Prim))
revertRepositoryChanges :: RepoPatch p => Repository p -> IO ()
finalizeRepositoryChanges :: RepoPatch p => Repository p -> IO ()
createRepository :: [DarcsFlag] -> IO ()
copyRepository :: RepoPatch p => Repository p -> IO ()
copy_oldrepo_patches :: RepoPatch p => [DarcsFlag] -> Repository p -> FilePath -> IO ()
patchSetToRepository :: RepoPatch p => Repository p -> PatchSet p -> [DarcsFlag] -> IO (Repository p)
unrevertUrl :: Repository p -> String
applyToWorking :: Patchy p => Repository p1 -> [DarcsFlag] -> p -> IO ()
patchSetToPatches :: RepoPatch p => RL (RL (PatchInfoAnd p)) -> FL (Named p)
createPristineDirectoryTree :: RepoPatch p => Repository p -> FilePath -> IO ()
createPartialsPristineDirectoryTree :: (FilePathLike fp, RepoPatch p) => Repository p -> [fp] -> FilePath -> IO ()
optimizeInventory :: RepoPatch p => Repository p -> IO ()
cleanRepository :: RepoPatch p => Repository p -> IO ()
getMarkedupFile :: RepoPatch p => Repository p -> PatchInfo -> FilePath -> IO MarkedUpFile
type PatchSet p = RL (RL (PatchInfoAnd p))
type SealedPatchSet p = Sealed (RL (RL (PatchInfoAnd p)))
data PatchInfoAnd p
setScriptsExecutable :: IO ()
checkUnrelatedRepos :: [DarcsFlag] -> [PatchInfo] -> PatchSet p -> PatchSet p -> IO ()
testTentative :: RepoPatch p => Repository p -> IO ()
testRecorded :: RepoPatch p => Repository p -> IO ()
readRecorded :: RepoPatch p => Repository p -> IO (Tree IO)
readUnrecorded :: RepoPatch p => Repository p -> IO (Tree IO)
unrecordedChanges :: RepoPatch p => [DarcsFlag] -> Repository p -> [SubPath] -> IO (FL Prim)
readPending :: RepoPatch p => Repository p -> IO (Tree IO, Sealed (FL Prim))
pendingChanges :: RepoPatch p => Repository p -> [SubPath] -> IO (Sealed (FL Prim))
readRecordedAndPending :: RepoPatch p => Repository p -> IO (Tree IO)
readIndex :: RepoPatch p => Repository p -> IO Index
invalidateIndex :: t -> IO ()
Documentation
data Repository p | Source
Instances
Show (Repository p)
($-) :: ((forall p. RepoPatch p => Repository p -> IO a) -> IO a) -> (forall p. RepoPatch p => Repository p -> IO a) -> IO a | Source
maybeIdentifyRepository :: [DarcsFlag] -> String -> IO (Either String (Repository p)) | Source
identifyRepositoryFor :: forall p. RepoPatch p => Repository p -> String -> IO (Repository p) | Source
withRepoLock :: [DarcsFlag] -> (forall p. RepoPatch p => Repository p -> IO a) -> IO a | Source
withRepoReadLock :: [DarcsFlag] -> (forall p. RepoPatch p => Repository p -> IO a) -> IO a | Source
withRepository :: [DarcsFlag] -> (forall p. RepoPatch p => Repository p -> IO a) -> IO a | Source
withRepositoryDirectory :: forall a. [DarcsFlag] -> String -> (forall p. RepoPatch p => Repository p -> IO a) -> IO a | Source
withGutsOf :: Repository p -> IO () -> IO () | Source
makePatchLazy :: RepoPatch p => Repository p -> PatchInfoAnd p -> IO (PatchInfoAnd p) | Source
writePatchSet :: RepoPatch p => PatchSet p -> [DarcsFlag] -> IO (Repository p) | Source
writePatchSet is like patchSetToRepository, except that it doesn't touch the working directory or pristine cache.
findRepository :: [DarcsFlag] -> IO (Either String ()) | Source
amInRepository :: [DarcsFlag] -> IO (Either String ()) | Source
amNotInRepository :: [DarcsFlag] -> IO (Either String ()) | Source
slurp_pending :: RepoPatch p => Repository p -> IO Slurpy | Source
replacePristine :: Repository p -> Tree IO -> IO () | Source
Replace the existing pristine with a new one (loaded up in a Tree object).
slurp_recorded :: RepoPatch p => Repository p -> IO Slurpy | Source
slurp_recorded_and_unrecorded :: RepoPatch p => Repository p -> IO (Slurpy, Slurpy) | Source
withRecorded :: RepoPatch p => Repository p -> ((AbsolutePath -> IO a) -> IO a) -> (AbsolutePath -> IO a) -> IO a | Source
read_repo :: RepoPatch p => Repository p -> IO (PatchSet p) | Source
prefsUrl :: Repository p -> String | Source
add_to_pending :: RepoPatch p => Repository p -> FL Prim -> IO () | Source
tentativelyAddPatch :: RepoPatch p => Repository p -> [DarcsFlag] -> PatchInfoAnd p -> IO () | Source
tentativelyRemovePatches :: RepoPatch p => Repository p -> [DarcsFlag] -> FL (Named p) -> IO () | Source
tentativelyAddToPending :: forall p. RepoPatch p => Repository p -> [DarcsFlag] -> FL Prim -> IO () | Source
This fuction is unsafe because it accepts a patch that works on the tentative pending and we don't currently track the state of the tentative pending.
tentativelyReplacePatches :: forall p. RepoPatch p => Repository p -> [DarcsFlag] -> FL (Named p) -> IO () | Source
tentativelyMergePatches :: RepoPatch p => Repository p -> String -> [DarcsFlag] -> FL (PatchInfoAnd p) -> FL (PatchInfoAnd p) -> IO (Sealed (FL Prim)) | Source
considerMergeToWorking :: RepoPatch p => Repository p -> String -> [DarcsFlag] -> FL (PatchInfoAnd p) -> FL (PatchInfoAnd p) -> IO (Sealed (FL Prim)) | Source
revertRepositoryChanges :: RepoPatch p => Repository p -> IO () | Source
finalizeRepositoryChanges :: RepoPatch p => Repository p -> IO () | Source
createRepository :: [DarcsFlag] -> IO () | Source
copyRepository :: RepoPatch p => Repository p -> IO () | Source
copy_oldrepo_patches :: RepoPatch p => [DarcsFlag] -> Repository p -> FilePath -> IO () | Source
patchSetToRepository :: RepoPatch p => Repository p -> PatchSet p -> [DarcsFlag] -> IO (Repository p) | Source
patchSetToRepository takes a patch set, and writes a new repository in the current directory that contains all the patches in the patch set. This function is used when 'darcs get'ing a repository with the --to-match flag and the new repository is not in hashed format. This function does not (yet) work for hashed repositories. If the passed `DarcsFlag`s tell darcs to create a hashed repository, this function will call `error`.
unrevertUrl :: Repository p -> String | Source
applyToWorking :: Patchy p => Repository p1 -> [DarcsFlag] -> p -> IO () | Source
patchSetToPatches :: RepoPatch p => RL (RL (PatchInfoAnd p)) -> FL (Named p) | Source
createPristineDirectoryTree :: RepoPatch p => Repository p -> FilePath -> IO () | Source
createPartialsPristineDirectoryTree :: (FilePathLike fp, RepoPatch p) => Repository p -> [fp] -> FilePath -> IO () | Source
optimizeInventory :: RepoPatch p => Repository p -> IO () | Source
Writes out a fresh copy of the inventory that minimizes the amount of inventory that need be downloaded when people pull from the repository. Specifically, it breaks up the inventory on the most recent tag. This speeds up most commands when run remotely, both because a smaller file needs to be transfered (only the most recent inventory). It also gives a guarantee that all the patches prior to a given tag are included in that tag, so less commutation and history traversal is needed. This latter issue can become very important in large repositories.
cleanRepository :: RepoPatch p => Repository p -> IO () | Source
getMarkedupFile :: RepoPatch p => Repository p -> PatchInfo -> FilePath -> IO MarkedUpFile | Source
type PatchSet p = RL (RL (PatchInfoAnd p)) | Source
A PatchSet is in reverse order, plus has information about which tags are clean, meaning all patches applied prior to them are in the tag itself, so we can stop reading at that point. Just to clarify, the first patch in a PatchSet is the one most recently applied to the repo. `PatchSet`s have the property that if `(info $ last $ head a) == (info $ last $ head b)` then `(tail a)` and `(tail b)` are identical repositories Questions: Does this mean that in a patch set such as `[[a b t1 c d e t2][f g t3] [h i]]`, t1, t2 and t3 are tags, and t2 and t3 are clean? Can we have PatchSet with length at least 3? Florent
type SealedPatchSet p = Sealed (RL (RL (PatchInfoAnd p))) | Source
data PatchInfoAnd p | Source
``PatchInfoAnd` p` represents a hope we have to get a patch through its info. We're not sure we have the patch, but we know its info.
Instances
MyEq p => MyEq (PatchInfoAnd p)
Invert p => Invert (PatchInfoAnd p)
ReadPatch p => ReadPatch (PatchInfoAnd p)
(Conflict p, Effect p, ShowPatch p) => ShowPatch (PatchInfoAnd p)
Commute p => Commute (PatchInfoAnd p)
Apply p => Apply (PatchInfoAnd p)
RepoPatch p => Patchy (PatchInfoAnd p)
Effect p => Effect (PatchInfoAnd p)
Conflict p => Conflict (PatchInfoAnd p)
setScriptsExecutable :: IO () | Source
Sets scripts in or below the current directory executable. A script is any file that starts with the bytes '#!'. This is used sometimes for --set-scripts-executable, but at other times --set-scripts-executable is handled by the hunk patch case of applyFL.
checkUnrelatedRepos :: [DarcsFlag] -> [PatchInfo] -> PatchSet p -> PatchSet p -> IO () | Source
testTentative :: RepoPatch p => Repository p -> IO () | Source
testRecorded :: RepoPatch p => Repository p -> IO () | Source
Recorded and unrecorded and pending.
readRecorded :: RepoPatch p => Repository p -> IO (Tree IO) | Source
Obtains a Tree corresponding to the recorded state of the repository: this is the same as the pristine cache, which is the same as the result of applying all the repository's patches to an empty directory. Handles the plain and hashed pristine cases. Currently does not handle the no-pristine case, as that requires replaying patches. Cf. `readDarcsHashed` and `readPlainTree` in hashed-storage that are used to do the actual `Tree` construction.
readUnrecorded :: RepoPatch p => Repository p -> IO (Tree IO) | Source
Obtains a Tree corresponding to the unrecorded state of the repository: the working tree plus the pending patch.
unrecordedChanges :: RepoPatch p => [DarcsFlag] -> Repository p -> [SubPath] -> IO (FL Prim) | Source
For a repository and a list of paths (when empty, take everything) compute a (forward) list of prims (i.e. a patch) going from the recorded state of the repository (pristine) to the unrecorded state of the repository (the working copy + pending). When a non-empty list of paths is given, exactly the files that live under any of these paths in either recorded or unrecorded will be included in the resulting patch. This also depends on the options given: with LookForAdds, we will include any non-boring files (i.e. also those that do not exist in the recorded state) in the working in the unrecorded state, and therefore they will show up in the patches as addfiles. The IgnoreTimes option disables index usage completely -- for each file, we read both the unrecorded and the recorded copy and run a diff on them. This is very inefficient, although in extremely rare cases, the index could go out of sync (file is modified, index is updated and file is modified again within a single second).
readPending :: RepoPatch p => Repository p -> IO (Tree IO, Sealed (FL Prim)) | Source
pendingChanges :: RepoPatch p => Repository p -> [SubPath] -> IO (Sealed (FL Prim)) | Source
readRecordedAndPending :: RepoPatch p => Repository p -> IO (Tree IO) | Source
Index.
readIndex :: RepoPatch p => Repository p -> IO Index | Source
invalidateIndex :: t -> IO () | Source
Mark the existing index as invalid. This has to be called whenever the listing of pristine changes and will cause darcs to update the index next time it tries to read it. (NB. This is about files added and removed from pristine: changes to file content in either pristine or working are handled transparently by the index reading code.)
Produced by Haddock version 2.4.2