Changeset 6026


Ignore:
Timestamp:
Mar 12, 2007, 10:53:26 AM (13 years ago)
Author:
gb
Message:

*RANDOM-STATE* is thread-local.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/level-1/l1-aprims.lisp

    r6016 r6026  
    4343(def-standard-initial-binding *package*)
    4444(def-standard-initial-binding *gensym-counter* 0)
     45(def-standard-initial-binding *random-state* (initialize-random-state #xFBF1 9))
     46
    4547
    4648(defun %badarg (arg type)
Note: See TracChangeset for help on using the changeset viewer.