suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

int -> intptr_t fixes

Browse Source
This commit is contained in:
Matthew Flatt 2011-12-21 09:00:48 -07:00 committed by Matthew Flatt
parent dcedd6e2be
commit 58b111485f
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/racket/src/port.c
View File

@ -3191,7 +3191,7 @@ static MZ_INLINE intptr_t get_one_byte(GC_CAN_IGNORE const char *who,
ip = (Scheme_Input_Port *)port;
if (!ip->slow) {
Scheme_Get_String_Fun gs;
int v;
intptr_t v;
gs = ip->get_string_fun;
@ -8695,7 +8695,7 @@ static void close_subprocess_handle(void *sp, void *ignored)
CloseHandle(subproc->handle);
}
static void CopyFileHandleForSubprocess(int *hs, int pos)
static void CopyFileHandleForSubprocess(intptr_t *hs, int pos)
{
HANDLE h2;
int alt_pos = (pos ? 0 : 1);
@ -8714,7 +8714,7 @@ static void CopyFileHandleForSubprocess(int *hs, int pos)
}
}
static void CloseFileHandleForSubprocess(int *hs, int pos)
static void CloseFileHandleForSubprocess(intptr_t *hs, int pos)
{
int alt_pos = (pos ? 0 : 1);
if (hs[alt_pos]) {