diff options
Diffstat (limited to 'stdlib/string.ml')
| -rw-r--r-- | stdlib/string.ml | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/string.ml b/stdlib/string.ml index 6f2495c7e..00b4b3d83 100644 --- a/stdlib/string.ml +++ b/stdlib/string.ml @@ -18,13 +18,13 @@ external length : string -> int = "%string_length" external get : string -> int -> char = "%string_safe_get" external set : string -> int -> char -> unit = "%string_safe_set" -external create : int -> string = "create_string" +external create : int -> string = "caml_create_string" external unsafe_get : string -> int -> char = "%string_unsafe_get" external unsafe_set : string -> int -> char -> unit = "%string_unsafe_set" external unsafe_blit : string -> int -> string -> int -> int -> unit - = "blit_string" "noalloc" + = "caml_blit_string" "noalloc" external unsafe_fill : string -> int -> int -> char -> unit - = "fill_string" "noalloc" + = "caml_fill_string" "noalloc" let make n c = let s = create n in @@ -78,7 +78,7 @@ let concat sep l = tl; r -external is_printable: char -> bool = "is_printable" +external is_printable: char -> bool = "caml_is_printable" external char_code: char -> int = "%identity" external char_chr: int -> char = "%identity" |