/[cmucl]/src/code/rand-mt19937.lisp
ViewVC logotype

Log of /src/code/rand-mt19937.lisp

Parent Directory Parent Directory | Revision Log Revision Log


Links to HEAD: (view) (annotate)
Sticky Tag:

Revision 1.23 - (view) (annotate) - [select for diffs]
Tue Apr 20 17:57:45 2010 UTC (3 years, 11 months ago) by rtoy
Branch: MAIN
CVS Tags: GIT-CONVERSION, HEAD, RELEASE_20b, cross-sol-x86-2010-12-20, cross-sol-x86-base, cross-sol-x86-merged, cross-sparc-branch-base, release-20b-pre1, release-20b-pre2, snapshot-2010-05, snapshot-2010-06, snapshot-2010-07, snapshot-2010-08, snapshot-2010-11, snapshot-2010-12, snapshot-2011-01, snapshot-2011-02, snapshot-2011-03, snapshot-2011-04, snapshot-2011-06, snapshot-2011-07, snapshot-2011-09, sparc-tramp-assem-2010-07-19, sparc-tramp-assem-base
Branch point for: RELEASE-20B-BRANCH, cross-sol-x86-branch, cross-sparc-branch, sparc-tramp-assem-branch
Changes since 1.22: +3 -3 lines
Diff to previous 1.22
Change uses of _"foo" to (intl:gettext "foo").  This is because slime
may get confused with source locations if the reader macros are
installed.

Revision 1.22 - (view) (annotate) - [select for diffs]
Mon Apr 19 02:18:04 2010 UTC (3 years, 11 months ago) by rtoy
Branch: MAIN
Changes since 1.21: +4 -4 lines
Diff to previous 1.21
Remove _N"" reader macro from docstrings when possible.

Revision 1.21 - (view) (annotate) - [select for diffs]
Fri Mar 19 15:18:59 2010 UTC (4 years ago) by rtoy
Branch: MAIN
CVS Tags: post-merge-intl-branch, snapshot-2010-04
Changes since 1.20: +8 -6 lines
Diff to previous 1.20
Merge intl-branch 2010-03-18 to HEAD.  To build, you need to use
boot-2010-02-1 as the bootstrap file.  You should probably also use
the new -P option for build.sh to generate and update the po files
while building.

Revision 1.20.16.1 - (view) (annotate) - [select for diffs]
Thu Feb 25 20:34:51 2010 UTC (4 years, 1 month ago) by rtoy
Branch: intl-2-branch
Changes since 1.20: +8 -6 lines
Diff to previous 1.20 , to next main 1.23
Restart internalization work.  This new branch starts with code from
the intl-branch on date 2010-02-12 18:00:00+0500.  This version works
and

LANG=en@piglatin bin/lisp

works (once the piglatin translation is added).

Revision 1.20.14.2 - (view) (annotate) - [select for diffs]
Wed Feb 10 02:04:05 2010 UTC (4 years, 2 months ago) by rtoy
Branch: intl-branch
CVS Tags: intl-branch-2010-03-18-1300, intl-branch-working-2010-02-11-1000, intl-branch-working-2010-02-19-1000
Changes since 1.20.14.1: +6 -6 lines
Diff to previous 1.20.14.1 , to branch point 1.20 , to next main 1.23
Mark translatable strings; update cmucl.pot and ko/cmucl.po
accordingly.

Revision 1.20.14.1 - (view) (annotate) - [select for diffs]
Mon Feb 8 17:15:48 2010 UTC (4 years, 2 months ago) by rtoy
Branch: intl-branch
Changes since 1.20: +3 -1 lines
Diff to previous 1.20
Add (intl:textdomain "cmucl") to the files to set the textdomain.

Revision 1.15.4.1.2.2 - (view) (annotate) - [select for diffs]
Wed Mar 18 15:37:28 2009 UTC (5 years, 1 month ago) by rtoy
Branch: unicode-utf16-extfmt-branch
CVS Tags: unicode-snapshot-2009-05, unicode-snapshot-2009-06, unicode-utf16-extfmt-2009-03-27, unicode-utf16-extfmt-2009-06-11
Changes since 1.15.4.1.2.1: +1 -1 lines
Diff to previous 1.15.4.1.2.1 , to branch point 1.15.4.1 , to next main 1.15.4.3
Sync to utf16 branch, tag unicode-utf16-sync-label-2009-03-16.

