Packages

gleam_erlang

0.1.0
1.3.0 1.2.0 1.1.0 1.0.0 1.0.0-rc1 0.34.0 0.33.0 0.32.0 0.31.0 0.30.0 0.29.0 0.28.0 0.27.0 0.26.0 0.25.0 0.24.0 0.23.1 0.23.0 0.22.0 0.21.0 0.20.0 0.19.0 0.18.1 0.18.0 0.18.0-rc1 retired 0.17.1 0.17.0 0.16.0 0.15.0 0.14.0 0.13.0 0.12.0 0.11.0 0.10.0 0.9.3 0.9.2 0.9.1 0.9.0 0.8.0 0.7.0 0.6.0 0.5.0 0.4.0 0.3.0 0.2.0 0.1.0

Types and functions for programs running on Erlang!

HexDocs

Current section

Files

Jump to
Readme
46 Versions
1 Dependency
346 Dependants
Files
Activity
gleam_erlang gen test gleam@erlang_test.erl
Raw

gen/test/gleam@erlang_test.erl 

-module(gleam@erlang_test).

-compile(no_auto_import).



-export([term_to_binary_test/0]).



-spec term_to_binary_test() -> {ok, gleam@dynamic:dynamic()} | {error, nil}.

term_to_binary_test() ->

    Term = gleam@dynamic:from({1, <<"2"/utf8>>, <<"hello"/utf8>>}),

    {ok, Out@1} = case begin

        _pipe = Term,

        _pipe@1 = gleam@erlang:term_to_binary(_pipe),

        gleam@erlang:binary_to_term(_pipe@1)

    end of

        {ok, Out} -> {ok, Out};

        _try ->

            erlang:error(#{gleam_error => assert,

                           message => <<"Assertion pattern match failed"/utf8>>,

                           value => _try,

                           module => <<"gleam/erlang_test"/utf8>>,

                           function => <<"term_to_binary_test"/utf8>>,

                           line => 7})

    end,

    true = case Term =:= Out@1 of

        true -> true;

        _try@1 ->

            erlang:error(#{gleam_error => assert,

                           message => <<"Assertion pattern match failed"/utf8>>,

                           value => _try@1,

                           module => <<"gleam/erlang_test"/utf8>>,

                           function => <<"term_to_binary_test"/utf8>>,

                           line => 11})

    end,

    {ok, Out@3} = case begin

        _pipe@2 = Term,

        _pipe@3 = gleam@erlang:term_to_binary(_pipe@2),

        gleam@erlang:unsafe_binary_to_term(_pipe@3)

    end of

        {ok, Out@2} -> {ok, Out@2};

        _try@2 ->

            erlang:error(#{gleam_error => assert,

                           message => <<"Assertion pattern match failed"/utf8>>,

                           value => _try@2,

                           module => <<"gleam/erlang_test"/utf8>>,

                           function => <<"term_to_binary_test"/utf8>>,

                           line => 13})

    end,

    true = case Term =:= Out@3 of

        true -> true;

        _try@3 ->

            erlang:error(#{gleam_error => assert,

                           message => <<"Assertion pattern match failed"/utf8>>,

                           value => _try@3,

                           module => <<"gleam/erlang_test"/utf8>>,

                           function => <<"term_to_binary_test"/utf8>>,

                           line => 17})

    end,

    {error, nil} = case begin

        _pipe@4 = <<>>,

        gleam@erlang:unsafe_binary_to_term(_pipe@4)

    end of

        {error, nil} -> {error, nil};

        _try@4 ->

            erlang:error(#{gleam_error => assert,

                           message => <<"Assertion pattern match failed"/utf8>>,

                           value => _try@4,

                           module => <<"gleam/erlang_test"/utf8>>,

                           function => <<"term_to_binary_test"/utf8>>,

                           line => 19})

    end.