1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Language/Elna/Frontend/AST.hs b/lib/Language/Elna/Frontend/AST.hs
index 5918e8e..0925f6f 100644
--- a/lib/Language/Elna/Frontend/AST.hs
+++ b/lib/Language/Elna/Frontend/AST.hs
@@ -28,13 +28,13 @@ instance Show Program
 
 data Declaration
     = ProcedureDeclaration Identifier [Parameter] [VariableDeclaration] [Statement]
-    -- | TypeDefinition Identifier TypeExpression
+    | TypeDefinition Identifier TypeExpression
     deriving Eq
 
 instance Show Declaration
   where
-    {- show (TypeDefinition identifier typeExpression) =
-        concat ["type ", show identifier, " = ", show typeExpression, ";"] -}
+    show (TypeDefinition identifier typeExpression) =
+        concat ["type ", show identifier, " = ", show typeExpression, ";"]
     show (ProcedureDeclaration procedureName parameters variables body)
         = "proc " <> show procedureName <> showParameters parameters <> " {\n"
         <> unlines (("  " <>) . show <$> variables)