MacOS: ajout macosunix; portage bigarray et systhreads; tabs

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@3042 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02

1 files changed, 6 insertions, 6 deletions

diff --git a/otherlibs/unix/termios.c b/otherlibs/unix/termios.c
index 00138e029..9a8b58616 100644
--- a/otherlibs/unix/termios.c
+++ b/otherlibs/unix/termios.c
@@ -229,7 +229,7 @@ static void decode_terminal_status(value *src)
   }
 }
 
-value unix_tcgetattr(value fd)
+value unix_tcgetattr(value fd) /* ML */
 {
   value res;
 
@@ -244,7 +244,7 @@ static int when_flag_table[] = {
   TCSANOW, TCSADRAIN, TCSAFLUSH
 };
 
-value unix_tcsetattr(value fd, value when, value arg)
+value unix_tcsetattr(value fd, value when, value arg) /* ML */
 {
   if (tcgetattr(Int_val(fd), &terminal_status) == -1)
     uerror("tcsetattr", Nothing);
@@ -256,14 +256,14 @@ value unix_tcsetattr(value fd, value when, value arg)
   return Val_unit;
 }
 
-value unix_tcsendbreak(value fd, value delay)
+value unix_tcsendbreak(value fd, value delay) /* ML */
 {
   if (tcsendbreak(Int_val(fd), Int_val(delay)) == -1)
     uerror("tcsendbreak", Nothing);
   return Val_unit;
 }
 
-value unix_tcdrain(value fd)
+value unix_tcdrain(value fd) /* ML */
 {
   if (tcdrain(Int_val(fd)) == -1) uerror("tcdrain", Nothing);
   return Val_unit;
@@ -273,7 +273,7 @@ static int queue_flag_table[] = {
   TCIFLUSH, TCOFLUSH, TCIOFLUSH
 };
 
-value unix_tcflush(value fd, value queue)
+value unix_tcflush(value fd, value queue) /* ML */
 {
   if (tcflush(Int_val(fd), queue_flag_table[Int_val(queue)]) == -1)
     uerror("tcflush", Nothing);
@@ -284,7 +284,7 @@ static int action_flag_table[] = {
   TCOOFF, TCOON, TCIOFF, TCION
 };
 
-value unix_tcflow(value fd, value action)
+value unix_tcflow(value fd, value action) /* ML */
 {
   if (tcflow(Int_val(fd), action_flag_table[Int_val(action)]) == -1)
     uerror("tcflow", Nothing);