*** empty log message ***

diff --git a/tests/seq/basic b/tests/seq/basic
index 78419ce..95e563a 100755 (executable)
--- a/tests/seq/basic
+++ b/tests/seq/basic
@@ -1,4 +1,5 @@
 #!/bin/sh
+# -*- perl -*-
 
 : ${PERL=perl}
 : ${srcdir=.}
@@ -6,6 +7,7 @@
 case "$PERL" in
   *'missing perl')
   echo 1>&2 "$0: configure didn't find a usable version of Perl, so can't run this test"
+  #'
   exit 77
   ;;
 esac
@@ -22,11 +24,14 @@ use strict;
 my $prog = $ENV{PROG} || die "$0: \$PROG not specified in environment\n";
 
 my @Tests =
-    (
-     ['1', '10',         {OUT => [(1..10)]}],
-     ['neg-start-1', qw(-10 10 10), {OUT => [qw(-10 0 10)]}],
-     ['neg-start-2', qw(-.1 .1 .1), {OUT => [qw(-0.1 0 0.1)]}],
-    );
+  (
+   ['onearg-1',        qw(10),         {OUT => [(1..10)]}],
+   ['onearg-2',        qw(-1),         {OUT => [qw(1 0 -1)]}],
+   ['neg-1',   qw(-10 10 10),  {OUT => [qw(-10 0 10)]}],
+   ['neg-2',   qw(-.1 .1 .1),  {OUT => [qw(-0.1 0 0.1)]}],
+   ['neg-3',   qw(1 -1 0),     {OUT => [qw(1 0)]}],
+   ['neg-4',   qw(1 -1 -1),    {OUT => [qw(1 0 -1)]}],
+  );
 
 # Append a newline to each entry in the OUT array.
 my $t;