reactos/lib/kjs/micros/os2.c

   1 /*
   2  * OS/2 specific functions.
   3  * Copyright (c) 1998 New Generation Software (NGS) Oy
   4  *
   5  * Author: Markku Rossi <mtr@ngs.fi>
   6  */
   7
   8 /*
   9  * This library is free software; you can redistribute it and/or
  10  * modify it under the terms of the GNU Library General Public
  11  * License as published by the Free Software Foundation; either
  12  * version 2 of the License, or (at your option) any later version.
  13  *
  14  * This library is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17  * Library General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU Library General Public
  20  * License along with this library; if not, write to the Free
  21  * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  22  * MA 02111-1307, USA
  23  */
  24
  25 /*
  26  * $Source: /cygdrive/c/RCVS/CVS/ReactOS/reactos/lib/kjs/micros/os2.c,v $
  27  * $Id$
  28  */
  29
  30 #include "jsint.h"
  31
  32 #include <os2.h>
  33
  34 /*
  35  * Global functions.
  36  */
  37
  38 unsigned int
  39 sleep (unsigned int seconds)
  40 {
  41 #if 0
  42   DosSleep ((ULONG) seconds * 1000);
  43 #endif
  44   /* XXX Should count how many seconcs we actually slept and return it. */
  45   return 0;
  46 }
  47
  48 int
  49 usleep (unsigned int useconds)
  50 {
  51 #if 0
  52   DosSleep ((ULONG) useconds / 1000);
  53 #endif
  54   return 0;
  55 }