Current section
Files
Jump to
Current section
Files
src/internal@foo_json_test.erl
-module(internal@foo_json_test).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).
-export([main/0]).
-spec main() -> nil.
main() ->
Foo_a = internal@foo:fixture_foo(),
Foo_str = begin
_pipe = Foo_a,
internal@foo_json:to_string(_pipe)
end,
Foo_b = begin
_pipe@1 = Foo_str,
_pipe@2 = internal@foo_json:from_string(_pipe@1),
gleam@result:lazy_unwrap(
_pipe@2,
fun() ->
gleam@io:debug(
<<"parse error calling foo_json.from_string"/utf8>>
),
erlang:error(#{gleam_error => panic,
message => <<"panic expression evaluated"/utf8>>,
module => <<"internal/foo_json_test"/utf8>>,
function => <<"main"/utf8>>,
line => 16})
end
)
end,
case Foo_a =:= Foo_b of
true ->
gleam@io:println(<<"foos equal"/utf8>>);
false ->
gleam@io:debug({<<"a"/utf8>>, Foo_a}),
gleam@io:debug({<<"b"/utf8>>, Foo_b}),
erlang:error(#{gleam_error => panic,
message => <<"not equal"/utf8>>,
module => <<"internal/foo_json_test"/utf8>>,
function => <<"main"/utf8>>,
line => 24})
end,
gleam@io:print(Foo_str).