package wayland
- Overview
- No Docs
You can search for identifiers within the package.
in-package search v0.2.0
Pure OCaml Wayland protocol library
Install
Dune Dependency
Authors
Maintainers
Sources
wayland-2.1.tbz
sha256=0ffb53958954f1ed4ef874a122c071a9cf3de77ae341b963eb7b513d8028f3c1
sha512=e391b91b4161ada44339bb97b0acf40a0ef3d3c8f62a114333a61155b70288b31b5904492ebbf187bad957849ff6e1df172d014f46ffc33db7140fa833449f5c
doc/src/wayland.protocols/wp_primary_selection_unstable_v1_proto.ml.html
Source file wp_primary_selection_unstable_v1_proto.ml
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85
(* This file was generated automatically by wayland-scanner-ocaml *) open struct module Proxy = Wayland.Proxy module Iface_reg = Wayland.Iface_reg module Metadata = Wayland.Metadata end module Zwp_primary_selection_device_manager_v1 = struct type t = [`Zwp_primary_selection_device_manager_v1] type _ Metadata.ty += T : [`Zwp_primary_selection_device_manager_v1] Metadata.ty type versions = [`V1] let interface = "zwp_primary_selection_device_manager_v1" let version = 1l let requests = function | 0 -> "create_source", ["id", `New_ID (Some "zwp_primary_selection_source_v1")] | 1 -> "get_device", ["id", `New_ID (Some "zwp_primary_selection_device_v1"); "seat", `Object (Some "wl_seat")] | 2 -> "destroy", [] | i -> Proxy.unknown_request i, [] let events = function | i -> Proxy.unknown_event i, [] end let () = Iface_reg.register (module Zwp_primary_selection_device_manager_v1) module Zwp_primary_selection_device_v1 = struct type t = [`Zwp_primary_selection_device_v1] type _ Metadata.ty += T : [`Zwp_primary_selection_device_v1] Metadata.ty type versions = [`V1] let interface = "zwp_primary_selection_device_v1" let version = 1l let requests = function | 0 -> "set_selection", ["source", `Object (Some "zwp_primary_selection_source_v1"); "serial", `Uint] | 1 -> "destroy", [] | i -> Proxy.unknown_request i, [] let events = function | 0 -> "data_offer", ["offer", `New_ID (Some "zwp_primary_selection_offer_v1")] | 1 -> "selection", ["id", `Object (Some "zwp_primary_selection_offer_v1")] | i -> Proxy.unknown_event i, [] end let () = Iface_reg.register (module Zwp_primary_selection_device_v1) module Zwp_primary_selection_offer_v1 = struct type t = [`Zwp_primary_selection_offer_v1] type _ Metadata.ty += T : [`Zwp_primary_selection_offer_v1] Metadata.ty type versions = [`V1] let interface = "zwp_primary_selection_offer_v1" let version = 1l let requests = function | 0 -> "receive", ["mime_type", `String; "fd", `FD] | 1 -> "destroy", [] | i -> Proxy.unknown_request i, [] let events = function | 0 -> "offer", ["mime_type", `String] | i -> Proxy.unknown_event i, [] end let () = Iface_reg.register (module Zwp_primary_selection_offer_v1) module Zwp_primary_selection_source_v1 = struct type t = [`Zwp_primary_selection_source_v1] type _ Metadata.ty += T : [`Zwp_primary_selection_source_v1] Metadata.ty type versions = [`V1] let interface = "zwp_primary_selection_source_v1" let version = 1l let requests = function | 0 -> "offer", ["mime_type", `String] | 1 -> "destroy", [] | i -> Proxy.unknown_request i, [] let events = function | 0 -> "send", ["mime_type", `String; "fd", `FD] | 1 -> "cancelled", [] | i -> Proxy.unknown_event i, [] end let () = Iface_reg.register (module Zwp_primary_selection_source_v1)
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>