Revision 1.15.4.3 - (view) (annotate) - [select for diffs]
Mon Mar 16 21:10:55 2009 UTC (5 years, 1 month ago) by rtoy
Branch: unicode-utf16-branch
CVS Tags: unicode-utf16-char-support-2009-03-25, unicode-utf16-char-support-2009-03-26, unicode-utf16-sync-label-2009-03-16
Changes since 1.15.4.2: +1 -1 lines
Diff to previous 1.15.4.2 , to branch point 1.15 , to next main 1.23
Sync to CVS HEAD, tag label-2009-03-16.

But don't sync Config.FreeBSD_gencgc, Config.x86_freebsd,
FreeBSD-os.c, and FreeBSD-os.h.  Let Alex sync those later.

The result seems to work as expected on Solaris and x86/linux.
Darwin (ppc or x86) untested.

Revision 1.20 - (view) (annotate) - [select for diffs]
Mon Jan 19 22:38:49 2009 UTC (5 years, 2 months ago) by rtoy
Branch: MAIN
CVS Tags: RELEASE_19f, RELEASE_20a, amd64-dd-start, intl-2-branch-base, intl-branch-base, label-2009-03-16, label-2009-03-25, merge-with-19f, merged-unicode-utf16-extfmt-2009-06-11, portable-clx-base, portable-clx-import-2009-06-16, pre-merge-intl-branch, release-19f-base, release-19f-pre1, release-20a-base, release-20a-pre1, snapshot-2009-02, snapshot-2009-04, snapshot-2009-05, snapshot-2009-07, snapshot-2009-08, snapshot-2009-11, snapshot-2009-12, snapshot-2010-01, snapshot-2010-02, snapshot-2010-03, unicode-string-buffer-base, unicode-string-buffer-impl-base
Branch point for: RELEASE-19F-BRANCH, RELEASE-20A-BRANCH, amd64-dd-branch, intl-2-branch, intl-branch, portable-clx-branch, unicode-string-buffer-branch, unicode-string-buffer-impl-branch
Changes since 1.19: +2 -2 lines
Diff to previous 1.19
Use a float for the bounds of a float type specifier.

Revision 1.15.4.1.2.1 - (view) (annotate) - [select for diffs]
Sun Nov 2 13:30:01 2008 UTC (5 years, 5 months ago) by rtoy
Branch: unicode-utf16-extfmt-branch
CVS Tags: unicode-utf16-extfmts-sync-2008-12
Changes since 1.15.4.1: +4 -4 lines
Diff to previous 1.15.4.1
Sync to snapshot 2008-11.  But we didn't sync code/extfmts.lisp or
iso8859-1.lisp and utf-8.lisp.  (I don't think we want those changes,
yet.)

Revision 1.15.4.2 - (view) (annotate) - [select for diffs]
Wed Sep 3 16:34:31 2008 UTC (5 years, 7 months ago) by rtoy
Branch: unicode-utf16-branch
CVS Tags: unicode-utf16-sync-2008-09, unicode-utf16-sync-2008-11, unicode-utf16-sync-2008-12
Changes since 1.15.4.1: +4 -4 lines
Diff to previous 1.15.4.1 , to branch point 1.15
Merge from snapshot-2008-09.

Revision 1.19 - (view) (annotate) - [select for diffs]
Tue Sep 2 13:38:03 2008 UTC (5 years, 7 months ago) by rtoy
Branch: MAIN
CVS Tags: merge-sse2-packed, snapshot-2008-09, snapshot-2008-10, snapshot-2008-11, snapshot-2008-12, snapshot-2009-01, sse2-base, sse2-checkpoint-2008-10-01, sse2-merge-with-2008-10, sse2-merge-with-2008-11, sse2-packed-2008-11-12, sse2-packed-base
Branch point for: sse2-branch, sse2-packed-branch
Changes since 1.18: +3 -3 lines
Diff to previous 1.18
o A seed of 0 should be ok in INT-INIT-RANDOM-STATE.
o Update link new initializer.

Revision 1.18 - (view) (annotate) - [select for diffs]
Sun Aug 31 13:07:06 2008 UTC (5 years, 7 months ago) by rtoy
Branch: MAIN
Changes since 1.17: +2 -2 lines
Diff to previous 1.17
Try to read 627 random words from /dev/urandom when initializing the
random number  state.  This should give better random numbers since we
initialize the state with 627 "truly" random values.  Previously, only
one word was used, which meant that the state vector really only had
32 bits of randomness.

