Changeset 7947


Ignore:
Timestamp:
Dec 26, 2007, 7:57:31 AM (12 years ago)
Author:
gb
Message:

INTERNAL-TIME-UNITS-PER-SECOND is 1000000 on 64-bit machines.
(Can probably do this on 32-bit machines as well.)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/working-0711/ccl/level-1/l1-init.lisp

    r6191 r7947  
    122122
    123123
    124 (defconstant internal-time-units-per-second 1000
     124(defconstant internal-time-units-per-second #+64-bit-target 1000000 #-64-bit-target 1000
    125125  "The number of internal time units that fit into a second. See
    126126  GET-INTERNAL-REAL-TIME and GET-INTERNAL-RUN-TIME.")
Note: See TracChangeset for help on using the changeset viewer.