Changeset 34030 in project for release/4


Ignore:
Timestamp:
04/24/17 21:01:47 (3 years ago)
Author:
Kon Lovett
Message:

entropy-source-system-clock
--This line, and those belowentropy-source-u8, will be ignored--

A + srfi-27/tags/3.2.7
A + srfi-27/tags/3.2.7/bsdrnd.scm
A + srfi-27/tags/3.2.7/composite-entropy-source.scm
R + srfi-27/tags/3.2.7/composite-random-source.scm
R + srfi-27/tags/3.2.7/entropy-clock.scm
R + srfi-27/tags/3.2.7/entropy-port.scm
R + srfi-27/tags/3.2.7/entropy-procedure.scm
R + srfi-27/tags/3.2.7/entropy-source.scm
R + srfi-27/tags/3.2.7/entropy-support.scm
R + srfi-27/tags/3.2.7/entropy-unix.scm
R + srfi-27/tags/3.2.7/entropy-windows.scm
A + srfi-27/tags/3.2.7/fp-extn.scm
R + srfi-27/tags/3.2.7/moa.scm
R + srfi-27/tags/3.2.7/mrg32k3a.scm
R + srfi-27/tags/3.2.7/mwc.scm
R + srfi-27/tags/3.2.7/random-source.scm
A + srfi-27/tags/3.2.7/source-registration.scm
R + srfi-27/tags/3.2.7/srfi-27-distributions.scm
R + srfi-27/tags/3.2.7/srfi-27-numbers.scm
R + srfi-27/tags/3.2.7/srfi-27-uniform-random.scm
R + srfi-27/tags/3.2.7/srfi-27-vector-support.scm
R + srfi-27/tags/3.2.7/srfi-27-vector.scm
R + srfi-27/tags/3.2.7/srfi-27.meta
R + srfi-27/tags/3.2.7/srfi-27.scm
R + srfi-27/tags/3.2.7/srfi-27.setup
R + srfi-27/tags/3.2.7/tests/run.scm
R + srfi-27/tags/3.2.7/tests/test-confidence.scm
R + srfi-27/tags/3.2.7/tests/test-mrg32k3a.scm
M srfi-27/trunk/entropy-clock.scm
M srfi-27/trunk/srfi-27.setup
D srfi-27/tags/3.2.7/fp-extn-w.scm
D srfi-27/tags/3.2.7/fp-extn-wo.scm
D srfi-27/tags/3.2.7/srfi-27-implementation

Location:
release/4/srfi-27
Files:
3 deleted
2 edited
28 copied

Legend:

