From afd92778061dddaec0862348bcd87df3e3d7bfd8 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
<grubba@grubba.org>
Date: Fri, 15 Nov 2002 23:03:06 +0100
Subject: [PATCH] More Getopt fixes.
Rev: lib/modules/testsuite.in:1.7
---
lib/modules/testsuite.in | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/lib/modules/testsuite.in b/lib/modules/testsuite.in
index 8936d752ca..836278cd45 100644
--- a/lib/modules/testsuite.in
+++ b/lib/modules/testsuite.in
@@ -1,4 +1,4 @@
-dnl $Id: testsuite.in,v 1.6 2002/11/15 21:09:12 grubba Exp $
+dnl $Id: testsuite.in,v 1.7 2002/11/15 22:03:06 grubba Exp $
dnl - Array
@@ -364,15 +364,15 @@ test_do( putenv("POSIX_ME_HARDER", "1"); )
test_eval_error( Getop.get_args(({ "x", "a", "-b" }), -1, 1) )
test_equal( Getopt.get_args(({ "x", "a", "-b" }), 1, 1), ({ "x", "a", "-b" }))
test_equal( Getopt.get_args(({ "x", 0, "-b" }), 1, 1), ({ "x", "-b" }))
-test_eval_error( opt( ({"x","a","-b"}), ({"y",Getopy.HAS_ARG,"-b"}), -1 ))
+test_eval_error( opt( ({"x","a","-b"}), ({"y",Getopt.HAS_ARG,"-b"}), -1, 1 ))
test_any_equal([[
array x = ({ "x", "a", "-b" });
- opt(x, ({ "y", Getopt.HAS_ARG, "-b" }) );
+ opt(x, ({ "y", Getopt.HAS_ARG, "-b" }), 1, 1 );
return x;
]],[[ ({ "x", "a", "-b" }) ]])
test_any_equal([[
array x = ({ "x", "a", "-b" });
- opt(x, ({ "y", Getopt.HAS_ARG, "-b" }), 1);
+ opt(x, ({ "y", Getopt.HAS_ARG, "-b" }), 1, 1);
return x;
]],[[ ({ "x", "a", "-b" }) ]])
--
GitLab