Fix pedantic warnings and add to CI

Author: RaoulHC

.github/workflows/ci.yml

@@ -35,7 +35,7 @@ jobs:
       run: stack --no-terminal test --only-dependencies
 
     - name: Build and run tests
-      run: stack --no-terminal haddock --test --no-haddock-deps
+      run: stack --no-terminal haddock --test --no-haddock-deps --pedantic
 
     - name: Install (to place executable at a known location)
       run: stack --no-terminal install

src/Language/Fortran/Analysis/SemanticTypes.hs

@@ -49,13 +49,13 @@ instance Out    SemType
 -- TypeSpec?
 instance Pretty SemType where
   pprint' v = \case
-    TInteger k -> "integer"
-    TReal k    -> "real"
-    TComplex k -> "complex"
-    TLogical k -> "logical"
-    TByte k    -> "byte"
-    TCharacter len k -> "character"
-    TArray st dims -> pprint' v st <+> parens "(A)"
+    TInteger _ -> "integer"
+    TReal _    -> "real"
+    TComplex _ -> "complex"
+    TLogical _ -> "logical"
+    TByte _    -> "byte"
+    TCharacter _ _ -> "character"
+    TArray st _ -> pprint' v st <+> parens "(A)"
     TCustom str -> pprint' v (TypeCustom str)
 
 -- | The declared dimensions of a staticically typed array variable

test/Language/Fortran/Parser/UtilsSpec.hs

@@ -77,4 +77,4 @@ spec =
         jExp a b c = Just (Exponent a b c)
         expE = ExpLetterE
         expD = ExpLetterD
-        fails test = return test `shouldThrow` anyException
+        -- fails test = return test `shouldThrow` anyException