unit test for long os-env values
							parent
							
								
									dadaae59a1
								
							
						
					
					
						commit
						def4e06652
					
				| 
						 | 
				
			
			@ -1,4 +1,5 @@
 | 
			
		|||
USING: math tools.test system prettyprint namespaces kernel ;
 | 
			
		||||
USING: math tools.test system prettyprint namespaces kernel
 | 
			
		||||
strings sequences ;
 | 
			
		||||
IN: system.tests
 | 
			
		||||
 | 
			
		||||
os wince? [
 | 
			
		||||
| 
						 | 
				
			
			@ -19,3 +20,8 @@ os unix? [
 | 
			
		|||
[ ] [ "factor-test-key-1" unset-os-env ] unit-test
 | 
			
		||||
[ f ] [ "factor-test-key-1" os-env ] unit-test
 | 
			
		||||
 | 
			
		||||
[ ] [
 | 
			
		||||
    32766 CHAR: a <string> "factor-test-key-long" set-os-env
 | 
			
		||||
] unit-test
 | 
			
		||||
[ 32766 ] [ "factor-test-key-long" os-env length ] unit-test
 | 
			
		||||
[ ] [ "factor-test-key-long" unset-os-env ] unit-test
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue