cleanup: add Encoding class

extism · Sep 24, 2023 · 772e74e · 772e74e
1 parent 06b6efe
commit 772e74e
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/Extism.hs b/src/Extism.hs
@@ -23,6 +23,7 @@ module Extism (
   pluginID,
   unwrap,
   ToBytes(..),
+  Encoding,
   FromBytes(..),
   JSONValue(..)
 ) where
@@ -152,6 +153,9 @@ class ToBytes a where
 class FromBytes a where
   fromBytes :: B.ByteString -> Result a
 
+-- Encoding is used to indicate a type implements both `ToBytes` and `FromBytes`
+class (ToBytes a, FromBytes a) => Encoding a where
+
 instance ToBytes B.ByteString where
   toBytes x = x