Revision 1.15.4.1 - (view) (annotate) - [select for diffs]
Fri Jun 27 17:24:13 2008 UTC (5 years, 9 months ago) by rtoy
Branch: unicode-utf16-branch
CVS Tags: unicode-utf16-extfmts-pre-sync-2008-11, unicode-utf16-sync-2008-07
Branch point for: unicode-utf16-extfmt-branch
Changes since 1.15: +4 -3 lines
Diff to previous 1.15
Merge changes from snapshot-2008-07.

Revision 1.17 - (view) (annotate) - [select for diffs]
Thu Jun 26 21:00:24 2008 UTC (5 years, 9 months ago) by rtoy
Branch: MAIN
CVS Tags: snapshot-2008-07, snapshot-2008-08
Changes since 1.16: +3 -10 lines
Diff to previous 1.16
code/rand-mt19937.lisp:
o Recursively call RANDOM for the integer case to let the deftransform
  handle the case.

compiler/float-tran.lisp:
o Remove comment about modifying RANDOM to match the deftransform.
  We're automatically in sync now.

Revision 1.16 - (view) (annotate) - [select for diffs]
Tue Jun 24 17:27:51 2008 UTC (5 years, 9 months ago) by rtoy
Branch: MAIN
Changes since 1.15: +11 -3 lines
Diff to previous 1.15
compiler/float-tran.lisp:

  Fix bug in deftransform where the case for x86 and num-high >
  random-fixnum-max was never used.  We now always use the bignum
  multiply code for all platforms and use that for all cases for which
  the deftransform applies.

  Simplify the constant-continuation case too so we don't have to the
  check.  I think the bignum multiply version does not have the bias
  problem that rem has.

code/rand-mt19937.lisp:
  Change the RANDOM function to compute the same value as the
  deftransform would.

general-info/release-19f.txt:
  Update

Make a note that both the function and the deftransform should be
synchronized to match.  This change also changes the sequence of
numbers produced.

Revision 1.15 - (view) (annotate) - [select for diffs]
Thu Aug 2 18:18:19 2007 UTC (6 years, 8 months ago) by rtoy
Branch: MAIN
CVS Tags: pre-telent-clx, release-19e, release-19e-base, release-19e-pre1, release-19e-pre2, snapshot-2007-09, snapshot-2007-10, snapshot-2007-11, snapshot-2007-12, snapshot-2008-01, snapshot-2008-02, snapshot-2008-03, snapshot-2008-04, snapshot-2008-05, snapshot-2008-06, unicode-utf16-base, unicode-utf16-string-support
Branch point for: release-19e-branch, unicode-utf16-branch
Changes since 1.14: +2 -2 lines
Diff to previous 1.14
Add (INHIBIT-WARNINGS 3) to various bits of double-double float code.
I checked the notes and they all have to do with either boxing or
generic operations (usually from FLOOR).

This greatly reduces the amount of noise in the compilation logs.

Revision 1.14 - (view) (annotate) - [select for diffs]
Sat Jul 1 18:12:41 2006 UTC (7 years, 9 months ago) by rtoy
Branch: MAIN
CVS Tags: release-19d, release-19d-base, release-19d-pre1, release-19d-pre2, snapshot-2006-07, snapshot-2006-08, snapshot-2006-09, snapshot-2006-10, snapshot-2006-11, snapshot-2006-12, snapshot-2007-01, snapshot-2007-02, snapshot-2007-03, snapshot-2007-04, snapshot-2007-05, snapshot-2007-06, snapshot-2007-07, snapshot-2007-08
Branch point for: release-19d-branch
Changes since 1.13: +19 -1 lines
Diff to previous 1.13
Random double-double floats.

