17  \-}

    17  \-}

    18 

    18 

    19 {-# LANGUAGE OverloadedStrings #-}

    19 {-# LANGUAGE OverloadedStrings #-}

    20 module HWProtoCore where

    20 module HWProtoCore where

    21 

    21 

    22 import Control.Monad.Reader

    23 import Control.Monad.Reader

    23 import Data.Maybe

    24 import Data.Maybe

    24 import qualified Data.ByteString.Char8 as B

    25 import qualified Data.ByteString.Char8 as B

    25 --------------------------------------

    26 --------------------------------------

    26 import CoreTypes

    27 import CoreTypes