X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/1691e80890e5d8ba258c51c214a3e91880e1db2b..fc31cece:/sbr/seq_nameok.c?ds=inline

diff --git a/sbr/seq_nameok.c b/sbr/seq_nameok.c
index 66319b5e..328bd5c2 100644
--- a/sbr/seq_nameok.c
+++ b/sbr/seq_nameok.c
@@ -2,7 +2,9 @@
 /*
  * seq_nameok.c -- check if a sequence name is ok
  *
- * $Id$
+ * This code is Copyright (c) 2002, by the authors of nmh.  See the
+ * COPYRIGHT file in the root directory of the nmh distribution for
+ * complete copyright information.
  */
 
 #include <h/mh.h>
@@ -36,7 +38,7 @@ seq_nameok (char *s)
      * First character in a sequence name must be
      * an alphabetic character ...
      */
-    if (!isalpha (*s)) {
+    if (!isalpha ((unsigned char) *s)) {
 	advise (NULL, "illegal sequence name: %s", s);
 	return 0;
     }
@@ -45,7 +47,7 @@ seq_nameok (char *s)
      * and can be followed by zero or more alphanumeric characters
      */
     for (pp = s + 1; *pp; pp++)
-	if (!isalnum (*pp)) {
+	if (!isalnum ((unsigned char) *pp)) {
 	    advise (NULL, "illegal sequence name: %s", s);
 	    return 0;
 	}