The fallback seq implementation was missing in the darcs repo, add it and fix a bug in it

darcs-hash:20060526114722-ac50b-4b75ac32c6490b358bb1003736fdc47198f37030.gz

seq

@@ -0,0 +1,48 @@
+#!/usr/bin/env fish
+# 
+# Fallback implementation of the seq command
+#
+# seq.  Generated from seq.in by configure.
+
+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 = "1"
+	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)
+		exit 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
+		exit 1
+	end
+end
+
+echo "for( i=$from; i<=$to ; i+=$step ) i;" | bc