messages = Chat.appendUserMessage previousMessages Stdin.line! {}
response = Http.send (Chat.buildHttpRequest client messages {}) |> Task.result!
updatedMessages = Chat.updateMessageList response messages |> Tools.handleToolCalls! client toolHandlerMap
printLastMessage! updatedMessages

messages = Chat.appendUserMessage previousMessages Stdin.line! {}
updatedMessages =
    Http.send (Chat.buildHttpRequest client messages {})
    |> Task.result!
    |> Chat.updateMessageList messages
    |> Tools.handleToolCalls client toolHandlerMap
printLastMessage! updatedMessages

── TYPE MISMATCH in roc-agent.roc ──────────────────────────────────────────────

This 1st argument to printLastMessage has an unexpected type:

45│          printLastMessage! updatedMessages
                               ^^^^^^^^^^^^^^^

This updatedMessages value is a:

    Task (List Tools.Message) [
        DirErr [
            AlreadyExists,
            NotADirectory,
            NotFound,
            Other Str,
            PermissionDenied,
        ],
        PathErr InternalPath.GetMetadataErr,
    ]

But printLastMessage needs its 1st argument to be:

    List Chat.Message

Tip: Add type annotations to functions or values to help you figure
this out.


── UNRECOGNIZED NAME in roc-agent.roc ──────────────────────────────────────────

Nothing is named `messages` in this scope.

41│              Http.send (Chat.buildHttpRequest client messages {})
                                                         ^^^^^^^^

Did you mean one of these?

    Message
    initMessages
    Integer
    Result