src/Pure/Concurrent/par_list_sequential.ML
author wenzelm
Thu, 18 Aug 2011 17:30:47 +0200
changeset 44269 3ff2fd162aee
parent 41711 3422ae5aff3a
child 59004 6573e6d64ec8
permissions -rw-r--r--
updated sequential version (cf. b94951f06e48);

(*  Title:      Pure/Concurrent/par_list_sequential.ML
    Author:     Makarius

Dummy version of parallel list combinators -- plain sequential evaluation.
*)

structure Par_List: PAR_LIST =
struct

fun managed_results _ f = map (Exn.capture f);
fun map_name _ = map;
val map = map;
val get_some = get_first;
val find_some = find_first;
val exists = exists;
val forall = forall;

end;