Revision 7a91c6b428179905821164a4f4f13f134e791e50 authored by weis on 04 December 2006, 17:58:03 UTC, committed by weis on 04 December 2006, 17:58:03 UTC
1 parent b575816
seqp3l.mli
(***********************************************************************)
(* *)
(* OCamlP3l *)
(* *)
(* (C) 2004-2006 *)
(* Roberto Di Cosmo (dicosmo@dicosmo.org) *)
(* Zheng Li (zli@lip6.fr) *)
(* Pierre Weis (Pierre.Weis@inria.fr) *)
(* Francois Clement (Francois.Clement@inria.fr) *)
(* *)
(* Based on original Ocaml P3L System *)
(* (C) 1997 by *)
(* Roberto Di Cosmo (dicosmo@ens.fr) *)
(* Marco Danelutto (marcod@di.unipi.it) *)
(* Xavier Leroy (Xavier.Leroy@inria.fr) *)
(* Susanna Pelagatti (susanna@di.unipi.it) *)
(* *)
(* This program is free software; you can redistribute it and/or *)
(* modify it under the terms of the GNU Library General Public License *)
(* as published by the Free Software Foundation; either version 2 *)
(* of the License, or (at your option) any later version. *)
(* *)
(* This program is distributed in the hope that it will be useful, *)
(* but WITHOUT ANY WARRANTY; without even the implied warranty of *)
(* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *)
(* GNU Library General Public License for more details. *)
(* *)
(***********************************************************************)
(* $Id: seqp3l.mli,v 1.2 2006-11-27 19:00:37 weis Exp $ *)
type ('a, 'b) skel =
?ecol:P3lstream.color -> unit -> 'a P3lstream.s -> 'b P3lstream.s
val seq : ?col:P3lstream.color -> (unit -> 'a -> 'b) -> ('a, 'b) skel
val pipeline :
('a, 'b) skel -> ('b, 'c) skel -> ('a, 'c) skel
val ( ||| ) :
('a, 'b) skel -> ('b, 'c) skel -> ('a, 'c) skel
val farm :
?col:P3lstream.color ->
?colv:P3lstream.color list -> ('a, 'b) skel * int -> ('a, 'b) skel
val loop :
?col:P3lstream.color ->
('a -> bool) * ('a, 'a) skel -> ('a, 'a) skel
val mapvector :
?col:P3lstream.color ->
?colv:P3lstream.color list ->
('a, 'b) skel * int -> ('a array, 'b array) skel
val reducevector :
?col:P3lstream.color ->
?colv:P3lstream.color list ->
('a * 'a, 'a) skel * int -> ('a array, 'a) skel
val parfun : (unit -> ('a, 'b) skel) -> 'a P3lstream.s -> 'b P3lstream.s
val pardo : (unit -> 'a) -> 'a
![swh spinner](/static/img/swh-spinner.gif)
Computing file changes ...