package streamable

  1. Overview
  2. Docs
A collection of types suitable for incremental serialization.

Install

dune-project
 Dependency

Authors

Maintainers

Sources

v0.17.1.tar.gz
md5=f8ef1a28079f4e6e6617ba2cfa51bc4e
sha512=2f56d8b10032756c3190b0e68094f0c89f96f9f3fc39d5a8c62f340abe837c7ba1c75f99c914213cbb6376dc6f3abac689110d18af226998bba4484dd9ff3c47

doc/src/ppx_streamable/type_.ml.html

Source file type_.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
open! Base
open! Import

type t =
  | Type_declaration of type_declaration
  | Core_type of core_type
[@@deriving variants]

let loc = function
  | Type_declaration type_dec -> type_dec.ptype_loc
  | Core_type core_type -> core_type.ptyp_loc
;;

let human_readable_name = function
  | Type_declaration type_dec ->
    (match type_dec.ptype_manifest with
     | Some core_type -> string_of_core_type core_type
     | None -> type_dec.ptype_name.txt)
  | Core_type core_type -> string_of_core_type core_type
;;

let match_core_type = function
  | Type_declaration type_dec -> type_dec.ptype_manifest
  | Core_type core_type -> Some core_type
;;