set random-number generator for user program
svn: r1398
This commit is contained in:
parent
3064b59ed0
commit
11f4c3a661
|
@ -163,8 +163,10 @@
|
||||||
(for-each (λ (snip-class) (send (get-the-snip-class-list) add snip-class))
|
(for-each (λ (snip-class) (send (get-the-snip-class-list) add snip-class))
|
||||||
snip-classes)
|
snip-classes)
|
||||||
|
|
||||||
(current-thread-group (make-thread-group))
|
(current-thread-group (make-thread-group))
|
||||||
(current-command-line-arguments #())
|
(current-command-line-arguments #())
|
||||||
|
(current-pseudo-random-generator (make-pseudo-random-generator))
|
||||||
|
(current-evt-pseudo-random-generator (make-pseudo-random-generator))
|
||||||
(read-curly-brace-as-paren #t)
|
(read-curly-brace-as-paren #t)
|
||||||
(read-square-bracket-as-paren #t)
|
(read-square-bracket-as-paren #t)
|
||||||
(error-print-width 250)
|
(error-print-width 250)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user