-# $Id: MKkeyname.awk,v 1.31 2007/01/06 21:19:44 Miroslav.Lichvar Exp $
+# $Id: MKkeyname.awk,v 1.33 2007/05/26 20:58:24 tom Exp $
##############################################################################
# Copyright (c) 1999-2006,2007 Free Software Foundation, Inc. #
# #
print "static const char key_names[] = "names";"
print ""
print "#define SIZEOF_TABLE 256"
- print "static char **keyname_table;"
+ print "#define MyTable _nc_globals.keyname_table"
print ""
print "NCURSES_EXPORT(NCURSES_CONST char *) keyname (int c)"
print "{"
print " }"
print ""
print " if (result == 0 && (c >= 0 && c < SIZEOF_TABLE)) {"
- print " if (keyname_table == 0)"
- print " keyname_table = typeCalloc(char *, SIZEOF_TABLE);"
- print " if (keyname_table != 0) {"
- print " if (keyname_table[c] == 0) {"
+ print " if (MyTable == 0)"
+ print " MyTable = typeCalloc(char *, SIZEOF_TABLE);"
+ print " if (MyTable != 0) {"
+ print " if (MyTable[c] == 0) {"
print " int cc = c;"
print " p = name;"
- print " if (cc >= 128) {"
+ print " if (cc >= 128 && (SP == 0 || SP->_use_meta)) {"
print " strcpy(p, \"M-\");"
print " p += 2;"
print " cc -= 128;"
print " strcpy(p, \"^?\");"
print " else"
print " sprintf(p, \"%c\", cc);"
- print " keyname_table[c] = strdup(name);"
+ print " MyTable[c] = strdup(name);"
print " }"
- print " result = keyname_table[c];"
+ print " result = MyTable[c];"
print " }"
print "#if NCURSES_EXT_FUNCS && NCURSES_XNAMES"
print " } else if (result == 0 && cur_term != 0) {"
print "void _nc_keyname_leaks(void)"
print "{"
print " int j;"
- print " if (keyname_table != 0) {"
+ print " if (MyTable != 0) {"
print " for (j = 0; j < SIZEOF_TABLE; ++j) {"
- print " FreeIfNeeded(keyname_table[j]);"
+ print " FreeIfNeeded(MyTable[j]);"
print " }"
- print " FreeAndNull(keyname_table);"
+ print " FreeAndNull(MyTable);"
print " }"
print "}"
print "#endif /* NO_LEAKS */"