Revision 1.13 - (view) (annotate) - [select for diffs]
Wed Nov 12 22:49:53 2003 UTC (10 years, 5 months ago) by toy
Branch: MAIN
CVS Tags: amd64-merge-start, double-double-array-base, double-double-array-checkpoint, double-double-base, double-double-init-%make-sparc, double-double-init-checkpoint-1, double-double-init-ppc, double-double-init-sparc, double-double-init-sparc-2, double-double-init-x86, double-double-irrat-end, double-double-irrat-start, double-double-reader-base, double-double-reader-checkpoint-1, double-double-sparc-checkpoint-1, mod-arith-base, ppc_gencgc_snap_2005-05-14, ppc_gencgc_snap_2005-12-17, ppc_gencgc_snap_2006-01-06, prm-before-macosx-merge-tag, release-19a, release-19a-base, release-19a-pre1, release-19a-pre2, release-19a-pre3, release-19b-base, release-19b-pre1, release-19b-pre2, release-19c, release-19c-base, release-19c-pre1, snapshot-2003-12, snapshot-2004-04, snapshot-2004-05, snapshot-2004-06, snapshot-2004-07, snapshot-2004-08, snapshot-2004-09, snapshot-2004-10, snapshot-2004-11, snapshot-2004-12, snapshot-2005-01, snapshot-2005-02, snapshot-2005-03, snapshot-2005-04, snapshot-2005-05, snapshot-2005-06, snapshot-2005-07, snapshot-2005-08, snapshot-2005-09, snapshot-2005-10, snapshot-2005-11, snapshot-2005-12, snapshot-2006-01, snapshot-2006-02, snapshot-2006-03, snapshot-2006-04, snapshot-2006-05, snapshot-2006-06
Branch point for: double-double-array-branch, double-double-branch, double-double-reader-branch, mod-arith-branch, ppc_gencgc_branch, release-19a-branch, release-19b-branch, release-19c-branch
Changes since 1.12: +14 -12 lines
Diff to previous 1.12
If we can't open /dev/urandom and read the desired number of words,
silently revert to initializing to the random state from the current
time.

From Ole Rohne via cmucl-imp.  This works around a problem on one of
his machines where /dev/urandom isn't what we think it is.  We still
lose if /dev/urandom returns words that aren't random enough.  Oh
well.

Revision 1.12 - (view) (annotate) - [select for diffs]
Thu Sep 25 02:40:13 2003 UTC (10 years, 6 months ago) by toy
Branch: MAIN
CVS Tags: snapshot-2003-10, snapshot-2003-11
Changes since 1.11: +3 -1 lines
Diff to previous 1.11
Implmement Pierre Mai's idea of adding 2 macros for setting *FEATURES*
and *RUNTIME-FEATURES* and setting them appropriately as files are
loaded so that recompiling CMUCL produces a result with the same set
of features.  *RUNTIME-FEATURES* is a subset of *FEATURES* that is
written out to internals.h so the C code can be compiled
appropriately.

A simple bootstrap with boot17 is needed.

Revision 1.11 - (view) (annotate) - [select for diffs]
Thu Mar 6 09:31:06 2003 UTC (11 years, 1 month ago) by emarsden
Branch: MAIN
CVS Tags: cold-pcl-base, dynamic-extent-base, lisp-executable-base, release-18e, release-18e-base, release-18e-pre1, release-18e-pre2, remove_negative_zero_not_zero, sparc_gencgc, sparc_gencgc_merge
Branch point for: cold-pcl, dynamic-extent, lisp-executable, release-18e-branch, sparc_gencgc_branch
Changes since 1.10: +6 -5 lines
Diff to previous 1.10
Add a symbol instead of a closure to ext:*after-save-initializations*.
This is to avoid ending up with the same initializer present twice, and
also to give the initializer a clearer print-name.

Revision 1.10 - (view) (annotate) - [select for diffs]
Tue Feb 11 13:52:46 2003 UTC (11 years, 2 months ago) by toy
Branch: MAIN
Changes since 1.9: +143 -23 lines
Diff to previous 1.9
o Correct some deficiencies in INIT-RANDOM-STATE by using a new
  initializer given on the mt19937 website.
o Allow INIT-RANDOM-STATE to take either an integer or a vector to
  initialize the state of a random-state object
o Added GENERATE-SEED to generate a seed suitable for use by
  INIT-RANDOM-STATE.  Use /dev/urandom if available.  (Based on work
  by Eric Marsden).

Revision 1.6.2.2 - (view) (annotate) - [select for diffs]
Tue May 23 16:36:46 2000 UTC (13 years, 10 months ago) by pw
Branch: RELENG_18
CVS Tags: RELEASE_18c, RELEASE_18d
Changes since 1.6.2.1: +13 -10 lines
Diff to previous 1.6.2.1 , to branch point 1.6 , to next main 1.23
This set of revisions brings the RELENG_18 branch up to HEAD in preparation
for an 18c release.

