Changeset 13318 for branches/new-random


Ignore:
Timestamp:
Dec 22, 2009, 12:08:50 AM (10 years ago)
Author:
rme
Message:

Updated accessors for new random state object.

(temporarily x86-only)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/new-random/library/lispequ.lisp

    r13279 r13318  
    822822         ,@(mapcar #'numify cases)))))
    823823
     824#-x86-target
    824825(def-accessors (random-state) %svref
    825826  ()
    826827  random.seed-1
    827828  random.seed-2)
     829
     830#+x86-target
     831(def-accessors (random-state) %svref
     832  ()
     833  random.mrg31k3p-state)
    828834
    829835;;; IEEE-floating-point constants.
Note: See TracChangeset for help on using the changeset viewer.