mirror of https://github.com/voidlizard/hbs2
bf6 regress fixed
This commit is contained in:
parent
36f9937d7c
commit
a85a95d1f2
|
@ -304,8 +304,8 @@ lambdaArgList :: Syntax c -> Maybe [Id]
|
|||
lambdaArgList (ListVal a) = sequence argz
|
||||
where
|
||||
argz = flip fmap a \case
|
||||
(SymbolVal x) | x `notElem` [".","_"] -> Just x
|
||||
_ -> Nothing
|
||||
(SymbolVal x) -> Just x
|
||||
_ -> Nothing
|
||||
|
||||
lambdaArgList _ = Nothing
|
||||
|
||||
|
|
Loading…
Reference in New Issue