this repo has no description
tweak
+1
-3
+1
-3
lib/mcp_sdk.ml
+1
-3
lib/mcp_sdk.ml
···
91
91
92
92
(* Create a tool error result with structured content *)
93
93
let create_error_result error =
94
+
Log.errorf "Error result: %s" error;
94
95
create_tool_result [Mcp.make_text_content error] ~is_error:true
95
96
96
97
(* Handle tool execution errors *)
97
98
let handle_execution_error err =
98
-
Log.errorf "Tool execution failed: %s" err;
99
99
create_error_result (Printf.sprintf "Error executing tool: %s" err)
100
100
101
101
(* Handle unknown tool error *)
102
102
let handle_unknown_tool_error name =
103
-
Log.errorf "Unknown tool: %s" name;
104
103
create_error_result (Printf.sprintf "Unknown tool: %s" name)
105
104
106
105
(* Handle general tool execution exception *)
107
106
let handle_execution_exception exn =
108
-
Log.errorf "Exception executing tool: %s" (Printexc.to_string exn);
109
107
create_error_result (Printf.sprintf "Internal error: %s" (Printexc.to_string exn))
110
108
end
111
109