Update the documentation of get_av() to note that it calls Perl_gv_fetchpv(),

[p5sagit/p5-mst-13.2.git] / generate_uudmap.c

diff --git a/generate_uudmap.c b/generate_uudmap.c
index 5b940f7..28cfd27 100644 (file)
--- a/generate_uudmap.c
+++ b/generate_uudmap.c
@@ -1,6 +1,5 @@
 #include <stdio.h>
 #include <stdlib.h>
-#include <ctype.h>
 
 static const char PL_uuemap[]
 = "`!\"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_";
@@ -15,7 +14,7 @@ int main() {
   char *p;
 
   for (i = 0; i < sizeof(PL_uuemap) - 1; ++i)
-    PL_uudmap[(U8)PL_uuemap[i]] = i;
+    PL_uudmap[(U8)PL_uuemap[i]] = (char)i;
   /*
    * Because ' ' and '`' map to the same value,
    * we need to decode them both the same.