shimmer

-module(shimmer@snowflake).
-compile(no_auto_import).

-export([from_dynamic/1]).

-spec from_dynamic(gleam@dynamic:dynamic()) -> {ok, binary()} |
    {error, list(gleam@dynamic:decode_error())}.
from_dynamic(Dyn) ->
    case gleam@dynamic:classify(Dyn) of
        <<"String"/utf8>> ->
            case gleam@dynamic:string(Dyn) of
                {error, _try} -> {error, _try};
                {ok, Str} ->
                    {ok, Str}
            end;

        <<"Int"/utf8>> ->
            case gleam@dynamic:int(Dyn) of
                {error, _try@1} -> {error, _try@1};
                {ok, Num} ->
                    {ok, gleam@int:to_string(Num)}
            end;

        _@1 ->
            {error, []}
    end.