[frontierkernel-commits] Frontier/Common/source shell.c,1.4.4.3,1.4.4.4 timedate.c,1.3.4.1,1.3.4.2

[David B. <dav...@us...>]

Update of /cvsroot/frontierkernel/Frontier/Common/source
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv30171

Modified Files:
      Tag: sidewinder-branch
	shell.c timedate.c 
Log Message:
minor touchups

Index: timedate.c
===================================================================
RCS file: /cvsroot/frontierkernel/Frontier/Common/source/timedate.c,v
retrieving revision 1.3.4.1
retrieving revision 1.3.4.2
diff -C2 -d -r1.3.4.1 -r1.3.4.2
*** timedate.c	17 Jan 2005 01:19:48 -0000	1.3.4.1
--- timedate.c	17 Jan 2005 02:23:44 -0000	1.3.4.2
***************
*** 122,125 ****
--- 122,127 ----
  	static tyinternationalinfo globalII;
  	static tyinternationalinfoptr globalIIptr = NULL;
+ 	
+ 	static LONGLONG gPerformanceFreq = 0;  /* for getmilliseconds() */
  #endif
  
***************
*** 1554,1567 ****
  
  extern long getmilliseconds(void) {
! 	LARGE_INTEGER counter, freq;
! 	LONGLONG freqLong;
  	
  	QueryPerformanceCounter (&counter);  /* counter hits since boot-up */
  	
! 	QueryPerformanceFrequency (&freq);   /* frequency of coutner hits (per second) */
! 	
! 	freqLong = ( freq.LowPart | ( freq.HighPart << 32 ) ) / 1000; /* per millisecond */
  	
! 	return ((long) ((counter.LowPart | (counter.HighPart << 32)) / freqLong));
  } /* getmilliseconds */
  
--- 1556,1570 ----
  
  extern long getmilliseconds(void) {
! 	LARGE_INTEGER counter;
  	
  	QueryPerformanceCounter (&counter);  /* counter hits since boot-up */
  	
! 	if (gPerformanceFreq == 0) {
! 		LARGE_INTEGER freq;
! 		QueryPerformanceFrequency (&freq);   /* frequency of coutner hits (per second) */
! 		gPerformanceFreq = freq.QuadPart / 1000;
! 	}
  	
! 	return ((long) (counter.QuadPart / gPerformanceFreq));
  } /* getmilliseconds */
  

Index: shell.c
===================================================================
RCS file: /cvsroot/frontierkernel/Frontier/Common/source/shell.c,v
retrieving revision 1.4.4.3
retrieving revision 1.4.4.4
diff -C2 -d -r1.4.4.3 -r1.4.4.4
*** shell.c	17 Jan 2005 01:19:32 -0000	1.4.4.3
--- shell.c	17 Jan 2005 02:23:44 -0000	1.4.4.4
***************
*** 1338,1345 ****
  	dllinitverbs (); /*2004-11-29 aradke: langdll.c*/
  	
- 	mathinitverbs (); /*2004-12-30 smd: langmath.c*/
- 	
- 	dllinitverbs (); /*2004-11-29 aradke: langdll.c*/
- 	
  	if (keyboardescape ()) /*check again before landinit; after this, must do shellquit*/
  		exittooperatingsystem ();
--- 1338,1341 ----