Ripping out GNU time stuff from posixunix.scm added by sjamaan on Sun Feb 5 16:03:15 2012
diff --git a/posixunix.scm b/posixunix.scm index 9b23846..e6d5b9d 100644 --- a/posixunix.scm +++ b/posixunix.scm @@ -379,8 +379,6 @@ static time_t C_timegm(struct tm *t) #define C_tm_get_08(v) cpy_tmstc08_to_tmvec( (v), &C_tm ) #define C_tm_get_9(v) cpy_tmstc9_to_tmvec( (v), &C_tm ) -#if !defined(C_GNU_ENV) || defined(__CYGWIN__) || defined(__uClinux__) - static struct tm * C_tm_set( C_word v ) { @@ -395,26 +393,6 @@ C_tm_get( C_word v ) return v; } -#else - -static struct tm * -C_tm_set( C_word v ) -{ - C_tm_set_08( v ); - C_tm_set_9( v ); - return &C_tm; -} - -static C_word -C_tm_get( C_word v ) -{ - C_tm_get_08( v ); - C_tm_get_9( v ); - return v; -} - -#endif - #define C_asctime(v) (asctime(C_tm_set(v))) #define C_a_mktime(ptr, c, v) C_flonum(ptr, mktime(C_tm_set(v))) #define C_a_timegm(ptr, c, v) C_flonum(ptr, C_timegm(C_tm_set(v)))