| 
									
										
										
										
											2008-02-06 05:26:13 -05:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2008-02-11 19:35:27 -05:00
										 |  |  | USING: kernel namespaces sequences assocs builder continuations | 
					
						
							|  |  |  |        vocabs vocabs.loader | 
					
						
							| 
									
										
										
										
											2008-02-06 05:26:13 -05:00
										 |  |  |        io | 
					
						
							|  |  |  |        io.files | 
					
						
							| 
									
										
										
										
											2008-02-11 19:35:27 -05:00
										 |  |  |        prettyprint | 
					
						
							| 
									
										
										
										
											2008-02-06 05:26:13 -05:00
										 |  |  |        tools.browser | 
					
						
							| 
									
										
										
										
											2008-02-11 19:34:02 -05:00
										 |  |  |        tools.test | 
					
						
							| 
									
										
										
										
											2008-03-07 19:30:47 -05:00
										 |  |  |        io.encodings.utf8 | 
					
						
							| 
									
										
										
										
											2008-02-14 02:07:18 -05:00
										 |  |  |        bootstrap.stage2 benchmark builder.util ;
 | 
					
						
							| 
									
										
										
										
											2008-02-06 05:26:13 -05:00
										 |  |  | 
 | 
					
						
							|  |  |  | IN: builder.test | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | : do-load ( -- )
 | 
					
						
							| 
									
										
										
										
											2008-03-07 19:30:47 -05:00
										 |  |  |   try-everything keys "../load-everything-vocabs" utf8 [ . ] with-file-writer ;
 | 
					
						
							| 
									
										
										
										
											2008-02-11 19:13:49 -05:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2008-02-06 05:26:13 -05:00
										 |  |  | : do-tests ( -- )
 | 
					
						
							| 
									
										
										
										
											2008-03-07 19:30:47 -05:00
										 |  |  |   run-all-tests keys "../test-all-vocabs" utf8 [ . ] with-file-writer ;
 | 
					
						
							| 
									
										
										
										
											2008-02-11 23:22:49 -05:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2008-03-07 19:30:47 -05:00
										 |  |  | : do-benchmarks ( -- )
 | 
					
						
							|  |  |  |   run-benchmarks "../benchmarks" utf8 [ . ] with-file-writer ;
 | 
					
						
							| 
									
										
										
										
											2008-02-13 06:50:45 -05:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2008-02-11 19:13:49 -05:00
										 |  |  | : do-all ( -- )
 | 
					
						
							| 
									
										
										
										
											2008-03-07 19:30:47 -05:00
										 |  |  |   bootstrap-time get   "../boot-time" utf8 [ . ] with-file-writer | 
					
						
							|  |  |  |   [ do-load  ] runtime "../load-time" utf8 [ . ] with-file-writer | 
					
						
							|  |  |  |   [ do-tests ] runtime "../test-time" utf8 [ . ] with-file-writer | 
					
						
							| 
									
										
										
										
											2008-02-13 06:50:45 -05:00
										 |  |  |   do-benchmarks ;
 | 
					
						
							| 
									
										
										
										
											2008-02-06 05:26:13 -05:00
										 |  |  | 
 | 
					
						
							|  |  |  | MAIN: do-all |