Word -> Word32

IntersectMBO · Jan 19, 2021 · fba432b · fba432b
1 parent d37b1af
commit fba432b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/shelley-ma/impl/src/Cardano/Ledger/Mary/Value.hs b/shelley-ma/impl/src/Cardano/Ledger/Mary/Value.hs
@@ -331,7 +331,7 @@ data CompactValue crypto
   = CompactValueAdaOnly {-# UNPACK #-} !Word64
   | CompactValueMultiAsset
       {-# UNPACK #-} !Word64 -- ada
-      {-# UNPACK #-} !Word -- number of ma's
+      {-# UNPACK #-} !Word32 -- number of ma's
       {-# UNPACK #-} !ShortByteString -- rep
   deriving (Show, Typeable)