package oxbow

  1. Overview
  2. Docs
package oxbow
Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Source file delta.ml

1
2
3
4
5
6
7
8
9
type 'a t =
  | Abs of 'a [@name "abs"]
  | Rel of 'a [@name "rel"]
[@@deriving yojson]

let resolve ~add ~current = function
  | Abs a -> a
  | Rel r -> add current r
;;