Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
curry-packages
cpm
Commits
f39fa623
Commit
f39fa623
authored
Mar 28, 2017
by
Michael Hanus
Browse files
Test suite fixed
parent
70b21ee3
Changes
3
Hide whitespace changes
Inline
Side-by-side
package.json
View file @
f39fa623
...
...
@@ -17,6 +17,10 @@
"name"
:
"cpm"
,
"main"
:
"CPM.Main"
},
"testsuite"
:
{
"src-dir"
:
"src"
,
"modules"
:
[
"CPM.Package"
,
"CPM.Resolution"
,
"CPM.LookupSet"
]
},
"source"
:
{
"git"
:
"https://git.ps.informatik.uni-kiel.de/curry-packages/cpm.git"
,
"tag"
:
"$version"
...
...
src/CPM/LookupSet.curry
View file @
f39fa623
------------------------------------------------------------------------------
--
------------------------------------------------------------------------------
--- This module implements the LookupSet datatype. A lookup set is used to store
--- and query packages for dependency resolution. It stores the source of a
--- package specification alongside the specification itself (e.g. the global
--- repository or the local package cache).
------------------------------------------------------------------------------
--
------------------------------------------------------------------------------
module CPM.LookupSet
( LookupSource (..)
...
...
@@ -25,6 +25,8 @@ import Test.EasyCheck
import CPM.Package
------------------------------------------------------------------------------
data LookupSource = FromRepository
| FromLocalCache
| FromGlobalCache
...
...
@@ -123,7 +125,7 @@ test_findAllVersions_nonLocalIfIgnored = findAllVersions ls "A" False -=- [aNonL
ls = setLocallyIgnored (addPackage (addPackage emptySet aLocal FromLocalCache) aNonLocal FromRepository) ["A"]
cPackage :: String -> Version -> [Dependency] -> Package
cPackage p v ds = Package {
cPackage p v ds =
empty
Package {
name = p
, version = v
, author = "author"
...
...
src/CPM/Resolution.curry
View file @
f39fa623
...
...
@@ -668,7 +668,7 @@ test_reportsCompilerIncompatibility = showResult result -=- "The package json-1.
db = cDB [json]
cPackage :: String -> Version -> [Dependency] -> Package
cPackage p v ds = Package {
cPackage p v ds =
empty
Package {
name = p
, version = v
, author = "author"
...
...
@@ -688,7 +688,7 @@ cPackage p v ds = Package {
}
cPackageCC :: String -> Version -> [CompilerCompatibility] -> Package
cPackageCC p v cs = Package {
cPackageCC p v cs =
empty
Package {
name = p
, version = v
, author = "author"
...
...
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