chrisdone/duet
1
1
Fork 0
mirror of https://github.com/chrisdone/duet.git synced 2025-01-08 06:53:22 +03:00
Code Issues Projects Releases Wiki Activity

Another close parens

Browse Source
This commit is contained in:
Chris Done 2017-12-11 10:22:28 +00:00
parent 3cfd69367d
commit 5b101abaf0
1 changed files with 21 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
web/Duet/IDE/Spec.hs
View File

@ -88,6 +88,27 @@ parensTests =
(ConstantExpression
(Label {labelUUID = UUID "2"})
(Identifier {identifierString = "_"}))))))
, Test
"Hit close parenthesis to select the parent node"
[ KeyPressAction '('
, KeyPressAction 'f'
, KeyPressAction ' '
, KeyPressAction 'x'
, KeyPressAction ')'
]
(focus
(UUID "1")
(rhsSelectedState
(ParensExpression
(Label {labelUUID = UUID "1"})
(ApplicationExpression
(Label {labelUUID = UUID "4"})
(VariableExpression
(Label {labelUUID = UUID "2"})
(Identifier {identifierString = "f"}))
(VariableExpression
(Label {labelUUID = UUID "3"})
(Identifier {identifierString = "x"}))))))
, Test
"Hit close parenthesis to select the parent node"
(typeChars "fib(n-1)+fib(n-2")