diff --git a/autotests/html/highlight.hs.html b/autotests/html/highlight.hs.html
--- a/autotests/html/highlight.hs.html
+++ b/autotests/html/highlight.hs.html
@@ -25,7 +25,7 @@
-- a data definition
-data Tree a = Br (Tree a) (Tree a) | Leaf a | Nil deriving (Show, Eq)
+data Tree a = Br (Tree a) (Tree a) | Leaf a | Nil deriving (Show, Eq)
-- function definition, "funnyfunction::", "Integer", "Int", "Bool" should be highlighted
@@ -37,25 +37,25 @@
-- first line of function definitions (type declaration) should be highlighted
strangefunction::Int->String
-strangefunction 1 = "hello"
-strangefunction 2 = "what's up"
-strangefunction 3 = (strangefunction 1) ++ ", " ++ (strangefunction 2)
-strangefunction 4 = 'a':'b':'c':'"':[] -- will return "abc"
-strangefunction 5 = '\n':[]
-strangefunction 6 = '\invalidhaskell':[]
+strangefunction 1 = "hello"
+strangefunction 2 = "what's up"
+strangefunction 3 = (strangefunction 1) ++ ", " ++ (strangefunction 2)
+strangefunction 4 = 'a':'b':'c':'"':[] -- will return "abc"
+strangefunction 5 = '\n':[]
+strangefunction 6 = '\invalidhaskell':[]
-- function name including the single quote character
-- and infix operator (`div`)
justtesting'::Int->Int
-justtesting' 2 = 2+1
-justtesting' 9 = 7 `div` 2
+justtesting' 2 = 2+1
+justtesting' 9 = 7 `div` 2
-- same definition as above, slightly different function name and a couple more whitespaces
justtesting'' :: Int -> Int
-justtesting'' 2 = 3
-justtesting'' 9 = 3 + 9 - 9
+justtesting'' 2 = 3
+justtesting'' 9 = 3 + 9 - 9
-- the following lines are copied out of Haskell's "Prelude.hs"
diff --git a/autotests/html/highlight.lhs.html b/autotests/html/highlight.lhs.html
--- a/autotests/html/highlight.lhs.html
+++ b/autotests/html/highlight.lhs.html
@@ -23,7 +23,7 @@
a data definition
-> data Tree a = Br (Tree a) (Tree a) | Leaf a | Nil deriving (Show, Eq)
+> data Tree a = Br (Tree a) (Tree a) | Leaf a | Nil deriving (Show, Eq)
function definition, "funnyfunction::", "Integer", "Int", "Bool" should be highlighted
@@ -35,25 +35,25 @@
first line of function definitions (type declaration) should be highlighted
> strangefunction::Int->String
-> strangefunction 1 = "hello"
-> strangefunction 2 = "what's up"
-> strangefunction 3 = (strangefunction 1) ++ ", " ++ (strangefunction 2)
-> strangefunction 4 = 'a':'b':'c':'"':[] -- will return "abc"
-> strangefunction 5 = '\n':[]
-> strangefunction 6 = '\invalidhaskell':[]
+> strangefunction 1 = "hello"
+> strangefunction 2 = "what's up"
+> strangefunction 3 = (strangefunction 1) ++ ", " ++ (strangefunction 2)
+> strangefunction 4 = 'a':'b':'c':'"':[] -- will return "abc"
+> strangefunction 5 = '\n':[]
+> strangefunction 6 = '\invalidhaskell':[]
function name including the single quote character
and infix operator (`div`)
> justtesting'::Int->Int
-> justtesting' 2 = 2+1
-> justtesting' 9 = 7 `div` 2
+> justtesting' 2 = 2+1
+> justtesting' 9 = 7 `div` 2
same definition as above, slightly different function name and a couple more whitespaces
> justtesting'' :: Int -> Int
-> justtesting'' 2 = 3
-> justtesting'' 9 = 3 + 9 - 9
+> justtesting'' 2 = 3
+> justtesting'' 9 = 3 + 9 - 9
the following lines are copied out of Haskell's "Prelude.hs"
diff --git a/autotests/reference/highlight.hs.ref b/autotests/reference/highlight.hs.ref
--- a/autotests/reference/highlight.hs.ref
+++ b/autotests/reference/highlight.hs.ref
@@ -19,7 +19,7 @@
-- a data definition
-data Tree a = Br (Tree a) (Tree a) | Leaf a | Nil deriving (Show, Eq)
+data Tree a = Br (Tree a) (Tree a) | Leaf a | Nil deriving (Show, Eq)
-- function definition, "funnyfunction::", "Integer", "Int", "Bool" should be highlighted
@@ -31,25 +31,25 @@
-- first line of function definitions (type declaration) should be highlighted
strangefunction::Int->String
-strangefunction 1 = "hello"
-strangefunction 2 = "what's up"
-strangefunction 3 = (strangefunction 1) ++ ", " ++ (strangefunction 2)
-strangefunction 4 = 'a':'b':'c':'"':[] -- will return "abc"
-strangefunction 5 = '\n':[]
-strangefunction 6 = '\invalidhaskell':[]
+strangefunction 1 = "hello"
+strangefunction 2 = "what's up"
+strangefunction 3 = (strangefunction 1) ++ ", " ++ (strangefunction 2)
+strangefunction 4 = 'a':'b':'c':'"':[] -- will return "abc"
+strangefunction 5 = '\n':[]
+strangefunction 6 = '\invalidhaskell':[]
-- function name including the single quote character
-- and infix operator (`div`)
justtesting'::Int->Int
-justtesting' 2 = 2+1
-justtesting' 9 = 7 `div` 2
+justtesting' 2 = 2+1
+justtesting' 9 = 7 `div` 2
-- same definition as above, slightly different function name and a couple more whitespaces
justtesting'' :: Int -> Int
-justtesting'' 2 = 3
-justtesting'' 9 = 3 + 9 - 9
+justtesting'' 2 = 3
+justtesting'' 9 = 3 + 9 - 9
-- the following lines are copied out of Haskell's "Prelude.hs"
diff --git a/autotests/reference/highlight.lhs.ref b/autotests/reference/highlight.lhs.ref
--- a/autotests/reference/highlight.lhs.ref
+++ b/autotests/reference/highlight.lhs.ref
@@ -17,7 +17,7 @@
a data definition
-> data Tree a = Br (Tree a) (Tree a) | Leaf a | Nil deriving (Show, Eq)
+> data Tree a = Br (Tree a) (Tree a) | Leaf a | Nil deriving (Show, Eq)
function definition, "funnyfunction::", "Integer", "Int", "Bool" should be highlighted
@@ -29,25 +29,25 @@
first line of function definitions (type declaration) should be highlighted
> strangefunction::Int->String
-> strangefunction 1 = "hello"
-> strangefunction 2 = "what's up"
-> strangefunction 3 = (strangefunction 1) ++ ", " ++ (strangefunction 2)
-> strangefunction 4 = 'a':'b':'c':'"':[] -- will return "abc"
-> strangefunction 5 = '\n':[]
-> strangefunction 6 = '\invalidhaskell':[]
+> strangefunction 1 = "hello"
+> strangefunction 2 = "what's up"
+> strangefunction 3 = (strangefunction 1) ++ ", " ++ (strangefunction 2)
+> strangefunction 4 = 'a':'b':'c':'"':[] -- will return "abc"
+> strangefunction 5 = '\n':[]
+> strangefunction 6 = '\invalidhaskell':[]
function name including the single quote character
and infix operator (`div`)
> justtesting'::Int->Int
-> justtesting' 2 = 2+1
-> justtesting' 9 = 7 `div` 2
+> justtesting' 2 = 2+1
+> justtesting' 9 = 7 `div` 2
same definition as above, slightly different function name and a couple more whitespaces
> justtesting'' :: Int -> Int
-> justtesting'' 2 = 3
-> justtesting'' 9 = 3 + 9 - 9
+> justtesting'' 2 = 3
+> justtesting'' 9 = 3 + 9 - 9
the following lines are copied out of Haskell's "Prelude.hs"
diff --git a/data/syntax/haskell.xml b/data/syntax/haskell.xml
--- a/data/syntax/haskell.xml
+++ b/data/syntax/haskell.xml
@@ -1,6 +1,6 @@
-
+
- case
@@ -471,7 +471,7 @@
-
+