msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

fix the compilation on Windows again

Browse Source
This commit is contained in:
krangelov
2021-11-15 13:39:47 +01:00
parent c1690ffa77
commit e0b93a37e2
1 changed files with 5 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/runtime/c/pgf/db.cxx
View File

@@ -22,9 +22,6 @@ size_t getpagesize()
} }
#define ftruncate _chsize #define ftruncate _chsize
typedef DWORD pid_t;
#define getpid GetCurrentProcessId #define getpid GetCurrentProcessId
static static
@@ -291,7 +288,11 @@ typedef struct mchunk mbin;
static char slovo[5] = {'S','L','O','V','O'}; static char slovo[5] = {'S','L','O','V','O'};
typedef struct { typedef struct {
#ifndef _WIN32
pid_t pid; pid_t pid;
#else
DWORD pid;
#endif
object next; object next;
} process_entry; } process_entry;
@@ -609,7 +610,7 @@ void PgfDB::register_process(bool *is_first)
PGF_INTERNAL PGF_INTERNAL
void PgfDB::unregister_process() void PgfDB::unregister_process()
{ {
pid_t pid = getpid(); auto pid = getpid();
process_entry *pentry = &ms->p; process_entry *pentry = &ms->p;
object *plast = NULL; object *plast = NULL;