In short.  Solve this:

module Main exposing (..)

import Html


-- import Json.Decode exposing (Decoder, decodeString, keyValuePairs)


json : String
json =
    """[{a: 1, foo: "bar", bar: "baz"},
 {a: 2, foo: "baz", bar: "foo"},
 {a: 34, foo: "big", bar: "lebowski"}]"""


gen_keys : String -> String
gen_keys json =
    -- Decode the first JSON record and return a comma separated
    -- list of keys
    json


main : Html.Html string
main =
    Html.text (gen_keys json)

-- 
You received this message because you are subscribed to the Google Groups "Elm 
Discuss" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
For more options, visit https://groups.google.com/d/optout.

Reply via email to