diff options
| author | Josh Rahm <joshuarahm@gmail.com> | 2024-10-17 00:36:03 -0600 |
|---|---|---|
| committer | Josh Rahm <joshuarahm@gmail.com> | 2024-10-17 00:36:03 -0600 |
| commit | 62dffb99e29eba9004ef2764fbdd9b0462de4742 (patch) | |
| tree | 663298cb18eff8f6d7966aba1ec7845d58e19894 /src/Language/Fiddle/GenericTree.hs | |
| parent | c31a34382d6fe1307a0c6fe1710c42f27fe833ca (diff) | |
| download | fiddle-62dffb99e29eba9004ef2764fbdd9b0462de4742.tar.gz fiddle-62dffb99e29eba9004ef2764fbdd9b0462de4742.tar.bz2 fiddle-62dffb99e29eba9004ef2764fbdd9b0462de4742.zip | |
Add ContExpression syntax tree.
This is for expressions which must be calculatable at compile time.
Diffstat (limited to 'src/Language/Fiddle/GenericTree.hs')
| -rw-r--r-- | src/Language/Fiddle/GenericTree.hs | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/Language/Fiddle/GenericTree.hs b/src/Language/Fiddle/GenericTree.hs index 49727f7..9b3089b 100644 --- a/src/Language/Fiddle/GenericTree.hs +++ b/src/Language/Fiddle/GenericTree.hs @@ -25,6 +25,7 @@ import GHC.Generics import GHC.TypeLits (KnownSymbol, symbolVal) import Language.Fiddle.Ast import Language.Fiddle.Internal.UnitInterface +import Language.Fiddle.Internal.UnitNumbers import Language.Fiddle.Types type Context stage = @@ -271,4 +272,8 @@ deriving instance (Context stage) => (ToGenericSyntaxTree (EnumConstantDecl stag deriving instance (Context stage) => (ToGenericSyntaxTree (PackageBody stage)) +deriving instance (Context stage) => (ToGenericSyntaxTree (ConstExpression Unitless stage)) + +deriving instance (Context stage) => (ToGenericSyntaxTree (ConstExpression Address stage)) + deriving instance (Context stage) => (ToGenericSyntaxTree (Expression u stage)) |