radumaco/RosettaHaskellCompiler
1
0
Fork 0
mirror of https://github.com/macocianradu/RosettaHaskellCompiler.git synced 2026-03-18 21:10:07 +00:00
Code Issues Packages Projects Releases Wiki Activity

added headers to files

Browse Source
This commit is contained in:
Macocian Adrian Radu
2022-02-17 23:26:47 +01:00
parent 8743dc0874
commit 50498e53d5
6 changed files with 49 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
src/Parser/Header.hs
View File

@@ -11,11 +11,12 @@ import Text.ParserCombinators.ReadP (many1)
headerParser :: Parser Header
headerParser = do
_ <- lexeme $ string "namespace"
name <- namespaceParser
name <- lexeme namespaceParser
_ <- lexeme $ char ':'
desc <- optional descriptionParser
_ <- lexeme $ string "version"
vers <- between (char '\"') (char '\"') (many (letterChar <|> char '.' <|> char '$' <|> digitChar))
imports <- many importParser
vers <- lexeme $ between (string "\"${") (string "}\"") (many (letterChar <|> char '.' <|> char '$' <|> digitChar))
imports <- many $ lexeme importParser
return $ MakeHeader name desc vers imports
importParser :: Parser String