Merge pull request #150 from KaneTW/master

Fix build with GHC HEAD (8.11)

Author: simonmar

src/DFAMin.hs

@@ -32,9 +32,9 @@ import Data.List as List
 -- end;
 
 minimizeDFA :: Ord a => DFA Int a -> DFA Int a
-minimizeDFA  dfa@ DFA { dfa_start_states = starts,
-                        dfa_states       = statemap
-                      }
+minimizeDFA  dfa@DFA { dfa_start_states = starts,
+                       dfa_states       = statemap
+                     }
   = DFA { dfa_start_states = starts,
           dfa_states       = Map.fromList states }
   where