1 files changed, 2 insertions, 2 deletions
diff --git a/src/Language/Fiddle/Ast/Internal/SyntaxTree.hs b/src/Language/Fiddle/Ast/Internal/SyntaxTree.hs
index c539665..0d0bc32 100644
--- a/src/Language/Fiddle/Ast/Internal/SyntaxTree.hs
+++ b/src/Language/Fiddle/Ast/Internal/SyntaxTree.hs
@@ -703,7 +703,7 @@ data BitType (stage :: Stage) (f :: Type -> Type) a where
   EnumBitType ::
     { -- | Expression defining the enum size.
       enumBitSize :: Expression Bits stage f a,
-      -- | The body of the enum.
+      -- | The body of the enum.set_stm32l4_gpio__bsr_r__set
       enumBitBody :: f (EnumBody stage f a),
       -- | Annotation for the enumeration.
       enumBitAnnot :: a
@@ -737,7 +737,7 @@ data EnumConstantDecl stage f a where
     { -- | Identifier for the constant.
       enumConstIdent :: Identifier f a,
       -- | Expression defining the constant.
-      enumConstExpr :: Expression Unitless stage f a,
+      enumConstExpr :: ConstExpression Unitless stage f a,
       -- | Annotation for the constant.
       enumConstAnnot :: a
     } ->