Merge branch 'jc/test-seq'
Test fix. * jc/test-seq: test-lib-functions.sh: rewrite test_seq without Perl test-lib-functions.sh: remove misleading comment on test_seq
This commit is contained in:
commit
8648eacc1d
@ -718,20 +718,13 @@ test_cmp_rev () {
|
||||
test_cmp expect.rev actual.rev
|
||||
}
|
||||
|
||||
# Print a sequence of numbers or letters in increasing order. This is
|
||||
# similar to GNU seq(1), but the latter might not be available
|
||||
# everywhere (and does not do letters). It may be used like:
|
||||
# Print a sequence of integers in increasing order, either with
|
||||
# two arguments (start and end):
|
||||
#
|
||||
# for i in $(test_seq 100)
|
||||
# do
|
||||
# for j in $(test_seq 10 20)
|
||||
# do
|
||||
# for k in $(test_seq a z)
|
||||
# do
|
||||
# echo $i-$j-$k
|
||||
# done
|
||||
# done
|
||||
# done
|
||||
# test_seq 1 5 -- outputs 1 2 3 4 5 one line at a time
|
||||
#
|
||||
# or with one argument (end), in which case it starts counting
|
||||
# from 1.
|
||||
|
||||
test_seq () {
|
||||
case $# in
|
||||
@ -739,7 +732,12 @@ test_seq () {
|
||||
2) ;;
|
||||
*) error "bug in the test script: not 1 or 2 parameters to test_seq" ;;
|
||||
esac
|
||||
perl -le 'print for $ARGV[0]..$ARGV[1]' -- "$@"
|
||||
test_seq_counter__=$1
|
||||
while test "$test_seq_counter__" -le "$2"
|
||||
do
|
||||
echo "$test_seq_counter__"
|
||||
test_seq_counter__=$(( $test_seq_counter__ + 1 ))
|
||||
done
|
||||
}
|
||||
|
||||
# This function can be used to schedule some commands to be run
|
||||
|
Loading…
Reference in New Issue
Block a user