Current section

Files

Jump to
glance_printer src glance_printer@internal@doc_extras.erl
Raw

src/glance_printer@internal@doc_extras.erl

-module(glance_printer@internal@doc_extras).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).
-export([nest/1, trailing_comma/0, nbsp/0, comma_separated_in_parentheses/1]).
-if(?OTP_RELEASE >= 27).
-define(MODULEDOC(Str), -moduledoc(Str)).
-define(DOC(Str), -doc(Str)).
-else.
-define(MODULEDOC(Str), -compile([])).
-define(DOC(Str), -compile([])).
-endif.
?MODULEDOC(false).
-file("src/glance_printer/internal/doc_extras.gleam", 9).
?DOC(false).
-spec nest(glam@doc:document()) -> glam@doc:document().
nest(Input) ->
glam@doc:nest(Input, 2).
-file("src/glance_printer/internal/doc_extras.gleam", 15).
?DOC(false).
-spec trailing_comma() -> glam@doc:document().
trailing_comma() ->
glam@doc:break(<<""/utf8>>, <<","/utf8>>).
-file("src/glance_printer/internal/doc_extras.gleam", 20).
?DOC(false).
-spec nbsp() -> glam@doc:document().
nbsp() ->
glam@doc:from_string(<<" "/utf8>>).
-file("src/glance_printer/internal/doc_extras.gleam", 26).
?DOC(false).
-spec comma_separated_in_parentheses(list(glam@doc:document())) -> glam@doc:document().
comma_separated_in_parentheses(Arguments) ->
Comma_separated_arguments = begin
_pipe = Arguments,
glam@doc:concat_join(
_pipe,
[glam@doc:from_string(<<","/utf8>>),
{break, <<" "/utf8>>, <<""/utf8>>}]
)
end,
_pipe@1 = glam@doc:concat(
[glam@doc:from_string(<<"("/utf8>>), {break, <<""/utf8>>, <<""/utf8>>}]
),
_pipe@2 = glam@doc:append(_pipe@1, Comma_separated_arguments),
_pipe@3 = nest(_pipe@2),
_pipe@4 = glam@doc:append_docs(
_pipe@3,
[trailing_comma(), glam@doc:from_string(<<")"/utf8>>)]
),
glam@doc:group(_pipe@4).