| 
									
										
										
										
											2008-03-19 22:41:39 -04:00
										 |  |  | USING: vocabs.loader sequences system | 
					
						
							| 
									
										
										
										
											2008-03-19 22:48:29 -04:00
										 |  |  | random random.mersenne-twister combinators init | 
					
						
							| 
									
										
										
										
											2008-03-27 07:36:34 -04:00
										 |  |  | namespaces random ;
 | 
					
						
							| 
									
										
										
										
											2008-08-29 01:41:26 -04:00
										 |  |  | IN: bootstrap.random | 
					
						
							| 
									
										
										
										
											2008-03-19 17:22:06 -04:00
										 |  |  | 
 | 
					
						
							|  |  |  | "random.mersenne-twister" require | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | { | 
					
						
							| 
									
										
										
										
											2008-04-02 19:25:33 -04:00
										 |  |  |     { [ os windows? ] [ "random.windows" require ] } | 
					
						
							|  |  |  |     { [ os unix? ] [ "random.unix" require ] } | 
					
						
							| 
									
										
										
										
											2008-03-19 17:22:06 -04:00
										 |  |  | } cond
 | 
					
						
							| 
									
										
										
										
											2008-03-19 22:41:39 -04:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2008-04-11 13:55:57 -04:00
										 |  |  | [ | 
					
						
							| 
									
										
										
										
											2008-04-12 22:35:07 -04:00
										 |  |  |     [ 32 random-bits ] with-system-random | 
					
						
							| 
									
										
										
										
											2008-04-11 13:55:57 -04:00
										 |  |  |     <mersenne-twister> random-generator set-global
 | 
					
						
							|  |  |  | ] "generator.random" add-init-hook |