package camlimages

You can search for identifiers within the package.

in-package search v0.2.0

Image processing library

Install

Dune Dependency

gitlab.com Readme Edit opam file Versions (7)

Authors

Maintainers

J

jun.furuse@gmail.com

Sources

camlimages-5.0.3.tar.bz2

sha256=b8203da78a9733488e40fafccfafb874c9ebafd8a5f1fa1d9a46ae2ac241e97a

md5=7dd5aa1944d01d2e908d4caa1e1bba78

doc/src/camlimages.core/util.ml.html

Source file `util.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
(***********************************************************************)
(*                                                                     *)
(*                             CamlImages                              *)
(*                                                                     *)
(*            Fran輟is Pessaux, projet Cristal, INRIA Rocquencourt     *)
(*            Pierre Weis, projet Cristal, INRIA Rocquencourt          *)
(*            Jun Furuse, projet Cristal, INRIA Rocquencourt           *)
(*                                                                     *)
(*  Copyright 1999-2014,                                               *)
(*  Institut National de Recherche en Informatique et en Automatique.  *)
(*  Distributed only by permission.                                    *)
(*                                                                     *)
(***********************************************************************)

external ( & ) : ('a -> 'b) -> 'a -> 'b = "%apply"

let (<<) = Bytes.set
let (<<!) = Bytes.unsafe_set

let range_check s from to_ =
  let len = Bytes.length s in
  if not (0 <= from && from <= to_ && to_ < len) then
    invalid_arg "index out of bounds"

let (>@!) = Array.unsafe_get

let (@%) s p = Char.code @@ Bytes.get s p