SHOW:
|
|
- or go back to the newest paste.
| 1 | trading_model.eliom: | |
| 2 | [%%shared | |
| 3 | type sellOrderCapture = {
| |
| 4 | sellOrderId : int; | |
| 5 | } | |
| 6 | [@@deriving yojson] | |
| 7 | ||
| 8 | type buyOrderCapture = {
| |
| 9 | buyOrderId : int; | |
| 10 | quantity : int; | |
| 11 | } | |
| 12 | [@@deriving yojson] | |
| 13 | ||
| 14 | type t = {
| |
| 15 | sellOrder : sellOrderCapture; | |
| 16 | buyOrders : buyOrderCapture list; | |
| 17 | } | |
| 18 | [@@deriving yojson] | |
| 19 | ||
| 20 | Error: | |
| 21 | File "_server/trading_model.type_mli", line 17, characters 8-9: | |
| 22 | Error: Syntax error | |
| 23 | ||
| 24 | ||
| 25 | trading_model.type_mli: | |
| 26 | module MatchCapture : | |
| 27 | sig | |
| 28 | type sellOrderCapture = { sellOrderId : int; }
| |
| 29 | val sellOrderCapture_to_yojson : sellOrderCapture -> Yojson.Safe.t | |
| 30 | val sellOrderCapture_of_yojson : | |
| 31 | Yojson.Safe.t -> sellOrderCapture Ppx_deriving_yojson_runtime.error_or | |
| 32 | type buyOrderCapture = { buyOrderId : int; quantity : int; }
| |
| 33 | val buyOrderCapture_to_yojson : buyOrderCapture -> Yojson.Safe.t | |
| 34 | val buyOrderCapture_of_yojson : | |
| 35 | Yojson.Safe.t -> buyOrderCapture Ppx_deriving_yojson_runtime.error_or | |
| 36 | type t = {
| |
| 37 | sellOrder : sellOrderCapture; | |
| 38 | buyOrders : buyOrderCapture list; | |
| 39 | } | |
| 40 | val to_yojson : t -> Yojson.Safe.t | |
| 41 | val of_yojson : Yojson.Safe.t -> t Ppx_deriving_yojson_runtime.error_or | |
| 42 | val _ : Yojson.Safe.t -> t Ppx_deriving_yojson_runtime.error_or | |
| 43 | end |
