package ocamlformat-mlx-lib

  1. Overview
  2. Docs
OCaml .mlx Code Formatter

Install 

dune-project
 Dependency

github.com Edit opam file Versions (7)

Authors

  1. A
    Andrey Popp <me@andreypopp.com>
  2. J
    Josh Berdine <jjb@fb.com>
  3. H
    Hugo Heuzard <hugo.heuzard@gmail.com>
  4. E
    Etienne Millon <etienne@tarides.com>
  5. G
    Guillaume Petiot <guillaume@tarides.com>
  6. J
    Jules Aguillon <jules@j3s.fr>

Maintainers

  1. A
    Andrey Popp <me@andreypopp.com>
  2. D
    David Sancho <dsnxmoreno@gmail.com>

Sources

ocamlformat-mlx-0.28.1.3.tbz
sha256=fb3af0d7a0b6ced6c9cbd84858e7aa86fe2a4b9f4b8f46080a04bc465b0e6eff
sha512=c0dc6c33aea286fbc007fdf02b09c37b72caf76d12ccf92576a04823cdcacf3044b6deba3372f40a87a0ae6f602da20d5840ebf0f116f4ca346b85c4d540b2f0

doc/src/ocamlformat-mlx-lib.ocamlformat_stdlib/fpath_ext.ml.html

Source file fpath_ext.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
include Fpath

let cwd () = Stdlib.Sys.getcwd () |> v

let exists p = to_string p |> Stdlib.Sys.file_exists

let to_absolute file = if is_rel file then append (cwd ()) file else file

let to_string ?(relativize = false) p =
  if relativize then
    Base.Option.value_map
      (Fpath.relativize ~root:(cwd ()) p)
      ~default:(to_string p) ~f:to_string
  else to_string p

let pp fmt p = Format.fprintf fmt "%s" (to_string ~relativize:true p)