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

Avoid compiler warnings

Browse Source
This commit is contained in:
Gustavo Massaccesi 2016-01-25 19:36:42 -03:00
parent 2fb1d4f45d
commit 65eaff3a03
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
racket/src/racket/src/fun.c
View File

@ -1222,7 +1222,7 @@ void scheme_set_dynamic_state(Scheme_Dynamic_State *state, Scheme_Comp_Env *env,
state->menv = menv;
}
static void *apply_again_k()
static void *apply_again_k(void)
{
Scheme_Thread *p = scheme_current_thread;
Scheme_Object *val = p->ku.k.p1;
@ -9697,7 +9697,6 @@ double scheme_get_inexact_milliseconds(void)
/* this function can be called from any OS thread */
{
#ifdef USE_WIN32_TIME
FILETIME ft;
mzlonglong v;
v = get_hectonanoseconds_as_longlong();
return (double)(v / 10000) + (((double)(v % 10000)) / 10000.0);