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 /asmrun/signals_asm.c | |
parent | d7cbf2a01a390f2fe6bedef1292bb5aa55d8b6f7 (diff) |
More renaming to OCaml
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@12149 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'asmrun/signals_asm.c')
-rw-r--r-- | asmrun/signals_asm.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/asmrun/signals_asm.c b/asmrun/signals_asm.c index 556bd945b..09bc8abc1 100644 --- a/asmrun/signals_asm.c +++ b/asmrun/signals_asm.c @@ -53,7 +53,7 @@ extern char * caml_code_area_start, * caml_code_area_end; || (Classify_addr(pc) & In_code_area) ) /* This routine is the common entry point for garbage collection - and signal handling. It can trigger a callback to Caml code. + and signal handling. It can trigger a callback to OCaml code. With system threads, this callback can cause a context switch. Hence [caml_garbage_collection] must not be called from regular C code (e.g. the [caml_alloc] function) because the context of the call @@ -83,7 +83,7 @@ DECLARE_SIGNAL_HANDLER(handle_signal) caml_record_signal(sig); /* Some ports cache [caml_young_limit] in a register. Use the signal context to modify that register too, but only if - we are inside Caml code (not inside C code). */ + we are inside OCaml code (not inside C code). */ #if defined(CONTEXT_PC) && defined(CONTEXT_YOUNG_LIMIT) if (Is_in_code_area(CONTEXT_PC)) CONTEXT_YOUNG_LIMIT = (context_reg) caml_young_limit; @@ -193,7 +193,7 @@ DECLARE_SIGNAL_HANDLER(segv_handler) /* Sanity checks: - faulting address is word-aligned - faulting address is within the stack - - we are in Caml code */ + - we are in OCaml code */ fault_addr = CONTEXT_FAULTING_ADDRESS; if (((uintnat) fault_addr & (sizeof(intnat) - 1)) == 0 && getrlimit(RLIMIT_STACK, &limit) == 0 |