payloads/libpayload/curses/PDCurses-3.4/os2/pdcutil.c

   1 /* Public Domain Curses */
   2
   3 #include "pdcos2.h"
   4
   5 RCSID("$Id: pdcutil.c,v 1.14 2008/07/14 04:24:51 wmcbrine Exp $")
   6
   7 #if defined(OS2) && !defined(__EMX__)
   8 APIRET APIENTRY DosSleep(ULONG ulTime);
   9 #endif
  10
  11 void PDC_beep(void)
  12 {
  13     PDC_LOG(("PDC_beep() - called\n"));
  14
  15 #ifdef EMXVIDEO
  16     putchar('\007');
  17 #else
  18     DosBeep(1380, 100);
  19 #endif
  20 }
  21
  22 void PDC_napms(int ms)
  23 {
  24     PDC_LOG(("PDC_napms() - called: ms=%d\n", ms));
  25
  26 #ifdef __EMX__
  27     _sleep2(ms);
  28 #else
  29     DosSleep(ms);
  30 #endif
  31 }
  32
  33 const char *PDC_sysname(void)
  34 {
  35     return "OS/2";
  36 }