Another good solution! Thanks for the help from Sweden; it makes me proud to
drive a Volvo (I really do).

Best,

--Ralph

> -----Original Message-----
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
> Sent: Thursday, October 28, 1999 5:54 PM
> To: [EMAIL PROTECTED]
> Subject: [REBOL] epoch? Re:
>
>
>
>
> On Thu, 28 Oct 1999 [EMAIL PROTECTED] wrote:
>
> >
> > In Perl <*shudder*> and Unix, you can use the number of seconds from the
> > Epoch (January 1, 1970) in programs. How can I do this in
> Rebol; i.e. get
> > the number of seconds from the Epoch?
> >
> > --Ralph
> >
>
>
> Well, here's a rather ugly piece of code that should take care of it.
> I think. I'm using it in my IRC client. Maybe the date datatype has a
> /path that does this, I don't know.
>
> date-to-integer: func [
>   date
>   /local
>   the-date
>   the-time
> ][
>   the-time: date/time
>   the-date: make date! reduce [
>     date/year date/month date/day
>   ]
>   (the-date - 1970-1-1) * 86400 +
>   (the-time/hour * 3600) +
>   (the-time/minute * 60) + the-time/second
> ]
>
> /Martin Johannesson, [EMAIL PROTECTED]
>

Reply via email to