Added pattern guards as a language extension

haskell · Apr 16, 2005 · 7feaabf · 7feaabf
1 parent 7d2ce1a
commit 7feaabf
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/Distribution/Extension.hs b/Distribution/Extension.hs
@@ -89,6 +89,7 @@ data Extension =
                | Generics
                | NoImplicitPrelude
                | NamedFieldPuns
+               | PatternGuards
 
                | ExtensibleRecords
                | RestrictedTypeSynonyms
@@ -129,6 +130,7 @@ extensionsToGHCFlag l
     extensionToGHCFlag FlexibleContexts             = Right "-fglasgow-exts"
     extensionToGHCFlag FlexibleInstances            = Right "-fglasgow-exts"
     extensionToGHCFlag EmptyDataDecls               = Right "-fglasgow-exts"
+    extensionToGHCFlag PatternGuards                = Right "-fglasgow-exts"
 
     extensionToGHCFlag e@ExtensibleRecords          = Left e
     extensionToGHCFlag e@RestrictedTypeSynonyms     = Left e