[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