tweak imports

diff --git a/src/Dyna/Analysis/ANF.hs b/src/Dyna/Analysis/ANF.hs
index 0a58a4bce798b4852f3221543535bb9e4ed4a96b..d927c69227c28cef81ab4c86a3846431102583fb 100644 (file)
--- a/src/Dyna/Analysis/ANF.hs
+++ b/src/Dyna/Analysis/ANF.hs
@@ -69,7 +69,7 @@
 {-# LANGUAGE OverloadedStrings #-}
 
 module Dyna.Analysis.ANF (
-    ANFState(..), NT(..), FDT, EVF, FDR, 
+    ANFState(..), NT(..), FDT, EVF, FDR(..),
     normTerm, normRule, runNormalize, printANF
 ) where
 
@@ -291,7 +291,7 @@ normTerm_ c   ss (P.TFunctor f as) = do
     selfdispos <- asks $ flip ($) (f,length as) . ad_self_dispos
 
     let dispos = mergeDispositions selfdispos c
-    
+
     fmap NTVar $
      case dispos of
        ADEval  -> newEval "_$f" . Right