@@ -29,7 +29,7 @@ import Language.PureScript.CodeGen.Common (identToJs)
2929
3030import Control.Applicative
3131import Control.Monad.State
32−import Control.Arrow (Arrow(..), second)
32+import Control.Arrow (first, second)
3333import Data.Maybe (catMaybes)
3434
3535import qualified Data.Map as M