Simplify build by using default-extensions

smelc · Dec 19, 2023 · 57f2f13 · 57f2f13
1 parent ed4c5a3
commit 57f2f13
Show file tree

Hide file tree

Showing 7 changed files with 16 additions and 34 deletions.
diff --git a/slides/Course01.hs b/slides/Course01.hs
@@ -1,8 +1,4 @@
 {-# OPTIONS_GHC -Wno-missing-signatures #-}
-{-# LANGUAGE FlexibleContexts #-}
-{-# LANGUAGE FlexibleInstances #-}
-{-# LANGUAGE MultiParamTypeClasses #-}
-{-# LANGUAGE ScopedTypeVariables #-}
 
 module Course01 where
 

diff --git a/slides/Course02.hs b/slides/Course02.hs
@@ -1,8 +1,3 @@
-{-# LANGUAGE FlexibleInstances #-}
-{-# LANGUAGE LambdaCase #-}
-{-# LANGUAGE MultiParamTypeClasses #-}
-{-# LANGUAGE NamedFieldPuns #-}
-{-# LANGUAGE RecordWildCards #-}
 
 module Course02 where
 

diff --git a/slides/course-01.md b/slides/course-01.md
@@ -17,10 +17,6 @@ Clément Hurlin, Director of Engineering, Tweag
 
 ```hs
 {-# OPTIONS_GHC -Wno-missing-signatures #-}
-{-# LANGUAGE FlexibleContexts #-}
-{-# LANGUAGE FlexibleInstances #-}
-{-# LANGUAGE MultiParamTypeClasses #-}
-{-# LANGUAGE ScopedTypeVariables #-}
 
 module Course01 where
 
@@ -250,6 +246,8 @@ Instead of loops, functional programs use:
 }
 ```
 
+--
+
 <center>
 ⚠️ The Haskell <code>-></code> syntax is unrelated to Java lambdas 💣
 </center>

diff --git a/slides/course-02.md b/slides/course-02.md
@@ -37,11 +37,6 @@ In large companies you can:
      used by exdown (see check.sh).
 
 ```hs
-{-# LANGUAGE FlexibleInstances #-}
-{-# LANGUAGE LambdaCase #-}
-{-# LANGUAGE MultiParamTypeClasses #-}
-{-# LANGUAGE NamedFieldPuns #-}
-{-# LANGUAGE RecordWildCards #-}
 
 module Course02 where
 

diff --git a/slides/course-03.md b/slides/course-03.md
@@ -16,13 +16,9 @@ Clément Hurlin
      used by exdown (see check.sh).
 
 ```hs
-{-# Language LambdaCase #-}
-{-# Language NamedFieldPuns #-}
-{-# Language ScopedTypeVariables #-}
 {-# OPTIONS_GHC -Wno-missing-signatures #-}
 {-# OPTIONS_GHC -Wno-unused-matches #-}
 
-
 module Course03 where
 
 import Data.Char (isLower)

diff --git a/slides/course-04.md b/slides/course-04.md
@@ -16,9 +16,6 @@ Clément Hurlin
      used by exdown (see check.sh).
 
 ```hs
-{-# Language DeriveFunctor #-}
-{-# Language MultiParamTypeClasses #-}
-
 module Course04 where
 
 import Data.Word

diff --git a/tn-fp-course.cabal b/tn-fp-course.cabal
@@ -34,15 +34,20 @@ common common-all
                        -Wno-unused-imports
                        -Werror
                        -Wwarn=missing-home-modules
-    default-extensions: DataKinds
-                        DeriveGeneric
-                        DuplicateRecordFields
-                        NamedFieldPuns
-                        LambdaCase
-                        OverloadedRecordDot
-                        OverloadedStrings
-                        ScopedTypeVariables
-                        TypeApplications
+     default-extensions: DataKinds
+                         DeriveGeneric
+                         DeriveFunctor
+                         DuplicateRecordFields
+                         FlexibleContexts
+                         FlexibleInstances
+                         MultiParamTypeClasses
+                         NamedFieldPuns
+                         LambdaCase
+                         OverloadedRecordDot
+                         OverloadedStrings
+                         RecordWildCards
+			             ScopedTypeVariables
+                         TypeApplications
 
 library slides
     import:           common-all