Skip to content

Instantly share code, notes, and snippets.

@dustinfarris
Created September 28, 2017 23:16
Show Gist options
  • Select an option

  • Save dustinfarris/bc9c3dea64fcca7ec64a1b84a240c084 to your computer and use it in GitHub Desktop.

Select an option

Save dustinfarris/bc9c3dea64fcca7ec64a1b84a240c084 to your computer and use it in GitHub Desktop.

Revisions

  1. dustinfarris revised this gist Sep 28, 2017. No changes.
  2. dustinfarris created this gist Sep 28, 2017.
    16 changes: 16 additions & 0 deletions TestHelpers.elm
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,16 @@
    import Fuzz exposing (Fuzzer)
    import Json.Encode as Json


    jsonInt : Fuzzer ( Int, Json.Value )
    jsonInt =
    Fuzz.map
    (\i -> ( i, Json.int i ))
    Fuzz.int


    jsonString : Fuzzer ( String, Json.Value )
    jsonString =
    Fuzz.map
    (\s -> ( s, Json.string s ))
    Fuzz.string