Packages

A memcached client in pure gleam!

Current section

Files

Jump to
glemcached src glemcached@internal@pop_ba.erl
Raw

src/glemcached@internal@pop_ba.erl

-module(glemcached@internal@pop_ba).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).
-export([pop_until_space_on_same_line/1, pop_until_rn/1]).
-file("/home/user/Documents/code/learn/gleam/memcached/src/glemcached/internal/pop_ba.gleam", 11).
-spec do_pop_until_space_on_same_line(bitstring(), bitstring()) -> gleam@option:option({bitstring(),
bitstring()}).
do_pop_until_space_on_same_line(Left, Right) ->
case Right of
<<" "/utf8, Right@1/bitstring>> ->
{some, {Left, Right@1}};
<<"\r\n"/utf8, _/bitstring>> ->
none;
<<A, Right@2/bitstring>> ->
do_pop_until_space_on_same_line(<<Left/bitstring, A>>, Right@2);
_ ->
none
end.
-file("/home/user/Documents/code/learn/gleam/memcached/src/glemcached/internal/pop_ba.gleam", 5).
-spec pop_until_space_on_same_line(bitstring()) -> gleam@option:option({bitstring(),
bitstring()}).
pop_until_space_on_same_line(Ba) ->
do_pop_until_space_on_same_line(<<>>, Ba).
-file("/home/user/Documents/code/learn/gleam/memcached/src/glemcached/internal/pop_ba.gleam", 25).
-spec do_pop_until_rn(bitstring(), bitstring()) -> gleam@option:option({bitstring(),
bitstring()}).
do_pop_until_rn(Left, Right) ->
case Right of
<<"\r\n"/utf8, Right@1/bitstring>> ->
{some, {Left, Right@1}};
<<A, Right@2/bitstring>> ->
do_pop_until_rn(<<Left/bitstring, A>>, Right@2);
_ ->
none
end.
-file("/home/user/Documents/code/learn/gleam/memcached/src/glemcached/internal/pop_ba.gleam", 21).
-spec pop_until_rn(bitstring()) -> gleam@option:option({bitstring(),
bitstring()}).
pop_until_rn(Ba) ->
do_pop_until_rn(<<>>, Ba).