Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Open sidebar
Software
CoPaR
Commits
daa827a0
Commit
daa827a0
authored
Dec 22, 2018
by
Hans-Peter Deifel
🐢
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
bench: Fix a few hlint warnings
parent
c2a7d1ef
Changes
1
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
3 additions
and
3 deletions
+3
-3
tests/Data/BlockQueueSpec.hs
tests/Data/BlockQueueSpec.hs
+3
-3
No files found.
tests/Data/BlockQueueSpec.hs
View file @
daa827a0
...
...
@@ -24,12 +24,12 @@ spec = do
emptySpec
::
Spec
emptySpec
=
describe
"empty"
$
do
it
"creates an empty queue"
$
property
$
\
sizes
->
runST
$
(
empty
sizes
)
>>=
null
property
$
\
sizes
->
runST
$
empty
sizes
>>=
null
it
"creates a queue where no block is present"
$
do
it
"creates a queue where no block is present"
$
property
$
\
size
->
runST
$
do
q
<-
empty
size
all
not
<$>
mapM
(
\
b
->
(
Block
b
)
`
elem
`
q
)
[
0
..
size
-
1
]
all
not
<$>
mapM
(
\
b
->
Block
b
`
elem
`
q
)
[
0
..
size
-
1
]
enqueueSpec
::
Spec
enqueueSpec
=
describe
"enqueue"
$
do
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a 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