Mercurial > hg > Members > kokubo > emacs
view .emacs.d/haskell-mode/examples/fontlock.hs @ 0:2764b4f45f9f
1st commit
author | Shohei KOKUBO <e105744@ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 21 Apr 2014 04:30:59 +0900 |
parents | |
children |
line wrap: on
line source
-- Comments are coloured brightly and stand out clearly. import qualified Foo as F hiding (toto) import qualified Foo hiding (toto) import qualified Foo as F (toto) import Foo as F hiding (toto) import Foo hiding (toto) import Foo as F (toto) hiding = 1 qualified = 3 as = 2 repeat :: a -> [a] repeat xs = xs where xs = x:xs -- Keywords are also bright. head :: [a] -> a head (x:_) = x head [] = error "PreludeList.head: empty list" -- Strings are coloured softly. data Maybe a = Nothing | Just a -- Type constructors, data deriving (Eq, Ord, Read, Show) -- constructors, class names -- and module names are coloured -- closer to ordinary code. recognize +++ infix :: Operator Declarations as `well` as = This Form (+) and this one = as well instance Show Toto where fun1 arg1 = foo -- FIXME: `fun1' should be highlighted. constStr = "hello \ \asdgfasgf\ \asf" {- map :: (a -> b) -> [a] -> [b] -- Commenting out large sections of map f [] = [] -- code can be misleading. Coloured map f (x:xs) = f x : map f xs -- comments reveal unused definitions. -} -- Note: the least significant bit is the first element of the list bdigits :: Int -> [Int] bdigits 0 = [0] bdigits 1 = [1] bdigits n | n>1 = n `mod` 2 : -- arch-tag: a0d08cc2-4a81-4139-93bc-b3c6be0b5fb2