From 5e77fbb23845292920cdfdc6cca8fe4fbdd0709a Mon Sep 17 00:00:00 2001 From: Mikolaj Konarski Date: Fri, 6 Jun 2025 14:05:46 +0200 Subject: Derive instance Show (Castable a b) --- src/Data/Array/Nested/Convert.hs | 2 ++ 1 file changed, 2 insertions(+) (limited to 'src/Data/Array/Nested') diff --git a/src/Data/Array/Nested/Convert.hs b/src/Data/Array/Nested/Convert.hs index cea2489..d07bab9 100644 --- a/src/Data/Array/Nested/Convert.hs +++ b/src/Data/Array/Nested/Convert.hs @@ -3,6 +3,7 @@ {-# LANGUAGE PolyKinds #-} {-# LANGUAGE RankNTypes #-} {-# LANGUAGE ScopedTypeVariables #-} +{-# LANGUAGE StandaloneDeriving #-} {-# LANGUAGE TypeAbstractions #-} {-# LANGUAGE TypeApplications #-} {-# LANGUAGE TypeOperators #-} @@ -150,6 +151,7 @@ data Castable a b where => Castable (Mixed sh a, Mixed sh b) (Mixed sh (a, b)) CastUnzip :: (Elt a, Elt b) => Castable (Mixed sh (a, b)) (Mixed sh a, Mixed sh b) +deriving instance Show (Castable a b) instance Category Castable where id = CastId -- cgit v1.2.3-70-g09d2