compiler.cfg.*: fix for test cases that broke due to stack effect changes
							parent
							
								
									bfc0ef815b
								
							
						
					
					
						commit
						08e9f18c3b
					
				| 
						 | 
				
			
			@ -4,7 +4,7 @@ cpu.architecture kernel namespaces tools.test ;
 | 
			
		|||
IN: compiler.cfg.copy-prop.tests
 | 
			
		||||
 | 
			
		||||
: test-copy-propagation ( -- )
 | 
			
		||||
    0 get block>cfg copy-propagation drop ;
 | 
			
		||||
    0 get block>cfg copy-propagation ;
 | 
			
		||||
 | 
			
		||||
! Simple example
 | 
			
		||||
V{
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -5,7 +5,7 @@ compiler.cfg.registers compiler.cfg.utilities cpu.architecture tools.test ;
 | 
			
		|||
IN: compiler.cfg.dce.tests
 | 
			
		||||
 | 
			
		||||
: test-dce ( insns -- insns' )
 | 
			
		||||
    insns>cfg eliminate-dead-code entry>> instructions>> ;
 | 
			
		||||
    insns>cfg dup eliminate-dead-code entry>> instructions>> ;
 | 
			
		||||
 | 
			
		||||
[ V{
 | 
			
		||||
    T{ ##load-integer { dst 1 } { val 8 } }
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -2748,7 +2748,7 @@ test-diamond
 | 
			
		|||
 | 
			
		||||
[ ] [
 | 
			
		||||
    0 get block>cfg dup cfg set
 | 
			
		||||
    value-numbering
 | 
			
		||||
    dup value-numbering
 | 
			
		||||
    select-representations
 | 
			
		||||
    destruct-ssa drop
 | 
			
		||||
] unit-test
 | 
			
		||||
| 
						 | 
				
			
			@ -2788,9 +2788,7 @@ test-diamond
 | 
			
		|||
 | 
			
		||||
[ ] [
 | 
			
		||||
    0 get block>cfg
 | 
			
		||||
    value-numbering
 | 
			
		||||
    eliminate-dead-code
 | 
			
		||||
    drop
 | 
			
		||||
    { value-numbering eliminate-dead-code } apply-passes
 | 
			
		||||
] unit-test
 | 
			
		||||
 | 
			
		||||
[ t ] [ 1 get successors>> first 3 get eq? ] unit-test
 | 
			
		||||
| 
						 | 
				
			
			@ -2857,7 +2855,7 @@ V{
 | 
			
		|||
 | 
			
		||||
[ ] [
 | 
			
		||||
    0 get block>cfg
 | 
			
		||||
    value-numbering eliminate-dead-code drop
 | 
			
		||||
    { value-numbering eliminate-dead-code } apply-passes
 | 
			
		||||
] unit-test
 | 
			
		||||
 | 
			
		||||
[ f ] [ 1 get instructions>> [ ##peek? ] any? ] unit-test
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue