8 lines
		
	
	
		
			183 B
		
	
	
	
		
			Factor
		
	
	
		
		
			
		
	
	
			8 lines
		
	
	
		
			183 B
		
	
	
	
		
			Factor
		
	
	
| 
								 | 
							
								IN: cairo.tests
							 | 
						||
| 
								 | 
							
								USING: cairo tools.test math.rectangles accessors ;
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								[ { 10 20 } ] [
							 | 
						||
| 
								 | 
							
								    { 10 20 } [
							 | 
						||
| 
								 | 
							
								        { 0 1 } { 3 4 } <rect> fill-rect
							 | 
						||
| 
								 | 
							
								    ] make-bitmap-image dim>>
							 | 
						||
| 
								 | 
							
								] unit-test
							 |