Changeset View

Standalone View

Show All 9 Lines
10		10
11	Things like "a string" or a 'c' character shouldn't be highlighted in here.	11	Things like "a string" or a 'c' character shouldn't be highlighted in here.
12		12
13	-- I could even start a new	13	-- I could even start a new
14	-- one-line comment.	14	-- one-line comment.
15		15
16	-}	16	-}
17		17
		18	import Prelude --
		19
18	-- a data definition	20	-- a data definition
19		21
20	data Tree a = Br (Tree a) (Tree a) \| Leaf a \| Nil deriving (Show, Eq)	22	data Tree a = Br (Tree a) (Tree a) \| Leaf a \| Nil deriving (Show, Eq)
21		23
22		24
23	-- function definition, "funnyfunction::", "Integer", "Int", "Bool" should be highlighted	25	-- function definition, "funnyfunction::", "Integer", "Int", "Bool" should be highlighted
24		26
25	funnyfunction::(Tree a)=>[a]->Integer->Int->Bool	27	funnyfunction::(Tree a)=>[a]->Integer->Int->Bool
▲ Show 20 Lines • Show All 114 Lines • Show Last 20 Lines