quinn-os/my-basic
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

*added ticks for bcb compiling.

Browse Source
This commit is contained in:
Wang Renxin 2017-01-10 19:41:36 +08:00
parent 0e497f0b07
commit 6119ca5061
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
shell/main.c
View File

@ -38,6 +38,9 @@
#elif !defined MB_CP_BORLANDC && !defined MB_CP_TCC #elif !defined MB_CP_BORLANDC && !defined MB_CP_TCC
# include <unistd.h> # include <unistd.h>
#endif /* MB_CP_VC */ #endif /* MB_CP_VC */
#ifdef MB_CP_BORLANDC
# include <Windows.h>
#endif /* MB_CP_BORLANDC */
#ifndef MB_CP_VC #ifndef MB_CP_VC
# include <stdint.h> # include <stdint.h>
#endif /* MB_CP_VC */ #endif /* MB_CP_VC */
@ -1230,7 +1233,7 @@ static bool_t _process_parameters(int argc, char* argv[]) {
#endif /* MB_OS_WIN */ #endif /* MB_OS_WIN */
#define _HAS_TICKS #define _HAS_TICKS
#if defined MB_CP_VC #if defined MB_CP_VC || defined MB_CP_BORLANDC
static int_t _ticks(void) { static int_t _ticks(void) {
LARGE_INTEGER li; LARGE_INTEGER li;
double freq = 0.0; double freq = 0.0;
@ -1266,9 +1269,9 @@ static int_t _ticks(void) {
return (int_t)(ts.tv_sec * 1000 + ts.tv_nsec / 1000000); return (int_t)(ts.tv_sec * 1000 + ts.tv_nsec / 1000000);
} }
#else /* MB_CP_VC */ #else /* MB_CP_VC || MB_CP_BORLANDC */
# undef _HAS_TICKS # undef _HAS_TICKS
#endif /* MB_CP_VC */ #endif /* MB_CP_VC || MB_CP_BORLANDC */
#ifdef _HAS_TICKS #ifdef _HAS_TICKS
static int ticks(struct mb_interpreter_t* s, void** l) { static int ticks(struct mb_interpreter_t* s, void** l) {