From 33b45fe1e32d1e2085e8974f9eaf821dc68169a4 Mon Sep 17 00:00:00 2001
From: Joe Betz <joebetz91@gmail.com>
Date: Fri, 17 Jan 2020 00:05:31 +0100
Subject: [PATCH] add missing extensions

---
 src/Data/Patch/IntMap.hs | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src/Data/Patch/IntMap.hs b/src/Data/Patch/IntMap.hs
index d46a006..11a0abd 100644
--- a/src/Data/Patch/IntMap.hs
+++ b/src/Data/Patch/IntMap.hs
@@ -1,7 +1,10 @@
 {-# LANGUAGE DeriveFoldable #-}
 {-# LANGUAGE DeriveFunctor #-}
 {-# LANGUAGE DeriveTraversable #-}
+{-# LANGUAGE FlexibleInstances #-}
 {-# LANGUAGE GeneralizedNewtypeDeriving #-}
+{-# LANGUAGE MultiParamTypeClasses #-}
+{-# LANGUAGE TemplateHaskell #-}
 {-# LANGUAGE TypeFamilies #-}
 -- | Module containing 'PatchIntMap', a 'Patch' for 'IntMap' which allows for
 -- insert/update or delete of associations.
@@ -27,6 +30,8 @@ instance Patch (PatchIntMap a) where
         adds = IntMap.mapMaybe id p
     in IntMap.union adds $ v `IntMap.difference` removes
 
+makeWrapped ''PatchIntMap
+
 -- | @a <> b@ will apply the changes of @b@ and then apply the changes of @a@.
 -- If the same key is modified by both patches, the one on the left will take
 -- precedence.