Sha256: 4c22522ba285ec7de77791ce486a3d16beb72b9c0476e8078e34f88375a43919

Contents?: true

Size: 1.36 KB

Versions: 141

Compression:

Stored size: 1.36 KB

Contents

port module Main exposing (..)

import Test.Runner.Node exposing (run, TestProgram)
import Json.Encode exposing (Value)
import Test exposing (..)
import Expect
import Date
import Gigasecond exposing (add)


tests : Test
tests =
    describe "Gigasecond"
        [ describe "add"
            [ test "2011-04-25" <|
                \() ->
                    Expect.equal (date "2043-01-01T01:46:40") (Gigasecond.add (date "2011-04-25"))
            , test "1977-06-13" <|
                \() ->
                    Expect.equal (date "2009-02-19T01:46:40") (Gigasecond.add (date "1977-06-13"))
            , test "1959-07-19" <|
                \() ->
                    Expect.equal (date "1991-03-27T01:46:40") (Gigasecond.add (date "1959-07-19"))
            , test "full time specified" <|
                \() ->
                    Expect.equal (date "2046-10-02T23:46:40") (Gigasecond.add (date "2015-01-24T22:00:00"))
            , test "full time with day roll-over" <|
                \() ->
                    Expect.equal (date "2046-10-03T01:46:39") (Gigasecond.add (date "2015-01-24T23:59:59"))
            ]
        ]


date : String -> Date.Date
date input =
    case Date.fromString input of
        Ok date ->
            date

        Err reason ->
            Debug.crash reason


main : TestProgram
main =
    run emit tests


port emit : ( String, Value ) -> Cmd msg

Version data entries

141 entries across 141 versions & 1 rubygems

Version Path
trackler-2.1.0.23 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.22 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.21 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.20 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.19 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.18 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.17 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.16 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.15 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.14 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.13 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.12 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.11 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.10 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.9 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.8 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.7 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.6 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.5 tracks/elm/exercises/gigasecond/Tests.elm
trackler-2.1.0.4 tracks/elm/exercises/gigasecond/Tests.elm