Changeset View

Standalone View

		1		port module Test exposing
		2		( (&&)
		3		, Expect(..)
		4		, Test
		5		, run
		6		)
		7
		8		{-\| Module documentation
		9
		10		# Test
		11
		12		@docs Test, Expect
		13
		14
		15		# Functions
		16
		17		@docs run
		18
		19
		20		# Operator
		21
		22		@docs (&&)
		23
		24		-}
		25
		26		import Multiline as ML
		27		exposing
		28		( Data(..)
		29		, Payload(..)
		30		, response
		31		)
		32		import Singleline as SL exposing (Dale(..), Single)
		33
		34
		35		-- test file for Elm syntax highlighting in KDE's Kate
		36		-- this is a single-line comment
		37		{-
		38		this is a multi-line comment
		39		-}
		40
		41
		42
		43		infix left 0 (\|>) = apR
		44		infix right 3 (&&) = and
		45		infix non 4 (>=) = ge
		46
		47
		48		type T
		49		= T
		50		\| A
		51		\| G
		52		\| C
		53
		54
		55		type alias Alt =
		56		T
		57
		58
		59		operator : Int -> Int -> Int
		60		operator =
		61		(+)
		62
		63
		64		conditional : number -> number -> Maybe number
		65		conditional a b =
		66		if b == 0 then
		67		Nothing
		68
		69		else if a == 0 then
		70		Just 0
		71
		72		else
		73		Just (a / b)
		74
		75
		76		lambda = Int -> Int
		77		lambda a =
		78		(\a -> a + 35)
		79
		80
		81
		82		{-\| Documentation comment
		83
		84		Should be same as comment
		85
		86		-}
		87		caseStatement : Maybe number -> number -> number
		88		caseStatement a b =
		89		case a of
		90		Just a_ ->
		91		a_
		92
		93		_ ->
		94		b
		95
		96
		97		record : { float : Float, int : Int }
		98		record =
		99		{ float = 1.455321, int = 83 }
		100
		101
		102		tuple : ( Float, Float )
		103		tuple =
		104		( 3.14, 9.553 )
		105
		106
		107		port portTest : () -> Cmd msg