diff options
| author | Damien Doligez <damien.doligez-inria.fr> | 2000-01-07 15:59:23 +0000 |
|---|---|---|
| committer | Damien Doligez <damien.doligez-inria.fr> | 2000-01-07 15:59:23 +0000 |
| commit | 84ef723314db8167e546dfbac7e4c259d885527a (patch) | |
| tree | 8d38dfaaae790171008491bbf0630e15833bca9d | |
| parent | ec1c205be6942fbaca136bf64a60aa887a8bab24 (diff) | |
MAJ pour process_event
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@2738 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
| -rw-r--r-- | byterun/interp.a | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/byterun/interp.a b/byterun/interp.a index 7af0d4b60..0c26696eb 100644 --- a/byterun/interp.a +++ b/byterun/interp.a @@ -45,7 +45,7 @@ Val_true equ 3 import (realloc_stack): code import (something_to_do, force_major_slice, pending_signal): data import (signal_handlers, rotatecursor_flag): data - import (execute_signal): code + import (process_event): code import (rotatecursor_action): code import (cprim): data import (raise_zero_divide, fatal_error_arg): code @@ -1012,7 +1012,7 @@ i_92: ; CHECK_SIGNALS BNE.S process_signals Next process_signals: - ASL.L extra_args_ ; begin Setup_for_event + ASL.L #1, extra_args_ ; begin Setup_for_event ADDQ.L #1, extra_args_ MOVE.L extra_args_, -(sp_) MOVE.L env_, -(sp_) |