blob: f5e2b5550d108ccd77bd67947ffa426e60c18a85 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
module ĈrazyThings where
import "base" Data.Char
import "base" Data.Char (isControl, isSpace)
import "base" Data.Char (isControl, --isSpace)
isSpace)
import "base" Data.Char (isControl, -- isSpace)
isSpace)
(-->) :: Num a => a -- signature
(-->) = 2 -- >implementation
--test comment
-- test comment
main :: IO ()
main = putStrLn "hello world"
gádd x y = x + y
ádd x y = x + y
data ĈrazyThings =
Ĉar |
House |
Peár
deriving (Show, Eq)
-- some char literals:
charl = ['"', 'a', '\ESC', '\'', ' ']
|