diff options
| author | Damien Doligez <damien.doligez-inria.fr> | 2012-02-10 16:15:24 +0000 |
|---|---|---|
| committer | Damien Doligez <damien.doligez-inria.fr> | 2012-02-10 16:15:24 +0000 |
| commit | e7f5b858c2aee1fc6caeefc3d7c80ca696be2897 (patch) | |
| tree | f6e4f76927ce2a4f604fcc0596f1b6505cc39fe3 /otherlibs/systhreads/st_stubs.c | |
| parent | d7cbf2a01a390f2fe6bedef1292bb5aa55d8b6f7 (diff) | |
| download | ocaml-e7f5b858c2aee1fc6caeefc3d7c80ca696be2897.tar.gz | |
More renaming to OCaml
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@12149 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'otherlibs/systhreads/st_stubs.c')
| -rw-r--r-- | otherlibs/systhreads/st_stubs.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/otherlibs/systhreads/st_stubs.c b/otherlibs/systhreads/st_stubs.c index 747549ee83..ba10205eb1 100644 --- a/otherlibs/systhreads/st_stubs.c +++ b/otherlibs/systhreads/st_stubs.c @@ -94,7 +94,7 @@ static caml_thread_t all_threads = NULL; /* The descriptor for the currently executing thread */ static caml_thread_t curr_thread = NULL; -/* The master lock protecting the Caml runtime system */ +/* The master lock protecting the OCaml runtime system */ static st_masterlock caml_master_lock; /* Whether the ``tick'' thread is already running */ @@ -344,7 +344,7 @@ static value caml_thread_new_descriptor(value clos) static void caml_thread_remove_info(caml_thread_t th) { - if (th->next == th) all_threads = NULL; /* last Caml thread exiting */ + if (th->next == th) all_threads = NULL; /* last OCaml thread exiting */ th->next->prev = th->prev; th->prev->next = th->next; #ifndef NATIVE_CODE @@ -646,7 +646,7 @@ CAMLprim value caml_thread_exit(value unit) /* ML */ #endif caml_thread_stop(); if (exit_buf != NULL) { - /* Native-code and (main thread or thread created by Caml) */ + /* Native-code and (main thread or thread created by OCaml) */ siglongjmp(exit_buf->buf, 1); } else { /* Bytecode, or thread created from C */ |