blob: 494e0c081017463ab06da8f9aa78b782fbf9a0dc (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
{-|
Module : VeriFuzz.Parser
Description : Minimal Verilog parser to reconstruct the AST.
Copyright : (c) 2019, Yann Herklotz Grave
License : GPL-3
Maintainer : ymherklotz [at] gmail [dot] com
Stability : experimental
Portability : POSIX
Minimal Verilog parser to reconstruct the AST. This parser does not support the
whole Verilog syntax, as the AST does not support it either.
-}
module VeriFuzz.Parser where
import Data.Attoparsec.Text
import Data.Text (Text)
import qualified Data.Text as T
import VeriFuzz.AST
parseDescription :: Text -> Parser Description
parseDescription = undefined
parseVerilogSrc :: Text -> Parser VerilogSrc
parseVerilogSrc = VerilogSrc <$> many1 parseDescription
|