git.iko.soy
/
elk
readme
files
commits
refs
on
master
help
sign in
Remove redundant -W flags from source code
bb5d079
Evan Czaplicki
12 years ago
src/AST/Annotation.hs
−1
compare with master
unified
split
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
AST.Annotation
where
1
module
AST.Annotation
where
3
2
4
import
qualified
Text.Parsec.Pos
as
Parsec
3
import
qualified
Text.Parsec.Pos
as
Parsec
src/AST/Module.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
AST.Module
where
1
module
AST.Module
where
3
2
4
import
Data.Binary
3
import
Data.Binary
src/AST/Type.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
AST.Type
where
1
module
AST.Type
where
3
2
4
import
Control.Applicative ((<$>), (<*>))
3
import
Control.Applicative ((<$>), (<*>))
src/AST/Variable.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
AST.Variable
where
1
module
AST.Variable
where
3
2
4
import
Control.Applicative ((<$>), (<*>))
3
import
Control.Applicative ((<$>), (<*>))
src/Build/Source.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Build.Source (build)
where
1
module
Build.Source (build)
where
3
2
4
import
qualified
Data.Map
as
Map
3
import
qualified
Data.Map
as
Map
src/Docs.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
{-#
LANGUAGE
OverloadedStrings, DeriveDataTypeable #-}
1
{-#
LANGUAGE
OverloadedStrings, DeriveDataTypeable #-}
3
module
Main
where
2
module
Main
where
4
3
src/Generate/Cases.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Generate.Cases (toMatch, Match (..), Clause (..), matchSubst, newVar)
where
1
module
Generate.Cases (toMatch, Match (..), Clause (..), matchSubst, newVar)
where
3
2
4
import
Control.Applicative ((<$>))
3
import
Control.Applicative ((<$>))
src/Generate/JavaScript.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Generate.JavaScript (generate)
where
1
module
Generate.JavaScript (generate)
where
3
2
4
import
Control.Applicative ((<$>),(<*>))
3
import
Control.Applicative ((<$>),(<*>))
src/Generate/JavaScript/Helpers.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Generate.JavaScript.Helpers
where
1
module
Generate.JavaScript.Helpers
where
3
2
4
import
AST.Annotation (Region)
3
import
AST.Annotation (Region)
src/Generate/JavaScript/Ports.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Generate.JavaScript.Ports (incoming, outgoing)
where
1
module
Generate.JavaScript.Ports (incoming, outgoing)
where
3
2
4
import
Generate.JavaScript.Helpers
3
import
Generate.JavaScript.Helpers
src/Generate/JavaScript/Variable.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Generate.JavaScript.Variable
where
1
module
Generate.JavaScript.Variable
where
3
2
4
import
qualified
AST.Helpers
as
Help
3
import
qualified
AST.Helpers
as
Help
src/Metadata/Prelude.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
{-#
LANGUAGE
FlexibleContexts #-}
1
{-#
LANGUAGE
FlexibleContexts #-}
3
module
Metadata.Prelude (add)
where
2
module
Metadata.Prelude (add)
where
4
3
src/Parse/Binop.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Parse.Binop (binops, OpTable)
where
1
module
Parse.Binop (binops, OpTable)
where
3
2
4
import
Control.Applicative ((<$>))
3
import
Control.Applicative ((<$>))
src/Parse/Helpers.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Parse.Helpers
where
1
module
Parse.Helpers
where
3
2
4
import
Prelude
hiding
(until)
3
import
Prelude
hiding
(until)
src/Parse/Literal.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Parse.Literal (literal)
where
1
module
Parse.Literal (literal)
where
3
2
4
import
Control.Applicative ((<$>))
3
import
Control.Applicative ((<$>))
src/Parse/Parse.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Parse.Parse (program)
where
1
module
Parse.Parse (program)
where
3
2
4
import
Control.Applicative ((<$>))
3
import
Control.Applicative ((<$>))
src/Parse/Pattern.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Parse.Pattern (term, expr)
where
1
module
Parse.Pattern (term, expr)
where
3
2
4
import
Control.Applicative ((<$>))
3
import
Control.Applicative ((<$>))
src/Transform/Canonicalize.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Transform.Canonicalize (module')
where
1
module
Transform.Canonicalize (module')
where
3
2
4
import
Control.Applicative ((<$>),(<*>))
3
import
Control.Applicative ((<$>),(<*>))
src/Transform/Interface.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Transform.Interface (filterExports)
where
1
module
Transform.Interface (filterExports)
where
3
2
4
import
qualified
Data.Map
as
Map
3
import
qualified
Data.Map
as
Map
src/Type/Constrain/Expression.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Type.Constrain.Expression
where
1
module
Type.Constrain.Expression
where
3
2
4
import
Control.Applicative ((<$>))
3
import
Control.Applicative ((<$>))
src/Type/Constrain/Literal.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Type.Constrain.Literal
where
1
module
Type.Constrain.Literal
where
3
2
4
import
AST.Annotation
3
import
AST.Annotation
src/Type/Constrain/Pattern.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
{-#
LANGUAGE
FlexibleInstances #-}
1
{-#
LANGUAGE
FlexibleInstances #-}
3
module
Type.Constrain.Pattern
where
2
module
Type.Constrain.Pattern
where
4
3
src/Type/Environment.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Type.Environment
where
1
module
Type.Environment
where
3
2
4
import
Control.Applicative ((<$>), (<*>))
3
import
Control.Applicative ((<$>), (<*>))
src/Type/Inference.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Type.Inference
where
1
module
Type.Inference
where
3
2
4
import
qualified
Data.Map
as
Map
3
import
qualified
Data.Map
as
Map
src/Type/Solve.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Type.Solve (solve)
where
1
module
Type.Solve (solve)
where
3
2
4
import
Control.Monad
3
import
Control.Monad
src/Type/State.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Type.State
where
1
module
Type.State
where
3
2
4
import
Control.Applicative ( (<$>), (<*>), Applicative, (<|>) )
3
import
Control.Applicative ( (<$>), (<*>), Applicative, (<|>) )
src/Type/Type.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Type.Type
where
1
module
Type.Type
where
3
2
4
import
qualified
Data.Char
as
Char
3
import
qualified
Data.Char
as
Char
src/Type/Unify.hs
−1
@@ -1,4 +1,3 @@
1
−
{-#
OPTIONS_GHC
-W #-}
2
module
Type.Unify (unify)
where
1
module
Type.Unify (unify)
where
3
2
4
import
Control.Applicative ((<|>))
3
import
Control.Applicative ((<|>))
keys
esc to close
j k
move down, up
enter
open
esc
back, or up a level
1 2 3 4
readme, files, commits, refs
/
filter
y
copy the clone command
c
compare the chosen commit with another (or shift-click both)
?
show or hide this list