diff options
| author | Damien Doligez <damien.doligez-inria.fr> | 1996-11-02 18:00:46 +0000 |
|---|---|---|
| committer | Damien Doligez <damien.doligez-inria.fr> | 1996-11-02 18:00:46 +0000 |
| commit | 312cfbddfd988fb1b74299ff90e19b1b6ef30043 (patch) | |
| tree | 54250fbbfc3056c052edb0c680a6171c2f690beb /byterun/rotatecursor.h | |
| parent | 1aaf9a118aef383c39ff7424ae8814c836bda771 (diff) | |
| download | ocaml-312cfbddfd988fb1b74299ff90e19b1b6ef30043.tar.gz | |
Portage Mac/MPW:
Makefile: clean: eviter d'effacer interp.a
config.h: #include pour Mac
fix_code.c: version sans switch
interp.c: ajout action periodique, suppression de quelques ++ inutiles
main.c: initialisation action periodique
major_gc.c: return 0 pour calmer le compilo C
misc.c: ui_gc_message et ui_fatal_error -> ui_print_stderr
signals.h: include "mlvalues.h"
startup.c: donne la chaine pour uncaught exception Failure
sys.c: diverses modifs Mac
terminfo.c: return Val_unit pour calmer le compilo C
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@1134 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'byterun/rotatecursor.h')
| -rw-r--r-- | byterun/rotatecursor.h | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/byterun/rotatecursor.h b/byterun/rotatecursor.h new file mode 100644 index 0000000000..11230d23e2 --- /dev/null +++ b/byterun/rotatecursor.h @@ -0,0 +1,29 @@ +/***********************************************************************/ +/* */ +/* Objective Caml */ +/* */ +/* Damien Doligez, projet Para, INRIA Rocquencourt */ +/* */ +/* Copyright 1996 Institut National de Recherche en Informatique et */ +/* Automatique. Distributed only by permission. */ +/* */ +/***********************************************************************/ + +/* $Id$ */ + +/* Cursor rotation for MPW tools (ocamlrun and ocamlyacc) */ + +#ifndef _rotatecursor_ +#define _rotatecursor_ + +/* [*p1] and [*p2] will be set to 1 when the time comes to call + [ui_periodic_action]. If p1 or p2 is not used, pass it as NULL. +*/ +void rotatecursor_init (int volatile *p1, int volatile *p2); + +/* [direction] is 1 to rotate the cursor clockwise, 0 to rotate + counterclockwise. This function always returns 0. + */ +int rotatecursor_action (int direction); + +#endif /* _rotatecursor_ */ |