diff options
| author | Pierre Weis <Pierre.Weis@inria.fr> | 2015-09-13 13:15:03 +0000 |
|---|---|---|
| committer | Pierre Weis <Pierre.Weis@inria.fr> | 2015-09-13 13:15:03 +0000 |
| commit | b3b3cd32f606acd8cff57f69bab9ca0cb1718fbe (patch) | |
| tree | 6f550acb6c797e7cd33469e042ccb40dd4fa45d0 | |
| parent | 4aac9e4e637fbc28499c4f7d917fc14177d682d7 (diff) | |
| download | ocaml-b3b3cd32f606acd8cff57f69bab9ca0cb1718fbe.tar.gz | |
Code aesthetics: do not confuse labels and regular idents.
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@16419 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
| -rw-r--r-- | stdlib/weak.ml | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/weak.ml b/stdlib/weak.ml index 8166142b66..71385c9b77 100644 --- a/stdlib/weak.ml +++ b/stdlib/weak.ml @@ -15,15 +15,15 @@ type 'a t;; -external create: int -> 'a t = "caml_weak_create";; +external create : int -> 'a t = "caml_weak_create";; let length x = Obj.size(Obj.repr x) - 1;; external set : 'a t -> int -> 'a option -> unit = "caml_weak_set";; -external get: 'a t -> int -> 'a option = "caml_weak_get";; -external get_copy: 'a t -> int -> 'a option = "caml_weak_get_copy";; -external check: 'a t -> int -> bool = "caml_weak_check";; -external blit: 'a t -> int -> 'a t -> int -> int -> unit = "caml_weak_blit";; +external get : 'a t -> int -> 'a option = "caml_weak_get";; +external get_copy : 'a t -> int -> 'a option = "caml_weak_get_copy";; +external check : 'a t -> int -> bool = "caml_weak_check";; +external blit : 'a t -> int -> 'a t -> int -> int -> unit = "caml_weak_blit";; (* blit: src srcoff dst dstoff len *) let fill ar ofs len x = |