Unmodified
Added
Removed
  • release/4/srfi-27/tags/3.2.7/entropy-clock.scm

    r34021 r34030  
    3737
    3838(define (make-entropy-source-system-clock)
    39   (let* ((f64seed (f64init))
    40          (_f64rand (lambda () (set! f64seed (f64rand f64seed)) f64seed)) )
     39  (let* ((f64seed (f64init) )
     40         (_f64rand
     41          (lambda ()
     42            (set! f64seed (f64rand f64seed))
     43            f64seed ) ) )
    4144    (*make-entropy-source
    4245      ;
     
    4750      "Entropy from system clock"
    4851      ;
    49       (make-entropic-u8/f64 _f64rand)
     52      (lambda ()
     53        (make-entropic-u8/f64 _f64rand) )
    5054      ;
    5155      _f64rand
    5256      ;
    53       (lambda (u8cnt u8vec) (entropic-u8vector-filled/f64 u8cnt u8vec _f64rand) )
     57      (lambda (u8cnt u8vec)
     58        (entropic-u8vector-filled/f64 u8cnt u8vec _f64rand) )
    5459      ;
    55       (lambda (f64cnt f64vec) (entropic-f64vector-filled f64cnt f64vec _f64rand) ) ) ) )
     60      (lambda (f64cnt f64vec)
     61        (entropic-f64vector-filled f64cnt f64vec _f64rand) ) ) ) )
    5662
    5763(register-entropy-source! 'system-clock make-entropy-source-system-clock)
  • release/4/srfi-27/tags/3.2.7/srfi-27.setup

    r34023 r34030  
    1717#;(define publoptn '())
    1818
    19 (setup-shared-extension-module 'fp-extn (extension-version "3.2.6")
     19(setup-shared-extension-module 'fp-extn (extension-version "3.2.7")
    2020  #:inline? #t
    2121  #:types? #t
    2222  #:compile-options `(-scrutinize ,@utiloptn) )
    2323
    24 (setup-shared-extension-module 'source-registration (extension-version "3.2.6")
     24(setup-shared-extension-module 'source-registration (extension-version "3.2.7")
    2525  #:inline? #t
    2626  #:types? #t
    2727  #:compile-options `(-scrutinize ,@utiloptn) )
    2828
    29 (setup-shared-extension-module 'srfi-27-numbers (extension-version "3.2.6")
     29(setup-shared-extension-module 'srfi-27-numbers (extension-version "3.2.7")
    3030  #:inline? #t
    3131  #:types? #t
    3232  #:compile-options `(-scrutinize ,@utiloptn) )
    3333
    34 (setup-shared-extension-module 'srfi-27-vector-support (extension-version "3.2.6")
     34(setup-shared-extension-module 'srfi-27-vector-support (extension-version "3.2.7")
    3535  #:inline? #t
    3636  #:types? #t
     
    3939;; Entropy Source Modules
    4040
    41 (setup-shared-extension-module 'entropy-source (extension-version "3.2.6")
     41(setup-shared-extension-module 'entropy-source (extension-version "3.2.7")
    4242  #:inline? #t
    4343  #:types? #t
    4444  #:compile-options `(-scrutinize ,@utiloptn) )
    4545
    46 (setup-shared-extension-module 'entropy-support (extension-version "3.2.6")
     46(setup-shared-extension-module 'entropy-support (extension-version "3.2.7")
    4747  #:inline? #t
    4848  #:types? #t
    4949  #:compile-options `(-scrutinize ,@utiloptn) )
    5050
    51 (setup-shared-extension-module 'entropy-clock (extension-version "3.2.6")
     51(setup-shared-extension-module 'entropy-clock (extension-version "3.2.7")
    5252  #:inline? #t
    5353  #:types? #t
    5454  #:compile-options `(-scrutinize ,@publoptn) )
    5555
    56 (setup-shared-extension-module 'entropy-procedure (extension-version "3.2.6")
     56(setup-shared-extension-module 'entropy-procedure (extension-version "3.2.7")
    5757  #:inline? #t
    5858  #:types? #t
     
    6161    -no-procedure-checks) )
    6262
    63 (setup-shared-extension-module 'entropy-port (extension-version "3.2.6")
     63(setup-shared-extension-module 'entropy-port (extension-version "3.2.7")
    6464  #:inline? #t
    6565  #:types? #t
     
    6767
    6868#+unix
    69 (setup-shared-extension-module 'entropy-unix (extension-version "3.2.6")
     69(setup-shared-extension-module 'entropy-unix (extension-version "3.2.7")
    7070  #:inline? #t
    7171  #:types? #t
     
    7373
    7474#+windows
    75 (setup-shared-extension-module 'entropy-windows (extension-version "3.2.6")
     75(setup-shared-extension-module 'entropy-windows (extension-version "3.2.7")
    7676  #:inline? #t
    7777  #:types? #t
     
    7979
    8080#;
    81 (setup-shared-extension-module 'composite-entropy-source (extension-version "3.2.6")
     81(setup-shared-extension-module 'composite-entropy-source (extension-version "3.2.7")
    8282  #:inline? #t
    8383  #:types? #t
     
    8686;; Random Source Modules
    8787
    88 (setup-shared-extension-module 'random-source (extension-version "3.2.6")
     88(setup-shared-extension-module 'random-source (extension-version "3.2.7")
    8989  #:inline? #t
    9090  #:types? #t
    9191  #:compile-options `(-scrutinize ,@utiloptn) )
    9292
    93 (setup-shared-extension-module 'mrg32k3a (extension-version "3.2.6")
     93(setup-shared-extension-module 'mrg32k3a (extension-version "3.2.7")
    9494  #:inline? #t
    9595  #:types? #t
    9696  #:compile-options `(-scrutinize ,@utiloptn) )
    9797
    98 (setup-shared-extension-module 'mwc (extension-version "3.2.6")
     98(setup-shared-extension-module 'mwc (extension-version "3.2.7")
    9999  #:inline? #t
    100100  #:types? #t
    101101  #:compile-options `(-scrutinize ,@utiloptn) )
    102102
    103 (setup-shared-extension-module 'moa (extension-version "3.2.6")
     103(setup-shared-extension-module 'moa (extension-version "3.2.7")
    104104  #:inline? #t
    105105  #:types? #t
     
    107107
    108108#;
    109 (setup-shared-extension-module 'bsdrnd (extension-version "3.2.6")
     109(setup-shared-extension-module 'bsdrnd (extension-version "3.2.7")
    110110  #:inline? #t
    111111  #:types? #t
     
    113113
    114114#;
    115 (setup-shared-extension-module 'composite-random-source (extension-version "3.2.6")
     115(setup-shared-extension-module 'composite-random-source (extension-version "3.2.7")
    116116  #:inline? #t
    117117  #:types? #t
     
    120120;; Main Modules
    121121
    122 (setup-shared-extension-module 'srfi-27 (extension-version "3.2.6")
     122(setup-shared-extension-module 'srfi-27 (extension-version "3.2.7")
    123123  #:inline? #t
    124124  #:types? #t
    125125  #:compile-options `(-scrutinize ,@publoptn) )
    126126
    127 (setup-shared-extension-module 'srfi-27-uniform-random (extension-version "3.2.6")
     127(setup-shared-extension-module 'srfi-27-uniform-random (extension-version "3.2.7")
    128128  #:inline? #t
    129129  #:types? #t
    130130  #:compile-options `(-scrutinize ,@publoptn) )
    131131
    132 (setup-shared-extension-module 'srfi-27-distributions (extension-version "3.2.6")
     132(setup-shared-extension-module 'srfi-27-distributions (extension-version "3.2.7")
    133133  #:inline? #t
    134134  #:types? #t
    135135  #:compile-options `(-scrutinize ,@publoptn) )
    136136
    137 (setup-shared-extension-module 'srfi-27-vector (extension-version "3.2.6")
     137(setup-shared-extension-module 'srfi-27-vector (extension-version "3.2.7")
    138138  #:inline? #t
    139139  #:types? #t
  • release/4/srfi-27/trunk/entropy-clock.scm

    r34021 r34030  
    3737
    3838(define (make-entropy-source-system-clock)
    39   (let* ((f64seed (f64init))
    40          (_f64rand (lambda () (set! f64seed (f64rand f64seed)) f64seed)) )
     39  (let* ((f64seed (f64init) )
     40         (_f64rand
     41          (lambda ()
     42            (set! f64seed (f64rand f64seed))
     43            f64seed ) ) )
    4144    (*make-entropy-source
    4245      ;
     
    4750      "Entropy from system clock"
    4851      ;
    49       (make-entropic-u8/f64 _f64rand)
     52      (lambda ()
     53        (make-entropic-u8/f64 _f64rand) )
    5054      ;
    5155      _f64rand
    5256      ;
    53       (lambda (u8cnt u8vec) (entropic-u8vector-filled/f64 u8cnt u8vec _f64rand) )
     57      (lambda (u8cnt u8vec)
     58        (entropic-u8vector-filled/f64 u8cnt u8vec _f64rand) )
    5459      ;
    55       (lambda (f64cnt f64vec) (entropic-f64vector-filled f64cnt f64vec _f64rand) ) ) ) )
     60      (lambda (f64cnt f64vec)
     61        (entropic-f64vector-filled f64cnt f64vec _f64rand) ) ) ) )
    5662
    5763(register-entropy-source! 'system-clock make-entropy-source-system-clock)
  • release/4/srfi-27/trunk/srfi-27.setup

    r34023 r34030  
    1717#;(define publoptn '())
    1818
    19 (setup-shared-extension-module 'fp-extn (extension-version "3.2.6")
     19(setup-shared-extension-module 'fp-extn (extension-version "3.2.7")
    2020  #:inline? #t
    2121  #:types? #t
    2222  #:compile-options `(-scrutinize ,@utiloptn) )
    2323
    24 (setup-shared-extension-module 'source-registration (extension-version "3.2.6")
     24(setup-shared-extension-module 'source-registration (extension-version "3.2.7")
    2525  #:inline? #t
    2626  #:types? #t
    2727  #:compile-options `(-scrutinize ,@utiloptn) )
    2828
    29 (setup-shared-extension-module 'srfi-27-numbers (extension-version "3.2.6")
     29(setup-shared-extension-module 'srfi-27-numbers (extension-version "3.2.7")
    3030  #:inline? #t
    3131  #:types? #t
    3232  #:compile-options `(-scrutinize ,@utiloptn) )
    3333
    34 (setup-shared-extension-module 'srfi-27-vector-support (extension-version "3.2.6")
     34(setup-shared-extension-module 'srfi-27-vector-support (extension-version "3.2.7")
    3535  #:inline? #t
    3636  #:types? #t
     
    3939;; Entropy Source Modules
    4040
    41 (setup-shared-extension-module 'entropy-source (extension-version "3.2.6")
     41(setup-shared-extension-module 'entropy-source (extension-version "3.2.7")
    4242  #:inline? #t
    4343  #:types? #t
    4444  #:compile-options `(-scrutinize ,@utiloptn) )
    4545
    46 (setup-shared-extension-module 'entropy-support (extension-version "3.2.6")
     46(setup-shared-extension-module 'entropy-support (extension-version "3.2.7")
    4747  #:inline? #t
    4848  #:types? #t
    4949  #:compile-options `(-scrutinize ,@utiloptn) )
    5050
    51 (setup-shared-extension-module 'entropy-clock (extension-version "3.2.6")
     51(setup-shared-extension-module 'entropy-clock (extension-version "3.2.7")
    5252  #:inline? #t
    5353  #:types? #t
    5454  #:compile-options `(-scrutinize ,@publoptn) )
    5555
    56 (setup-shared-extension-module 'entropy-procedure (extension-version "3.2.6")
     56(setup-shared-extension-module 'entropy-procedure (extension-version "3.2.7")
    5757  #:inline? #t
    5858  #:types? #t
     
    6161    -no-procedure-checks) )
    6262
    63 (setup-shared-extension-module 'entropy-port (extension-version "3.2.6")
     63(setup-shared-extension-module 'entropy-port (extension-version "3.2.7")
    6464  #:inline? #t
    6565  #:types? #t
     
    6767
    6868#+unix
    69 (setup-shared-extension-module 'entropy-unix (extension-version "3.2.6")
     69(setup-shared-extension-module 'entropy-unix (extension-version "3.2.7")
    7070  #:inline? #t
    7171  #:types? #t
     
    7373
    7474#+windows
    75 (setup-shared-extension-module 'entropy-windows (extension-version "3.2.6")
     75(setup-shared-extension-module 'entropy-windows (extension-version "3.2.7")
    7676  #:inline? #t
    7777  #:types? #t
     
    7979
    8080#;
    81 (setup-shared-extension-module 'composite-entropy-source (extension-version "3.2.6")
     81(setup-shared-extension-module 'composite-entropy-source (extension-version "3.2.7")
    8282  #:inline? #t
    8383  #:types? #t
     
    8686;; Random Source Modules
    8787
    88 (setup-shared-extension-module 'random-source (extension-version "3.2.6")
     88(setup-shared-extension-module 'random-source (extension-version "3.2.7")
    8989  #:inline? #t
    9090  #:types? #t
    9191  #:compile-options `(-scrutinize ,@utiloptn) )
    9292
    93 (setup-shared-extension-module 'mrg32k3a (extension-version "3.2.6")
     93(setup-shared-extension-module 'mrg32k3a (extension-version "3.2.7")
    9494  #:inline? #t
    9595  #:types? #t
    9696  #:compile-options `(-scrutinize ,@utiloptn) )
    9797
    98 (setup-shared-extension-module 'mwc (extension-version "3.2.6")
     98(setup-shared-extension-module 'mwc (extension-version "3.2.7")
    9999  #:inline? #t
    100100  #:types? #t
    101101  #:compile-options `(-scrutinize ,@utiloptn) )
    102102
    103 (setup-shared-extension-module 'moa (extension-version "3.2.6")
     103(setup-shared-extension-module 'moa (extension-version "3.2.7")
    104104  #:inline? #t
    105105  #:types? #t
     
    107107
    108108#;
    109 (setup-shared-extension-module 'bsdrnd (extension-version "3.2.6")
     109(setup-shared-extension-module 'bsdrnd (extension-version "3.2.7")
    110110  #:inline? #t
    111111  #:types? #t
     
    113113
    114114#;
    115 (setup-shared-extension-module 'composite-random-source (extension-version "3.2.6")
     115(setup-shared-extension-module 'composite-random-source (extension-version "3.2.7")
    116116  #:inline? #t
    117117  #:types? #t
     
    120120;; Main Modules
    121121
    122 (setup-shared-extension-module 'srfi-27 (extension-version "3.2.6")
     122(setup-shared-extension-module 'srfi-27 (extension-version "3.2.7")
    123123  #:inline? #t
    124124  #:types? #t
    125125  #:compile-options `(-scrutinize ,@publoptn) )
    126126
    127 (setup-shared-extension-module 'srfi-27-uniform-random (extension-version "3.2.6")
     127(setup-shared-extension-module 'srfi-27-uniform-random (extension-version "3.2.7")
    128128  #:inline? #t
    129129  #:types? #t
    130130  #:compile-options `(-scrutinize ,@publoptn) )
    131131
    132 (setup-shared-extension-module 'srfi-27-distributions (extension-version "3.2.6")
     132(setup-shared-extension-module 'srfi-27-distributions (extension-version "3.2.7")
    133133  #:inline? #t
    134134  #:types? #t
    135135  #:compile-options `(-scrutinize ,@publoptn) )
    136136
    137 (setup-shared-extension-module 'srfi-27-vector (extension-version "3.2.6")
     137(setup-shared-extension-module 'srfi-27-vector (extension-version "3.2.7")
    138138  #:inline? #t
    139139  #:types? #t
Note: See TracChangeset for help on using the changeset viewer.