ncurses 6.0 - patch 20160709

[ncurses.git] / ncurses / base / MKlib_gen.sh

diff --git a/ncurses/base/MKlib_gen.sh b/ncurses/base/MKlib_gen.sh
index 71a478f6c195621f9ee1b0c0c892ee8dddf77451..a25176f8ae4b91d90be02a741f17aa4404ba5b57 100755 (executable)
--- a/ncurses/base/MKlib_gen.sh
+++ b/ncurses/base/MKlib_gen.sh
@@ -2,10 +2,10 @@
 #
 # MKlib_gen.sh -- generate sources from curses.h macro definitions
 #
-# ($Id: MKlib_gen.sh,v 1.52 2015/10/10 19:36:47 tom Exp $)
+# ($Id: MKlib_gen.sh,v 1.54 2016/07/09 21:43:05 tom Exp $)
 #
 ##############################################################################
-# Copyright (c) 1998-2014,2015 Free Software Foundation, Inc.                #
+# Copyright (c) 1998-2015,2016 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"), #
@@ -231,7 +231,7 @@ $0 !~ /^P_/ {
        } else if ( $first == "bool" || $first == "NCURSES_BOOL" ) {
                returnType = "Bool";
        } else if ( $second == "*" ) {
-               returnType = "Ptr";
+               returnType = ($1 == "NCURSES_CONST") ? "CPtr" : "Ptr";
        } else {
                returnType = "Code";
        }
@@ -450,16 +450,16 @@ END               {
                        for (n = 1; n < start; ++n) {
                                value = calls[n];
                                if ( value !~ /P_POUNDC/ ) {
-                                       gsub(/[[:blank:]]+/," ",value);
-                                       sub(/^[[:alnum:]_]+ /,"",value);
+                                       gsub(/[ \t]+/," ",value);
+                                       sub(/^[0-9a-zA-Z_]+ /,"",value);
                                        sub(/^\* /,"",value);
-                                       gsub(/[[:alnum:]_]+ \* /,"",value);
+                                       gsub(/[0-9a-zA-Z_]+ \* /,"",value);
                                        gsub(/ (const) /," ",value);
                                        gsub(/ (int|short|attr_t|chtype|wchar_t|NCURSES_BOOL|NCURSES_OUTC|NCURSES_OUTC_sp|va_list) /," ",value);
                                        gsub(/ void /,"",value);
                                        sub(/^/,"call_",value);
-                                       gsub(/ (a[[:digit:]]|z) /, " 0 ", value);
-                                       gsub(/ int[[:blank:]]*[(][^)]+[)][(][^)]+[)]/, "0", value);
+                                       gsub(/ (a[0-9]|z) /, " 0 ", value);
+                                       gsub(/ int[ \t]*[(][^)]+[)][(][^)]+[)]/, "0", value);
                                        printf "\t%s;\n", value;
                                } else {
                                        print value;