package toffee

  1. Overview
  2. Docs
CSS layout engine for OCaml (Flexbox, Grid, Block)

Install 

dune-project
 Dependency

github.com Readme Changelog Edit opam file Versions (1)

Authors

  1. Thibaut Mattio

Maintainers

  1. Thibaut Mattio

Sources

mosaic-0.1.0.tbz
sha256=9e4e90d17f9b2af1b07071fe425bc2c519c849c4f1d1ab73cde512be2d874849
sha512=06e9c4a741590942e81a27738d0b5c0413fafec8cf3b7dae047ad69f155e7b718aa4223818dc161b7d028efffcfd3365905e264d6fd31d453910ddfa91dcf9b9

doc/src/toffee.tree/requested_axis.ml.html

Source file requested_axis.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
type t = Horizontal | Vertical | Both

let of_absolute_axis = function
  | Geometry.Absolute_axis.Horizontal -> Horizontal
  | Geometry.Absolute_axis.Vertical -> Vertical

let to_absolute_axis = function
  | Horizontal -> Some Geometry.Absolute_axis.Horizontal
  | Vertical -> Some Geometry.Absolute_axis.Vertical
  | Both -> None

let to_string = function
  | Horizontal -> "Horizontal"
  | Vertical -> "Vertical"
  | Both -> "Both"

let compare a b =
  match (a, b) with
  | Horizontal, Horizontal -> 0
  | Horizontal, _ -> -1
  | _, Horizontal -> 1
  | Vertical, Vertical -> 0
  | Vertical, _ -> -1
  | _, Vertical -> 1
  | Both, Both -> 0

let equal a b = compare a b = 0
let pp fmt t = Format.pp_print_string fmt (to_string t)