starflow

-module(starflow@transform).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).

-export([prompt_default/1, parser_default/2]).

-file("/home/ethanthoma/projects/flow/src/starflow/transform.gleam", 37).
-spec prompt_default(any()) -> list(starflow@state:content()).
prompt_default(Any) ->
    [{text_content, gleam@string:inspect(Any)}].

-file("/home/ethanthoma/projects/flow/src/starflow/transform.gleam", 83).
-spec parser_default(starflow@state:state(IRS), starflow@state:response()) -> starflow@state:state(IRS).
parser_default(State, Last_response) ->
    Usage = erlang:element(6, Last_response),
    Content = erlang:element(3, Last_response),
    Message = {message, <<"assistant"/utf8>>, Content},
    erlang:setelement(
        3,
        erlang:setelement(
            2,
            State,
            lists:append(erlang:element(2, State), [Message])
        ),
        Usage
    ).