fix 2 splicing bugs
This commit is contained in:
parent
e1b4e95513
commit
f44c917b22
1 changed files with 4 additions and 0 deletions
|
@ -268,6 +268,10 @@ expandExpressionSplice s lls = concat [before, spliced:padding, end]
|
|||
-- function definition needs no preparation
|
||||
-- ie: foo = $(splice)
|
||||
| "=" `isSuffixOf` s' = s
|
||||
-- nor does lambda definition
|
||||
| "->" `isSuffixOf` s' = s
|
||||
-- nor does a let .. in declaration
|
||||
| "in" `isSuffixOf` s' = s
|
||||
-- already have a $ to set off the splice
|
||||
-- ie: foo $ $(splice)
|
||||
| "$" `isSuffixOf` s' = s
|
||||
|
|
Loading…
Add table
Reference in a new issue