Source file mode.ml

1
2
3
4
5
6
7
8
9
10
11
12
type json_schema = {
  name : string;
  schema : Yojson.Basic.t;
}

type t =
  | Regular
  | Object_json of json_schema option
  | Object_tool of {
      tool_name : string;
      schema : json_schema;
    }