unexpand: fix incorrect expansion, add test for it
function old new delta expand_main 676 656 -20
This commit is contained in:
		
							
								
								
									
										30
									
								
								testsuite/unexpand.tests
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										30
									
								
								testsuite/unexpand.tests
									
									
									
									
									
										Executable file
									
								
							@@ -0,0 +1,30 @@
 | 
			
		||||
#!/bin/sh
 | 
			
		||||
# Copyright 2008 by Denys Vlasenko
 | 
			
		||||
# Licensed under GPL v2, see file LICENSE for details.
 | 
			
		||||
 | 
			
		||||
. testing.sh
 | 
			
		||||
 | 
			
		||||
# testing "test name" "options" "expected result" "file input" "stdin"
 | 
			
		||||
 | 
			
		||||
testing "unexpand case 1" "unexpand" \
 | 
			
		||||
	"\t12345678\n" "" "        12345678\n" \
 | 
			
		||||
 | 
			
		||||
testing "unexpand case 2" "unexpand" \
 | 
			
		||||
	"\t 12345678\n" "" "         12345678\n" \
 | 
			
		||||
 | 
			
		||||
testing "unexpand case 3" "unexpand" \
 | 
			
		||||
	"\t  12345678\n" "" "          12345678\n" \
 | 
			
		||||
 | 
			
		||||
testing "unexpand case 4" "unexpand" \
 | 
			
		||||
	"\t12345678\n" "" "       \t12345678\n" \
 | 
			
		||||
 | 
			
		||||
testing "unexpand case 5" "unexpand" \
 | 
			
		||||
	"\t12345678\n" "" "      \t12345678\n" \
 | 
			
		||||
 | 
			
		||||
testing "unexpand case 6" "unexpand" \
 | 
			
		||||
	"\t12345678\n" "" "     \t12345678\n" \
 | 
			
		||||
 | 
			
		||||
testing "unexpand case 7" "unexpand" \
 | 
			
		||||
	"123\t 45678\n" "" "123 \t 45678\n" \
 | 
			
		||||
 | 
			
		||||
exit $FAILCOUNT
 | 
			
		||||
		Reference in New Issue
	
	Block a user