Mercurial > hg > octave-kai > gnulib-hg

diff lib/rpmatch.c @ 665:724b81f1f93a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[STDC_HEADERS]: Guard inclusion of stdlib.h. (_) [!_]: Define it. (try): Add RESPONSE parameter. (rpmatch): Update caller. Change the regular expressions to be ^[yY] and ^[nN].
author Jim Meyering <jim@meyering.net>
date Sun, 21 Jul 1996 22:46:39 +0000
parents d5cca0d984a3
children f63f6236102e
line wrap: on
line diff
--- a/lib/rpmatch.c
+++ b/lib/rpmatch.c
@@ -20,12 +20,19 @@
 # include <config.h>
 #endif
 
-#include <stdlib.h>
+#if STDC_HEADERS || _LIBC
+# include <stdlib.h>
+#endif
+
 #include <regex.h>
 
+#ifndef _
+# define _(String) String
+#endif
 
 static int
-try (tag, match, nomatch, lastp, re)
+try (response, pattern, match, nomatch, lastp, re)
+     const char *response;
      const char *pattern;
      const int match;
      const int nomatch;
@@ -47,7 +54,7 @@
       *lastp = pattern;
     }
 
-  /* Try the pattern.  */
+  /* See if the regular expression matches RESPONSE.  */
   return regexec (re, response, 0, NULL, 0) == 0 ? match : nomatch;
 }
 
@@ -64,7 +71,8 @@
   static regex_t yesre, nore;
   int result;
 
-  return ((result = try (_("[yY][[:alpha:]]"), 1, 0, &yesexpr, &yesre))
+  return ((result = try (response, _("^[yY]"), 1, 0,
+			 &yesexpr, &yesre))
 	  ? result
-	  : try (_("[nN][[:alpha:]]"), 0, -1, &noexpr, &nore));
+	  : try (response, _("^[nN]"), 0, -1, &noexpr, &nore));
 }