From 98bd78e7f08bb09b40acabff2afaf057d9dca637 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sat, 25 Jul 2015 20:56:09 -0600 Subject: [PATCH] remove unused counter --- racket/src/racket/include/schthread.h | 2 -- racket/src/racket/src/compenv.c | 1 - 2 files changed, 3 deletions(-) diff --git a/racket/src/racket/include/schthread.h b/racket/src/racket/include/schthread.h index 8db6702332..e60de86483 100644 --- a/racket/src/racket/include/schthread.h +++ b/racket/src/racket/include/schthread.h @@ -290,7 +290,6 @@ typedef struct Thread_Local_Variables { struct Scheme_Logger *scheme_future_logger_; struct Scheme_Logger *scheme_place_logger_; int intdef_counter_; - int env_uid_counter_; int scheme_overflow_count_; struct Scheme_Object *original_pwd_; void *file_path_wc_buffer_; @@ -683,7 +682,6 @@ XFORM_GC_VARIABLE_STACK_THROUGH_THREAD_LOCAL; #define scheme_future_logger XOA (scheme_get_thread_local_variables()->scheme_future_logger_) #define scheme_place_logger XOA (scheme_get_thread_local_variables()->scheme_place_logger_) #define intdef_counter XOA (scheme_get_thread_local_variables()->intdef_counter_) -#define env_uid_counter XOA (scheme_get_thread_local_variables()->env_uid_counter_) #define scheme_overflow_count XOA (scheme_get_thread_local_variables()->scheme_overflow_count_) #define original_pwd XOA (scheme_get_thread_local_variables()->original_pwd_) #define file_path_wc_buffer XOA (scheme_get_thread_local_variables()->file_path_wc_buffer_) diff --git a/racket/src/racket/src/compenv.c b/racket/src/racket/src/compenv.c index 93e52d4da5..5f7de25852 100644 --- a/racket/src/racket/src/compenv.c +++ b/racket/src/racket/src/compenv.c @@ -38,7 +38,6 @@ READ_ONLY static Scheme_Object *toplevels[MAX_CONST_TOPLEVEL_DEPTH][MAX_CONST_TO /* If locked, these are probably sharable: */ THREAD_LOCAL_DECL(static Scheme_Hash_Table *toplevels_ht); THREAD_LOCAL_DECL(static Scheme_Hash_Table *locals_ht[2]); -THREAD_LOCAL_DECL(static int env_uid_counter); #define ARBITRARY_USE 0x1 #define CONSTRAINED_USE 0x2