mirror of
https://github.com/fish-shell/fish-shell
synced 2024-11-14 08:58:01 +00:00
777a559e12
darcs-hash:20060216121617-ac50b-6c7e34329a5ca8f3cd6756f1860fa10693db21e4.gz
48 lines
828 B
Fish
Executable file
48 lines
828 B
Fish
Executable file
#!/usr/bin/env fish
|
|
#
|
|
# Fallback implementation of the seq command
|
|
#
|
|
# @configure_input@
|
|
|
|
set -l from 1
|
|
set -l step 1
|
|
set -l to 1
|
|
|
|
function _ -d "Alias for the gettext command"
|
|
printf "%s" $argv
|
|
end
|
|
if test 1 = "@HAVE_GETTEXT@"
|
|
if which gettext ^/dev/null >/dev/null
|
|
function _ -d "Alias for the gettext command"
|
|
gettext fish $argv
|
|
end
|
|
end
|
|
end
|
|
|
|
switch (count $argv)
|
|
case 1
|
|
set to $argv[1]
|
|
|
|
case 2
|
|
set from $argv[1]
|
|
set to $argv[2]
|
|
|
|
case 3
|
|
set from $argv[1]
|
|
set step $argv[2]
|
|
set to $argv[3]
|
|
|
|
case '*'
|
|
printf (_ "%s: Expected 1, 2 or 3 arguments, got %d\n") seq (count $argv)
|
|
return 1
|
|
|
|
end
|
|
|
|
for i in $from $step $to
|
|
if not echo $i | grep '^-\?[0-9]*\(\|.[0-9]\+\)$' >/dev/null
|
|
printf (_ "%s: '%s' is not a number\n") seq $i
|
|
return 1
|
|
end
|
|
end
|
|
|
|
echo "for( i=$from; i<=$to ; i+=$step ) i;" | bc
|