My agentic slop goes here. Not intended for anyone else!
anil.recoil.org
1(** Kitty Graphics Protocol - Frame *)
2
3type t = {
4 x : int option;
5 y : int option;
6 base_frame : int option;
7 edit_frame : int option;
8 gap_ms : int option;
9 composition : Kgp_types.composition option;
10 background_color : int32 option;
11}
12
13val empty : t
14(** Empty frame spec with defaults. *)
15
16val make :
17 ?x:int ->
18 ?y:int ->
19 ?base_frame:int ->
20 ?edit_frame:int ->
21 ?gap_ms:int ->
22 ?composition:Kgp_types.composition ->
23 ?background_color:int32 ->
24 unit ->
25 t
26(** Create a frame specification.
27
28 @param x Left edge where frame data is placed (pixels)
29 @param y Top edge where frame data is placed (pixels)
30 @param base_frame 1-based frame number to use as background canvas
31 @param edit_frame 1-based frame number to edit (0 = new frame)
32 @param gap_ms Delay before next frame in milliseconds
33 @param composition How to blend pixels onto the canvas
34 @param background_color 32-bit RGBA background when no base frame *)