##############################################################################
-# Copyright (c) 2007 Free Software Foundation, Inc. #
+# Copyright (c) 2007,2008 Free Software Foundation, Inc. #
# #
# Permission is hereby granted, free of charge, to any person obtaining a #
# copy of this software and associated documentation files (the "Software"), #
# use or other dealings in this Software without prior written #
# authorization. #
##############################################################################
-# $Id: MKnames.awk,v 1.16 2007/08/18 21:37:52 tom Exp $
+# $Id: MKnames.awk,v 1.19 2008/06/28 23:13:13 tom Exp $
function large_item(value) {
result = sprintf("%d,", offset);
offset = offset + length(value) + 1;
printf "%s", value
print "};"
print ""
- printf "static char ** ptr_%s = 0;\n", name
+ printf "static NCURSES_CONST char ** ptr_%s = 0;\n", name
print ""
}
print_offsets("strnames", large_strnames);
print ""
print "static IT *"
- print "alloc_array(char ***value, const short *offsets, unsigned size)"
+ print "alloc_array(NCURSES_CONST char ***value, const short *offsets, unsigned size)"
print "{"
print " if (*value == 0) {"
- print " if ((*value = typeCalloc(char *, size + 1)) != 0) {"
+ print " if ((*value = typeCalloc(NCURSES_CONST char *, size + 1)) != 0) {"
print " unsigned n;"
print " for (n = 0; n < size; ++n) {"
print " (*value)[n] = _nc_name_blob + offsets[n];"
print "FIX(strnames)"
print "FIX(strfnames)"
print ""
+ print ""
+ print "#define FREE_FIX(it) if (ptr_##it) { FreeAndNull(ptr_##it); }"
+ print ""
+ print "#if NO_LEAKS"
+ print "NCURSES_EXPORT(void)"
+ print "_nc_names_leaks(void)"
+ print "{"
+ if (bigstrings) {
+ print "FREE_FIX(boolnames)"
+ print "FREE_FIX(boolfnames)"
+ print "FREE_FIX(numnames)"
+ print "FREE_FIX(numfnames)"
+ print "FREE_FIX(strnames)"
+ print "FREE_FIX(strfnames)"
+ }
+ print "}"
+ print "#endif"
+ print ""
print "#else"
print ""
print "#define DCL(it) NCURSES_EXPORT_VAR(IT) it[]"