2009-01-27 05:11:43 -05:00
										 
									 
								 
							 | 
							
								
							 | 
							
								
							 | 
							
							
								USING: eval tools.test ;
							 | 
						
					
						
							
								
									
										
										
										
											2009-08-13 20:21:44 -04:00
										 
									 
								 
							 | 
							
								
									
										
									
								
							 | 
							
								
							 | 
							
							
								IN: eval.tests
							 | 
						
					
						
							
								
									
										
										
										
											2009-01-27 05:11:43 -05:00
										 
									 
								 
							 | 
							
								
							 | 
							
								
							 | 
							
							
								
							 | 
						
					
						
							
								
									
										
										
										
											2015-07-02 20:28:17 -04:00
										 
									 
								 
							 | 
							
								
									
										
									
								
							 | 
							
								
							 | 
							
							
								{ 4 } [ "USE: math 2 2 +" eval( -- result ) ] unit-test
							 | 
						
					
						
							
								
									
										
										
										
											2009-04-17 16:50:03 -04:00
										 
									 
								 
							 | 
							
								
									
										
									
								
							 | 
							
								
							 | 
							
							
								[ "USE: math 2 2 +" eval( -- ) ] must-fail
							 | 
						
					
						
							
								
									
										
										
										
											2015-07-02 20:28:17 -04:00
										 
									 
								 
							 | 
							
								
									
										
									
								
							 | 
							
								
							 | 
							
							
								{ "4\n" } [ "USING: math prettyprint ; 2 2 + ." eval>string ] unit-test
							 |