fix:

diff --git a/libguile/read.c b/libguile/read.c
index d91c868..5f9ce36 100644
--- a/libguile/read.c
+++ b/libguile/read.c
@@ -1437,7 +1437,7 @@ scm_scan_for_encoding (SCM port)
   /* grab the next token */
   i = 0;
   while (pos + i - header <= SCM_ENCODING_SEARCH_SIZE 
-        && (isalnum(pos[i]) || pos[i] == '_' || pos[i] == '-' || pos[i] == 
'.'))
+        && (isalnum((int) pos[i]) || pos[i] == '_' || pos[i] == '-' || pos[i] 
== '.'))
     i++;
 
   if (i == 0)

Attachment: pgpFeDJ5zl6mj.pgp
Description: PGP signature

Reply via email to