<html>
<head>
<meta content="text/html; charset=ISO-8859-1"
http-equiv="Content-Type">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<br>
<div class="moz-cite-prefix">I didn't write the app that does the
differencing. It expects a float in seconds from the using
program, so that means floating this:<br>
<br>
<tt>(/ (get-internal-real-time)(internal-time-units-per-second))<br>
<br>
</tt><br>
In ACL <tt>(get-internal-real-time) </tt>is several orders of
magnitude smaller than what ABCL returns...<br>
</div>
<blockquote cite="mid:87egz5sysx.fsf@gmail.com" type="cite">
<pre wrap="">bonasso <a class="moz-txt-link-rfc2396E" href="mailto:bonasso@traclabs.com"><bonasso@traclabs.com></a> writes:
</pre>
<blockquote type="cite">
<pre wrap="">I solved this by coercing
(get-internal-real-time)
into a double float.
Looks like the epoch start time for these functions is different from
lisp to lisp.
ACL: (get-internal-real-time) => 8456209511
ABCL: (get-internal-real-time) => 1401814359707
Does anyone know the date from which the value for
(get-internal-real-time) is computed for abcl?
</pre>
</blockquote>
<pre wrap="">Why do you need to coerce it to anything for intermediate values?
Store the value returned by (get-internal-real-time), then subtract it
from another (get-internal-real-time), only then divide it by
internal-time-units-per-second, and only then, if you need to, convert
that into floats, for printing or something. That way you will lose
minimal precision.
</pre>
</blockquote>
<br>
</body>
</html>