Making some scheduling assertions only run in unit tests
							parent
							
								
									74de7d0e2a
								
							
						
					
					
						commit
						6892bac1ca
					
				| 
						 | 
				
			
			@ -0,0 +1,11 @@
 | 
			
		|||
USING: compiler.cfg.scheduling vocabs.loader namespaces tools.test ;
 | 
			
		||||
IN: compiler.cfg.scheduling.tests
 | 
			
		||||
 | 
			
		||||
! Recompile compiler.cfg.scheduling with extra tests,
 | 
			
		||||
! and see if any errors come up. Back when there were
 | 
			
		||||
! errors of this kind, they always surfaced this way.
 | 
			
		||||
 | 
			
		||||
t check-scheduling? [
 | 
			
		||||
    [ ] [ "compiler.cfg.scheduling" reload ] unit-test
 | 
			
		||||
    [ ] [ "compiler.cfg.dependence" reload ] unit-test
 | 
			
		||||
] with-variable
 | 
			
		||||
| 
						 | 
				
			
			@ -70,7 +70,7 @@ UNION: initial-insn
 | 
			
		|||
ERROR: not-all-instructions-were-scheduled old-bb new-bb ;
 | 
			
		||||
 | 
			
		||||
SYMBOL: check-scheduling?
 | 
			
		||||
t check-scheduling? set-global
 | 
			
		||||
f check-scheduling? set-global
 | 
			
		||||
 | 
			
		||||
:: check-instructions ( new-bb old-bb -- )
 | 
			
		||||
    new-bb old-bb [ instructions>> ] bi@
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue