diff options
| author | Louis Pilfold <louis@lpil.uk> | 2019-03-18 01:12:09 +0000 |
|---|---|---|
| committer | Louis Pilfold <louis@lpil.uk> | 2019-03-18 01:12:09 +0000 |
| commit | 2cbe6bd721ae2be68c29e4de71db51bafc3478f8 (patch) | |
| tree | 8bc1a3646d662fe047f45af4ba6a4c55e2ab6f09 /src/gleam__stdlib.erl | |
| parent | 336614d8fc815d5eec7461ed271ae45697d9216c (diff) | |
| download | gleam_stdlib-2cbe6bd721ae2be68c29e4de71db51bafc3478f8.tar.gz gleam_stdlib-2cbe6bd721ae2be68c29e4de71db51bafc3478f8.zip | |
tuple module, decode lists
Diffstat (limited to 'src/gleam__stdlib.erl')
| -rw-r--r-- | src/gleam__stdlib.erl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/gleam__stdlib.erl b/src/gleam__stdlib.erl index f377e3f..3ab9fd6 100644 --- a/src/gleam__stdlib.erl +++ b/src/gleam__stdlib.erl @@ -6,7 +6,7 @@ atom_create_from_string/1, atom_to_string/1, map_fetch/2, iodata_append/2, iodata_prepend/2, identity/1, decode_int/1, decode_string/1, decode_bool/1, decode_float/1, decode_thunk/1, - decode_tuple/1, decode_field/2]). + decode_tuple/1, decode_list/1, decode_field/2]). expect_equal(A, Expected) -> ?assertEqual(Expected, A). expect_not_equal(A, Expected) -> ?assertNotEqual(Expected, A). @@ -58,6 +58,9 @@ decode_thunk(Data) -> decode_error_msg("a zero arity function", Data). decode_tuple(Data = {_, _}) -> {ok, Data}; decode_tuple(Data) -> decode_error_msg("a 2 element tuple", Data). +decode_list(Data) when is_list(Data) -> {ok, Data}; +decode_list(Data) -> decode_error_msg("a List", Data). + decode_field(Data, Key) -> case Data of #{Key := Value} -> |