/[gcl]/gcl/o/unixtime.c
ViewVC logotype

Diff of /gcl/o/unixtime.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.19 by camm, Sun Sep 14 02:43:08 2003 UTC revision 1.20 by camm, Thu Nov 6 16:08:12 2003 UTC
# Line 60  int usleep ( unsigned int microseconds ) Line 60  int usleep ( unsigned int microseconds )
60    
61  #  endif  #  endif
62    
63  static void siLget_system_time_zone(void);  static void FFN(siLget_system_time_zone)(void);
64    
65  #endif /* __MINGW32__ or  !defined NO_SYSTEM_TIME_ZONE */  #endif /* __MINGW32__ or  !defined NO_SYSTEM_TIME_ZONE */
66    
# Line 128  DEFUN_NEW("GET-UNIVERSAL-TIME",object,fL Line 128  DEFUN_NEW("GET-UNIVERSAL-TIME",object,fL
128          RETURN1(unix_time_to_universal_time(time(0)));          RETURN1(unix_time_to_universal_time(time(0)));
129  }  }
130    
131  void  LFD(Lsleep)(void)
 Lsleep(void)  
132  {  {
133          object z;          object z;
134                    
# Line 154  Lsleep(void) Line 153  Lsleep(void)
153          vs_push(Cnil);          vs_push(Cnil);
154  }  }
155    
156  void  LFD(Lget_internal_run_time)(void)
 Lget_internal_run_time(void)  
157  {  {
158    
159  #ifdef USE_INTERNAL_REAL_TIME_FOR_RUNTIME  #ifdef USE_INTERNAL_REAL_TIME_FOR_RUNTIME
# Line 274  int system_time_zone_helper(void){ Line 272  int system_time_zone_helper(void){
272  #if defined __MINGW32__ || !defined NO_SYSTEM_TIME_ZONE  #if defined __MINGW32__ || !defined NO_SYSTEM_TIME_ZONE
273    
274  static void  static void
275  siLget_system_time_zone(void)  FFN(siLget_system_time_zone)(void)
276  {  {
277    check_arg(0);    check_arg(0);
278    vs_push ( make_fixnum ( system_time_zone_helper() ) );    vs_push ( make_fixnum ( system_time_zone_helper() ) );

Legend:
Removed from v.1.19  
changed lines
  Added in v.1.20

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26