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

Eliminate unused variable compiler warnings

Browse Source
This commit is contained in:
Kevin Tew 2012-08-13 11:20:05 -06:00
parent 1b18499c69
commit ebf738e501
2 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/racket/src/future.c
View File

@ -966,9 +966,7 @@ static Scheme_Object *reset_future_logs_for_tracking(int argc, Scheme_Object **a
Scheme_Future_State *fs; Scheme_Future_State *fs;
Scheme_Future_Thread_State *fts; Scheme_Future_Thread_State *fts;
Scheme_Future_Thread_State *rt_fts; Scheme_Future_Thread_State *rt_fts;
Scheme_Logger *logger;
logger = scheme_main_logger;
fs = scheme_future_state; fs = scheme_future_state;
rt_fts = scheme_future_thread_state; rt_fts = scheme_future_thread_state;
if (fs) { if (fs) {

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

@ -2712,7 +2712,7 @@ static int complete_peeked_read_via_get(Scheme_Input_Port *ip,
/* We used to return `did', but since an event has already been /* We used to return `did', but since an event has already been
selected, claim success at this point always. */ selected, claim success at this point always. */
return 1; return 1 || did;
} }
static Scheme_Object *return_data(void *data, int argc, Scheme_Object **argv) static Scheme_Object *return_data(void *data, int argc, Scheme_Object **argv)