Revision 1.9 - (view) (annotate) - [select for diffs]
Sat Aug 14 15:40:41 1999 UTC (14 years, 8 months ago) by dtc
Branch: MAIN
CVS Tags: LINKAGE_TABLE, PRE_LINKAGE_TABLE, UNICODE-BASE
Branch point for: UNICODE-BRANCH
Changes since 1.8: +6 -4 lines
Diff to previous 1.8
Initialise the random state index to mt19937-n to force the sequence
to start with numbers generated by the MT19937 algorithm rather than
the initial seed values; from Pierre R. Mai.

Revision 1.8 - (view) (annotate) - [select for diffs]
Wed Jan 20 12:01:38 1999 UTC (15 years, 2 months ago) by dtc
Branch: MAIN
Changes since 1.7: +3 -2 lines
Diff to previous 1.7
Declare random-chunk to be compiled with zero safety to avoid
unnecessary type checks; based on a patch from Raymond Toy.

Revision 1.7 - (view) (annotate) - [select for diffs]
Sat Dec 19 16:10:35 1998 UTC (15 years, 4 months ago) by dtc
Branch: MAIN
Changes since 1.6: +6 -6 lines
Diff to previous 1.6
Check that the argument to random is positive.
Based on patches from Peter Van Eynde.

Revision 1.6.2.1 - (view) (annotate) - [select for diffs]
Tue Jun 23 11:22:23 1998 UTC (15 years, 9 months ago) by pw
Branch: RELENG_18
CVS Tags: RELEASE_18b
Changes since 1.6: +1 -1 lines
Diff to previous 1.6
This (huge) revision brings the RELENG_18 branch up to the current HEAD.
Note code/unix-glib2.lisp not yet included -- not sure it is ready to go.

Revision 1.6 - (view) (annotate) - [select for diffs]
Sat Mar 21 08:12:04 1998 UTC (16 years, 1 month ago) by dtc
Branch: MAIN
Branch point for: RELENG_18
Changes since 1.5: +35 -2 lines
Diff to previous 1.5
Long-float support.

Revision 1.5 - (view) (annotate) - [select for diffs]
Tue Jan 13 19:18:00 1998 UTC (16 years, 3 months ago) by dtc
Branch: MAIN
Changes since 1.4: +6 -1 lines
Diff to previous 1.4
Re-seed the *random-state* as an after save initialisation.

Move the loading of the random number generator until after the
loading of save.lisp so that *after-save-initializations* is
initialised.

Revision 1.4 - (view) (annotate) - [select for diffs]
Tue Dec 16 02:55:16 1997 UTC (16 years, 4 months ago) by dtc
Branch: MAIN
Changes since 1.3: +6 -5 lines
Diff to previous 1.3
Update the header adding Raymond Toy as an author (the portable
mt19937 code), and noting that the author of the mt19937 algorithm
gave us permission to place this implementation in the public domain.

Revision 1.3 - (view) (annotate) - [select for diffs]
Fri Dec 12 15:16:49 1997 UTC (16 years, 4 months ago) by dtc
Branch: MAIN
Changes since 1.2: +19 -4 lines
Diff to previous 1.2
Fix a type declaration typo.
Slightly faster version of %random-double-float for the x86 port.
Don't push :random-mt19937 onto *features* here.

Revision 1.2 - (view) (annotate) - [select for diffs]
Thu Dec 11 17:44:14 1997 UTC (16 years, 4 months ago) by dtc
Branch: MAIN
Changes since 1.1: +4 -2 lines
Diff to previous 1.1
Enable the use of the inline MT19937 VOP which is now included by
default for the x86 port.

Revision 1.1 - (view) (annotate) - [select for diffs]
Sat Nov 1 23:08:04 1997 UTC (16 years, 5 months ago) by dtc
Branch: MAIN
Alternative random number generator for CMUCL; based on the Mersenne
Twister, MT19937, due to Matsumoto and Nishimura.

This form allows you to request diffs between any two revisions of this file. For each of the two "sides" of the diff, select a symbolic revision name using the selection box, or choose 'Use Text Field' and enter a numeric revision.

  Diffs between and
  Type of Diff should be a

Sort log by:

  ViewVC Help
Powered by ViewVC 1.1.5