Merge pull request #5053 from IntersectMBO/aniketd/fix-complete-pragmas

Fix COMPLETE pragmas

Author: aniketd

eras/shelley/impl/src/Cardano/Ledger/Shelley/Scripts.hs

@@ -181,6 +181,14 @@ pattern RequireMOf n ms <- (getRequireMOf -> Just (n, ms))
   where
     RequireMOf n ms = mkRequireMOf n ms
 
+{-# COMPLETE
+  RequireSignature
+  , RequireAllOf
+  , RequireAnyOf
+  , RequireMOf ::
+    ShelleyEra
+  #-}
+
 -- | Encodes memoized bytes created upon construction.
 instance Era era => EncCBOR (MultiSig era)