fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

See changelog 20000312-15:18 est

Browse Source
This commit is contained in:
Paul Tucker
2000-03-12 20:26:35 +00:00
parent 4d629b6ed1
commit 785b227f0d
1 changed files with 9 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
harbour/source/rtl/tone.c
View File

@@ -61,6 +61,10 @@
#include <pc.h>
#include <time.h>
#elif defined(_Windows)
#if defined(_MSC_VER)
#define HB_OS_WIN_32_USED
#include "hbdefs.h"
#endif
#elif defined(__MINGW32__)
#include <stdlib.h>
#elif defined(__BORLANDC__)
@@ -155,6 +159,11 @@ void hb_tone( double dFrequency, double dDuration )
both parameters and either generates the default sound
event or the standard system beep. */
Beep( ( ULONG ) dFrequency, temp );
#elif defined(_Windows) && ! defined(__BORLANDC__)
/* Bad news for non-NT Windows platforms: Beep() ignores
both parameters and either generates the default sound
event or the standard system beep. */
Beep( ( ULONG ) dFrequency, temp );
#elif defined(__DJGPP__) || ( defined(__BORLANDC__) && ! defined(_Windows) ) || defined(__WATCOMC__)
/* Note: delay() in <dos.h> for DJGPP does not work and
delay() in <dos.h> for BORLANDC is not multi-