From 831d7a578724b992aae24ec4023007e5d6063f3f Mon Sep 17 00:00:00 2001
From: VegOwOtenks <vegowotenks@jossco.de>
Date: Wed, 20 Aug 2025 16:49:06 +0200
Subject: [PATCH] feat: show Magic

---
 src/Language/Java/Classfile/Magic.hs | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/Language/Java/Classfile/Magic.hs b/src/Language/Java/Classfile/Magic.hs
index 9d75142..e0dfd86 100644
--- a/src/Language/Java/Classfile/Magic.hs
+++ b/src/Language/Java/Classfile/Magic.hs
@@ -6,6 +6,7 @@
 {-# LANGUAGE StandaloneKindSignatures #-}
 {-# LANGUAGE FlexibleInstances #-}
 {-# LANGUAGE GADTs #-}
+{-# LANGUAGE StandaloneDeriving #-}
 module Language.Java.Classfile.Magic (Magic(..)) where
 import Data.Word (Word32)
 import Language.Java.Classfile.Extractable (Extractable, extract, expectConstant)
@@ -21,6 +22,8 @@ data Magic stage where
   Magic :: Hex Word32 -> Magic Parse
   Cafebabe :: Magic Resolve
 
+deriving instance Show (Magic stage)
+
 instance Extractable (Magic Parse) where
   extract :: Extract (Magic Parse)
   extract = Magic . Hex <$> expectConstant 0xCAFEBABE