Ekdohibs
/
ocaml
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

external weak_* functions are caml_weak_.. 

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@6190 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Basile Starynkevitch 2004-04-06 09:11:45 +00:00
parent 61b44dca6e
commit bb4028ab61
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
test/testinterp/lib.ml
View File

@ -1,3 +1,5 @@
(* file $Id$ *)
external raise : exn -> 'a = "%raise"
external not : bool -> bool = "%boolnot"
@ -35,8 +37,10 @@ external decr : int ref -> unit = "%decr"
type 'a option = None | Some of 'a
type 'a weak_t;;
external weak_create: int -> 'a weak_t = "weak_create";;
external weak_set : 'a weak_t -> int -> 'a option -> unit = "weak_set";;
external weak_get: 'a weak_t -> int -> 'a option = "weak_get";;
external weak_create: int -> 'a weak_t = "caml_weak_create";;
external weak_set : 'a weak_t -> int -> 'a option -> unit = "caml_weak_set";;
external weak_get: 'a weak_t -> int -> 'a option = "caml_weak_get";;
let x = 42;;
(* eof $Id$ *)