package liquidsoap-lang

  1. Overview
  2. Docs
Liquidsoap language library

Install 

dune-project
 Dependency

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

Authors

  1. T
    The Savonet Team <savonet-users@lists.sourceforge.net>

Maintainers

  1. T
    The Savonet Team <savonet-users@lists.sourceforge.net>

Sources

liquidsoap-2.4.6.tar.gz
md5=2734fcfd41ad76ad3b6b4ba85d2ba673
sha512=d59b5d91599c7dbdac89a5985945f1f1e999a5e2468318e4f6ecca00ebe5d37ffd7eac6347316f31d647347793fc9f91fc0fb6aba255b5377d0cd8ff522d1f62

doc/src/liquidsoap-lang.stdlib/list.ml.html

Source file list.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
include Stdlib.List

let[@tail_mod_cons] rec map f = function
  | [] -> []
  | [a1] ->
      let r1 = f a1 in
      [r1]
  | a1 :: a2 :: l ->
      let r1 = f a1 in
      let r2 = f a2 in
      r1 :: r2 :: map f l

let[@tail_mod_cons] rec mapi i f = function
  | [] -> []
  | [a1] ->
      let r1 = f i a1 in
      [r1]
  | a1 :: a2 :: l ->
      let r1 = f i a1 in
      let r2 = f (i + 1) a2 in
      r1 :: r2 :: mapi (i + 2) f l

let mapi f l = mapi 0 f l