diff options
author | Tom Kelly <ctk21@cl.cam.ac.uk> | 2021-03-11 14:17:08 +0000 |
---|---|---|
committer | Tom Kelly <ctk21@cl.cam.ac.uk> | 2021-09-27 10:54:12 +0100 |
commit | bd785866912609fc1960dcb193cc6304c6e5d274 (patch) | |
tree | 5e1a6dc28550e594f55e3991b7d835e4f72b7968 /stdlib/stdlib.mli | |
parent | ca46c9e8ae7f98ec3ba29d893265baa989b6f88d (diff) | |
download | ocaml-bd785866912609fc1960dcb193cc6304c6e5d274.tar.gz |
Remove effects, rename to 4.12+domains
Diffstat (limited to 'stdlib/stdlib.mli')
-rw-r--r-- | stdlib/stdlib.mli | 33 |
1 files changed, 0 insertions, 33 deletions
diff --git a/stdlib/stdlib.mli b/stdlib/stdlib.mli index 621eb90554..41f65b1acc 100644 --- a/stdlib/stdlib.mli +++ b/stdlib/stdlib.mli @@ -45,39 +45,6 @@ exception Exit (** The [Exit] exception is not raised by any library function. It is provided for use in your programs. *) -(** {6 Effects} *) - -(** [perform e] performs an effect [e]. - - @raises Unhandled if there is no active handler. *) -external perform : 'a eff -> 'a = "%perform" - -(** [continue k x] resumes the continuation [k] by passing [x] to [k]. - - @raise Invalid_argument if the continuation has already been - resumed. *) -val continue: ('a, 'b) continuation -> 'a -> 'b - -(** [discontinue k e] resumes the continuation [k] by raising the - exception [e] in [k]. - - @raise Invalid_argument if the continuation has already been - resumed. *) -val discontinue: ('a, 'b) continuation -> exn -> 'b - -(** [reperform e k] is semantically equivalent to: - - {[ - match perform e with - | v -> continue k v - | exception e -> discontinue k e - ]} - - but it can be implemented directly more efficiently and is a - very common case: it is what you should do with effects that - you don't handle. *) -val reperform: 'a eff -> ('a, 'b) continuation -> 'b - exception Match_failure of (string * int * int) [@ocaml.warn_on_literal_pattern] (** Exception raised when none of the cases of a pattern-matching |