Szymon Wygnański finalclass

Solution Architect at @7willows

finalclass / http2-server.ml

Created December 11, 2024 11:45

H2 server sending and responding with MessagePack

	open Base
	open Protocol_conv_msgpack
	open Protocol_conv_json

	module Msg = struct
	type t = {message: string}
	[@@deriving protocol ~driver:(module Msgpack), protocol ~driver:(module Json)]
	end

	module type Request = sig