diff --git a/src/compiler/api/GF/Data/Utilities.hs b/src/compiler/api/GF/Data/Utilities.hs
index 5b3c99a2d..c83070137 100644
--- a/src/compiler/api/GF/Data/Utilities.hs
+++ b/src/compiler/api/GF/Data/Utilities.hs
@@ -18,6 +18,7 @@ import Data.Bifunctor (first)
 import Data.Maybe
 import Data.List
 import Control.Monad (MonadPlus(..),foldM,liftM,when)
+import Control.Applicative(liftA2)
 import qualified Data.Set as Set
 
 -- * functions on lists