On Mon, Jan 30, 2006 at 03:19:33AM -0800, Gisle Aas wrote:
> Tim Bunce <[EMAIL PROTECTED]> writes:
>
> > I agree. Any chance yould you patch lib/DBI/DBD.pm to add in a section
> > describing what driver authors need to do?
>
> It's on my list of things to get done. I hope to provide a patch this
> week.
Great.
> BTW, Jan Dubois found that this patch was also needed for for DBI to
> compile with ActivePerl on Windows after we enabled PERL_NO_GET_CONTEXT.
Thanks. Applied.
Tim.
> Change 245616 by [EMAIL PROTECTED] on 2006/01/27 16:17:42
>
> Under PERL_IMPLICIT_SYS the gettimeofday() function is provided
> by the host environment via Perl_IProc.
>
> Differences ...
>
> Index: DBI.xs
> --- DBI.xs.~1~ Mon Jan 30 03:17:08 2006
> +++ DBI.xs Mon Jan 30 03:17:08 2006
> @@ -2164,6 +2164,9 @@
> static double
> dbi_time() {
> # ifdef HAS_GETTIMEOFDAY
> +# ifdef PERL_IMPLICIT_SYS
> + dTHX;
> +# endif
> struct timeval when;
> gettimeofday(&when, (struct timezone *) 0);
> return when.tv_sec + (when.tv_usec / 1000000.0);
> End of Patch.
