tests.snug


1
2
3
4
5
6
7
8

(test "printing integers" : Int : 37 "37")
(test "printing integers" : Int : -37 "-37")
(test "printing characters" : Char : 'a' "'a'")

(data Tuple (a b) (
	(Tuple a b)))

(test "printing tuples" : Tuple Int Int : (Tuple 1 2) "(1,2)")