Current section

Files

Jump to
touch_grass src touch_grass@fetch.erl
Raw

src/touch_grass@fetch.erl

-module(touch_grass@fetch).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch, inline]).
-define(FILEPATH, "src/touch_grass/fetch.gleam").
-export([lift/0, lower/0, encode/1]).
-file("src/touch_grass/fetch.gleam", 7).
-spec lift() -> eyg@analysis@type_@isomorphic:type(integer()).
lift() ->
touch_grass@http:request().
-file("src/touch_grass/fetch.gleam", 11).
-spec lower() -> eyg@analysis@type_@isomorphic:type(integer()).
lower() ->
eyg@analysis@type_@isomorphic:result(touch_grass@http:response(), string).
-file("src/touch_grass/fetch.gleam", 17).
-spec encode(
{ok, gleam@http@response:response(bitstring())} | {error, binary()}
) -> eyg@interpreter@value:value(any(), any()).
encode(Result) ->
case Result of
{ok, Response} ->
eyg@interpreter@value:ok(touch_grass@http:response_to_eyg(Response));
{error, Reason} ->
eyg@interpreter@value:error({string, Reason})
end.