[teklib-general] teklib: TTimeRequest structure changed; Exec: Removed GetDate(),...

Timm S. Mueller tmueller at neoscientists.org
Wed Jan 14 13:36:43 CET 2009


details:   http://hg.teklib.org/teklib/rev/a736506373dd
changeset: 225:a736506373dd
user:      Timm S. Mueller <tmueller at neoscientists.org>
date:      Tue Jan 13 16:00:36 2009 +0100
description:
TTimeRequest structure changed; Exec: Removed GetDate(), replaced by
GetLocalDate() and GetUniversalDate(); some cleanup

diffs (truncated from 1058 to 100 lines):

diff -r 722160b5ac43 -r a736506373dd src/date/tests/datetest.c
--- a/src/date/tests/datetest.c	Mon Jan 12 17:26:32 2009 +0100
+++ b/src/date/tests/datetest.c	Tue Jan 13 16:00:36 2009 +0100
@@ -10,8 +10,8 @@
 
 #include <stdio.h>
 #include <tek/debug.h>
-#include <tek/proto/exec.h>
-#include <tek/proto/util.h>
+#include <tek/inline/exec.h>
+#include <tek/inline/util.h>
 #include <tek/proto/astro.h>
 
 struct TExecBase *TExecBase;
@@ -54,9 +54,9 @@
 	struct TDateBox db;
 
 	TAstroMakeDate(TAstroBase, &td, 24,10,1648, TNULL);
-	TUtilUnpackDate(TUtilBase, &td, &db, TDB_DAY|TDB_MONTH|TDB_YEAR);
-	TUtilPackDate(TUtilBase, &db, &td);
-	TUtilUnpackDate(TUtilBase, &td, &db, TDB_DAY|TDB_MONTH|TDB_YEAR);
+	TUnpackDate(&td, &db, TDB_DAY|TDB_MONTH|TDB_YEAR);
+	TPackDate(&db, &td);
+	TUnpackDate(&td, &db, TDB_DAY|TDB_MONTH|TDB_YEAR);
 
 	if (db.tdb_Day == 24 &&
 		db.tdb_Month == 10 &&
@@ -80,13 +80,13 @@
 
 	TAstroMakeDate(TAstroBase, &d1, 24,10,1648, TNULL);
 	TAstroMakeDate(TAstroBase, &d2, 1,1,1978, TNULL);
-	nd = TExecDiffDate(TExecBase, &d2, &d1, TNULL);
+	nd = TDiffDate(&d2, &d1, TNULL);
 
 	printf("Diff between 24.10.1648 and 1.1.1978: %d days\n", nd);
 
 	TAstroMakeDate(TAstroBase, &d1, 1,1,1601, TNULL);
 	TAstroMakeDate(TAstroBase, &d2, 1,1,1970, TNULL);
-	nd = TExecDiffDate(TExecBase, &d2, &d1, TNULL);
+	nd = TDiffDate(&d2, &d1, TNULL);
 
 	printf("Diff between 1.1.1601 and 1.1.1970: %d days\n", nd);
 
@@ -102,8 +102,8 @@
 	struct TDateBox db;
 
 	TAstroMakeDate(TAstroBase, &td, 11,7,1991, TNULL);
-	TExecAddDate(TExecBase, &td, 10000, TNULL);
-	TUtilUnpackDate(TUtilBase, &td, &db, TDB_DAY|TDB_MONTH|TDB_YEAR);
+	TAddDate(&td, 10000, TNULL);
+	TUnpackDate(&td, &db, TDB_DAY|TDB_MONTH|TDB_YEAR);
 
 	printf("11.7.1991 + 10000 Days = %d.%d.%d\n",
 		db.tdb_Day, db.tdb_Month, db.tdb_Year);
@@ -118,12 +118,12 @@
 
 	/* method 1 */
 	TAstroMakeDate(TAstroBase, &td, 12,6,1971, TNULL);
-	TUtilUnpackDate(TUtilBase, &td, &db, TDB_WDAY);
+	TUnpackDate(&td, &db, TDB_WDAY);
 	printf("The 12.6.1971 is a %s\n", DayNames[db.tdb_WDay]);
 
 	/* method 2 */
 	printf("The 12.1.1973 is a %s\n",
-		DayNames[TUtilGetWeekDay(TUtilBase, 12,1,1973)]);
+		DayNames[TGetWeekDay(12,1,1973)]);
 }
 
 /*****************************************************************************/
@@ -135,12 +135,12 @@
 
 	/* method 1 */
 	TAstroMakeDate(TAstroBase, &td, 6,3,2002, TNULL);
-	TUtilUnpackDate(TUtilBase, &td, &db, TDB_YDAY);
+	TUnpackDate(&td, &db, TDB_YDAY);
 	printf("The 6.3. is day number %d in 2002\n", db.tdb_YDay);
 
 	/* method 2 */
 	printf("The 16.11. is day number %d in 2003\n",
-		TUtilDMYToYDay(TUtilBase, 16,11,2003));
+		TDMYToYDay(16,11,2003));
 }
 
 /*****************************************************************************/
@@ -153,12 +153,12 @@
 
 	/* method 1 */
 	TAstroMakeDate(TAstroBase, &td, 1,1,1988, TNULL);
-	TExecAddDate(TExecBase, &td, 114, TNULL);
-	TUtilUnpackDate(TUtilBase, &td, &db, TDB_DAY|TDB_MONTH);
+	TAddDate(&td, 114, TNULL);
+	TUnpackDate(&td, &db, TDB_DAY|TDB_MONTH);
 	printf("Day number 115 in 1988 is the %d.%d.\n", db.tdb_Day, db.tdb_Month);
 
 	/* method 2 */
-	TUtilYDayToDM(TUtilBase, 115, 1900, &d, &m);
+	TYDayToDM(115, 1900, &d, &m);
 	printf("Day number 115 in 1900 is the %d.%d.\n", d, m);
 }
 


More information about the teklib-general mailing list