fixed functions without input

This commit is contained in:
Macocian Adrian Radu
2022-05-16 13:03:22 +02:00
parent 05d5bf3681
commit 8d3d00b7a5
2 changed files with 46 additions and 2 deletions

View File

@@ -37,8 +37,10 @@ assignmentParser =
inputAttributesParser :: Parser [TypeAttribute]
inputAttributesParser =
do
_ <- lexeme $ string "inputs:"
many $ try attributeParser
inp <- observing $ lexeme $ string "inputs:"
case inp of
Left _ -> return []
Right _ -> many $ try attributeParser
-- |Parses the output attribute of a function statement in Rosetta into a TypeAttribute
outputAttributeParser :: Parser TypeAttribute