Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Glasgow Haskell Compiler
Packages
Cabal
Commits
6c3d869e
Commit
6c3d869e
authored
Oct 01, 2008
by
Duncan Coutts
Browse files
Use unknown rather than specific other repo kinds
We can still add more as necessary
parent
f354a7bd
Changes
1
Hide whitespace changes
Inline
Side-by-side
Distribution/PackageDescription.hs
View file @
6c3d869e
...
...
@@ -487,10 +487,7 @@ data RepoKind =
-- information to re-create the exact sources.
|
RepoThis
-- | Some other specific named kind of repo. We do not give this a
-- particular interpretation or convention but could be used in-house for
-- special purposes for example if there are multiple related branches.
|
RepoSpecific
String
|
RepoKindUnknown
String
deriving
(
Eq
,
Ord
,
Read
,
Show
)
-- | An enumeration of common source control systems. The fields used in the
...
...
@@ -513,16 +510,16 @@ repoTypeAliases GnuArch = ["arch"]
repoTypeAliases
_
=
[]
instance
Text
RepoKind
where
disp
RepoHead
=
Disp
.
text
"head"
disp
RepoThis
=
Disp
.
text
"this"
disp
(
Repo
Specific
other
)
=
Disp
.
text
other
disp
RepoHead
=
Disp
.
text
"head"
disp
RepoThis
=
Disp
.
text
"this"
disp
(
Repo
KindUnknown
other
)
=
Disp
.
text
other
parse
=
do
name
<-
ident
return
$
case
lowercase
name
of
"head"
->
RepoHead
"this"
->
RepoThis
_
->
Repo
Specific
name
_
->
Repo
KindUnknown
name
instance
Text
RepoType
where
disp
(
OtherRepoType
other
)
=
Disp
.
text
other
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment