Would like library to export symbols of HashDefines

[ddssff]

I want to use the data structure and a couple of the functions in a project.

[malcolmwallace]

Can you be more specific about which types and functions you would like to be exported?

[ddssff]

I am using the HashDefine type, and I've written functions to convert a HashDefine to a CPP argument and to a CPP predicate:

asArgument :: HashDefine -> String
asArgument (AntiDefined{..}) = "-U" <> name
asArgument (SymbolReplacement{..}) =
    "-D" <> name <> if replacement == "" then "" else ("=" <> replacement)
asArgument _ = error $ "Unexpected HashDefine value"

asPredicate :: HashDefine -> String
asPredicate (AntiDefined{..}) = "!defined(" <> name <> ")"
asPredicate (SymbolReplacement{..}) | replacement == "" = "defined(" <> name <> ")"
asPredicate (SymbolReplacement{..}) | all (== '0') replacement = "!" <> name
asPredicate (SymbolReplacement{..}) | all isDigit replacement = name
asPredicate (SymbolReplacement{..}) = name <> " == " <> replacement
asPredicate _ = ""

I might need the parseHashDefine function in the near future.