Fakultas Ilmu Komputer UI
Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
Ari Angga Nugraha
ariangganugraha-funpro2020-lambda
Commits
f7e2b56e
Commit
f7e2b56e
authored
Jan 07, 2017
by
Sean Gillespie
Browse files
Update SystemF Expression test
parent
b018774d
Changes
1
Hide whitespace changes
Inline
Side-by-side
test/Language/SystemF/ExpressionSpec.hs
View file @
f7e2b56e
...
...
@@ -73,3 +73,9 @@ spec = describe "prettyPrint" $ do
prettyPrint
(
TyForAll
"A"
(
TyArrow
(
TyVar
"A"
)
(
TyVar
"A"
)))
`
shouldBe
`
"forall A. A -> A"
it
"prints nested forall types"
$
prettyPrint
(
TyForAll
"W"
(
TyForAll
"X"
(
TyArrow
(
TyVar
"W"
)
(
TyArrow
(
TyVar
"X"
)
(
TyVar
"Y"
)))))
`
shouldBe
`
"forall W. forall X. W -> X -> Y"
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