Mercurial > hg > CbC > CbC_gcc
annotate gcc/opth-gen.awk @ 158:494b0b89df80 default tip
...
| author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
|---|---|
| date | Mon, 25 May 2020 18:13:55 +0900 |
| parents | 1830386684a0 |
| children |
| rev | line source |
|---|---|
| 145 | 1 # Copyright (C) 2003-2020 Free Software Foundation, Inc. |
| 0 | 2 # Contributed by Kelley Cook, June 2004. |
| 3 # Original code from Neil Booth, May 2003. | |
| 4 # | |
| 5 # This program is free software; you can redistribute it and/or modify it | |
| 6 # under the terms of the GNU General Public License as published by the | |
| 7 # Free Software Foundation; either version 3, or (at your option) any | |
| 8 # later version. | |
| 9 # | |
| 10 # This program is distributed in the hope that it will be useful, | |
| 11 # but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 13 # GNU General Public License for more details. | |
| 14 # | |
| 15 # You should have received a copy of the GNU General Public License | |
| 16 # along with this program; see the file COPYING3. If not see | |
| 17 # <http://www.gnu.org/licenses/>. | |
| 18 | |
| 19 # This Awk script reads in the option records generated from | |
| 20 # opt-gather.awk, combines the flags of duplicate options and generates a | |
| 21 # C header file. | |
| 22 # | |
| 111 | 23 # This program uses functions from opt-functions.awk and code from |
| 24 # opt-read.awk. | |
| 25 # Usage: awk -f opt-functions.awk -f opt-read.awk -f opth-gen.awk \ | |
| 26 # < inputfile > options.h | |
| 0 | 27 |
| 28 # Dump out an enumeration into a .h file. | |
| 29 # Combine the flags of duplicate options. | |
| 30 END { | |
| 31 print "/* This file is auto-generated by opth-gen.awk. */" | |
| 32 print "" | |
| 33 print "#ifndef OPTIONS_H" | |
| 34 print "#define OPTIONS_H" | |
| 35 print "" | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
36 print "#include \"flag-types.h\"" |
| 0 | 37 print "" |
| 38 | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
39 if (n_extra_h_includes > 0) { |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
40 for (i = 0; i < n_extra_h_includes; i++) { |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
41 print "#include " quote extra_h_includes[i] quote |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
42 } |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
43 print "" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
44 } |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
45 |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
46 print "#if !defined(IN_LIBGCC2) && !defined(IN_TARGET_LIBS) && !defined(IN_RTS)" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
47 print "#ifndef GENERATOR_FILE" |
| 111 | 48 print "#if !defined(IN_LIBGCC2) && !defined(IN_TARGET_LIBS)" |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
49 print "struct GTY(()) gcc_options" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
50 print "#else" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
51 print "struct gcc_options" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
52 print "#endif" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
53 print "{" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
54 print "#endif" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
55 |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
56 for (i = 0; i < n_extra_vars; i++) { |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
57 var = extra_vars[i] |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
58 sub(" *=.*", "", var) |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
59 orig_var = var |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
60 name = var |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
61 type = var |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
62 type_after = var |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
63 sub("^.*[ *]", "", name) |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
64 sub("\\[.*\\]$", "", name) |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
65 sub("\\[.*\\]$", "", type) |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
66 sub(" *" name "$", "", type) |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
67 sub("^.*" name, "", type_after) |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
68 var_seen[name] = 1 |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
69 print "#ifdef GENERATOR_FILE" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
70 print "extern " orig_var ";" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
71 print "#else" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
72 print " " type " x_" name type_after ";" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
73 print "#define " name " global_options.x_" name |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
74 print "#endif" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
75 } |
| 0 | 76 |
| 77 for (i = 0; i < n_opts; i++) { | |
| 78 if (flag_set_p("Save", flags[i])) | |
| 79 have_save = 1; | |
| 80 | |
| 81 name = var_name(flags[i]); | |
| 82 if (name == "") | |
| 83 continue; | |
| 84 | |
| 85 if (name in var_seen) | |
| 86 continue; | |
| 87 | |
| 88 var_seen[name] = 1; | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
89 print "#ifdef GENERATOR_FILE" |
| 0 | 90 print "extern " var_type(flags[i]) name ";" |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
91 print "#else" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
92 print " " var_type(flags[i]) "x_" name ";" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
93 print "#define " name " global_options.x_" name |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
94 print "#endif" |
| 0 | 95 } |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
96 for (i = 0; i < n_opts; i++) { |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
97 name = static_var(opts[i], flags[i]); |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
98 if (name != "") { |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
99 print "#ifndef GENERATOR_FILE" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
100 print " " var_type(flags[i]) "x_" name ";" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
101 print "#define x_" name " do_not_use" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
102 print "#endif" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
103 } |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
104 } |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
105 for (i = 0; i < n_opts; i++) { |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
106 if (flag_set_p("SetByCombined", flags[i])) { |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
107 print "#ifndef GENERATOR_FILE" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
108 print " bool frontend_set_" var_name(flags[i]) ";" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
109 print "#endif" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
110 } |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
111 } |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
112 print "#ifndef GENERATOR_FILE" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
113 print "};" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
114 print "extern struct gcc_options global_options;" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
115 print "extern const struct gcc_options global_options_init;" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
116 print "extern struct gcc_options global_options_set;" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
117 print "#define target_flags_explicit global_options_set.x_target_flags" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
118 print "#endif" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
119 print "#endif" |
| 0 | 120 print "" |
| 121 | |
| 122 # All of the optimization switches gathered together so they can be saved and restored. | |
| 123 # This will allow attribute((cold)) to turn on space optimization. | |
| 124 | |
| 125 # Change the type of normal switches from int to unsigned char to save space. | |
| 126 # Also, order the structure so that pointer fields occur first, then int | |
| 127 # fields, and then char fields to provide the best packing. | |
| 128 | |
| 111 | 129 print "#if !defined(IN_LIBGCC2) && !defined(IN_TARGET_LIBS) && !defined(IN_RTS)" |
| 0 | 130 print "" |
| 131 print "/* Structure to save/restore optimization and target specific options. */"; | |
|
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
132 print "struct GTY(()) cl_optimization"; |
| 0 | 133 print "{"; |
| 134 | |
| 145 | 135 n_opt_char = 4; |
| 0 | 136 n_opt_short = 0; |
| 137 n_opt_int = 0; | |
| 111 | 138 n_opt_enum = 0; |
| 0 | 139 n_opt_other = 0; |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
140 var_opt_char[0] = "unsigned char x_optimize"; |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
141 var_opt_char[1] = "unsigned char x_optimize_size"; |
| 111 | 142 var_opt_char[2] = "unsigned char x_optimize_debug"; |
| 145 | 143 var_opt_char[3] = "unsigned char x_optimize_fast"; |
| 0 | 144 |
| 145 for (i = 0; i < n_opts; i++) { | |
| 111 | 146 if (flag_set_p("(Optimization|PerFunction)", flags[i])) { |
| 0 | 147 name = var_name(flags[i]) |
| 148 if(name == "") | |
| 149 continue; | |
| 150 | |
| 151 if(name in var_opt_seen) | |
| 152 continue; | |
| 153 | |
| 154 var_opt_seen[name]++; | |
| 155 otype = var_type_struct(flags[i]); | |
| 156 if (otype ~ "^((un)?signed +)?int *$") | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
157 var_opt_int[n_opt_int++] = otype "x_" name; |
| 0 | 158 |
| 159 else if (otype ~ "^((un)?signed +)?short *$") | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
160 var_opt_short[n_opt_short++] = otype "x_" name; |
| 0 | 161 |
| 162 else if (otype ~ "^((un)?signed +)?char *$") | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
163 var_opt_char[n_opt_char++] = otype "x_" name; |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
164 |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
165 else if (otype ~ ("^enum +[_" alnum "]+ *$")) |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
166 var_opt_enum[n_opt_enum++] = otype "x_" name; |
| 0 | 167 |
| 168 else | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
169 var_opt_other[n_opt_other++] = otype "x_" name; |
| 0 | 170 } |
| 171 } | |
| 172 | |
| 173 for (i = 0; i < n_opt_other; i++) { | |
| 174 print " " var_opt_other[i] ";"; | |
| 175 } | |
| 176 | |
| 177 for (i = 0; i < n_opt_int; i++) { | |
| 178 print " " var_opt_int[i] ";"; | |
| 179 } | |
| 180 | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
181 for (i = 0; i < n_opt_enum; i++) { |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
182 print " " var_opt_enum[i] ";"; |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
183 } |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
184 |
| 0 | 185 for (i = 0; i < n_opt_short; i++) { |
| 186 print " " var_opt_short[i] ";"; | |
| 187 } | |
| 188 | |
| 189 for (i = 0; i < n_opt_char; i++) { | |
| 190 print " " var_opt_char[i] ";"; | |
| 191 } | |
| 192 | |
| 193 print "};"; | |
| 194 print ""; | |
| 195 | |
| 196 # Target and optimization save/restore/print functions. | |
| 197 print "/* Structure to save/restore selected target specific options. */"; | |
|
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
198 print "struct GTY(()) cl_target_option"; |
| 0 | 199 print "{"; |
| 200 | |
| 201 n_target_char = 0; | |
| 202 n_target_short = 0; | |
| 203 n_target_int = 0; | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
204 n_target_enum = 0; |
| 0 | 205 n_target_other = 0; |
| 206 | |
| 207 for (i = 0; i < n_target_save; i++) { | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
208 if (target_save_decl[i] ~ "^((un)?signed +)?int +[_" alnum "]+$") |
| 0 | 209 var_target_int[n_target_int++] = target_save_decl[i]; |
| 210 | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
211 else if (target_save_decl[i] ~ "^((un)?signed +)?short +[_" alnum "]+$") |
| 0 | 212 var_target_short[n_target_short++] = target_save_decl[i]; |
| 213 | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
214 else if (target_save_decl[i] ~ "^((un)?signed +)?char +[_ " alnum "]+$") |
| 0 | 215 var_target_char[n_target_char++] = target_save_decl[i]; |
| 216 | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
217 else if (target_save_decl[i] ~ ("^enum +[_" alnum "]+ +[_" alnum "]+$")) { |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
218 var_target_enum[n_target_enum++] = target_save_decl[i]; |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
219 } |
| 0 | 220 else |
| 221 var_target_other[n_target_other++] = target_save_decl[i]; | |
| 222 } | |
| 223 | |
| 224 if (have_save) { | |
| 225 for (i = 0; i < n_opts; i++) { | |
| 226 if (flag_set_p("Save", flags[i])) { | |
| 227 name = var_name(flags[i]) | |
| 228 if(name == "") | |
| 229 name = "target_flags"; | |
| 230 | |
| 231 if(name in var_save_seen) | |
| 232 continue; | |
| 233 | |
| 234 var_save_seen[name]++; | |
| 235 otype = var_type_struct(flags[i]) | |
| 236 if (otype ~ "^((un)?signed +)?int *$") | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
237 var_target_int[n_target_int++] = otype "x_" name; |
| 0 | 238 |
| 239 else if (otype ~ "^((un)?signed +)?short *$") | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
240 var_target_short[n_target_short++] = otype "x_" name; |
| 0 | 241 |
| 242 else if (otype ~ "^((un)?signed +)?char *$") | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
243 var_target_char[n_target_char++] = otype "x_" name; |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
244 |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
245 else if (otype ~ ("^enum +[_" alnum "]+ +[_" alnum "]+")) |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
246 var_target_enum[n_target_enum++] = otype "x_" name; |
| 0 | 247 |
| 248 else | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
249 var_target_other[n_target_other++] = otype "x_" name; |
| 0 | 250 } |
| 251 } | |
| 252 } else { | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
253 var_target_int[n_target_int++] = "int x_target_flags"; |
| 0 | 254 } |
| 255 | |
| 256 for (i = 0; i < n_target_other; i++) { | |
| 257 print " " var_target_other[i] ";"; | |
| 258 } | |
| 259 | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
260 for (i = 0; i < n_target_enum; i++) { |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
261 print " " var_target_enum[i] ";"; |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
262 } |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
263 |
| 0 | 264 for (i = 0; i < n_target_int; i++) { |
| 265 print " " var_target_int[i] ";"; | |
| 266 } | |
| 267 | |
| 268 for (i = 0; i < n_target_short; i++) { | |
| 269 print " " var_target_short[i] ";"; | |
| 270 } | |
| 271 | |
| 272 for (i = 0; i < n_target_char; i++) { | |
| 273 print " " var_target_char[i] ";"; | |
| 274 } | |
| 275 | |
| 276 print "};"; | |
| 277 print ""; | |
| 278 print ""; | |
| 279 print "/* Save optimization variables into a structure. */" | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
280 print "extern void cl_optimization_save (struct cl_optimization *, struct gcc_options *);"; |
| 0 | 281 print ""; |
| 282 print "/* Restore optimization variables from a structure. */"; | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
283 print "extern void cl_optimization_restore (struct gcc_options *, struct cl_optimization *);"; |
| 0 | 284 print ""; |
| 285 print "/* Print optimization variables from a structure. */"; | |
| 286 print "extern void cl_optimization_print (FILE *, int, struct cl_optimization *);"; | |
| 287 print ""; | |
| 111 | 288 print "/* Print different optimization variables from structures provided as arguments. */"; |
| 289 print "extern void cl_optimization_print_diff (FILE *, int, cl_optimization *ptr1, cl_optimization *ptr2);"; | |
| 290 print ""; | |
| 0 | 291 print "/* Save selected option variables into a structure. */" |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
292 print "extern void cl_target_option_save (struct cl_target_option *, struct gcc_options *);"; |
| 0 | 293 print ""; |
| 294 print "/* Restore selected option variables from a structure. */" | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
295 print "extern void cl_target_option_restore (struct gcc_options *, struct cl_target_option *);"; |
| 0 | 296 print ""; |
| 297 print "/* Print target option variables from a structure. */"; | |
| 298 print "extern void cl_target_option_print (FILE *, int, struct cl_target_option *);"; | |
| 111 | 299 print ""; |
| 300 print "/* Print different target option variables from structures provided as arguments. */"; | |
| 301 print "extern void cl_target_option_print_diff (FILE *, int, cl_target_option *ptr1, cl_target_option *ptr2);"; | |
| 302 print ""; | |
| 303 print "/* Compare two target option variables from a structure. */"; | |
| 304 print "extern bool cl_target_option_eq (const struct cl_target_option *, const struct cl_target_option *);"; | |
| 305 print ""; | |
| 145 | 306 print "/* Free heap memory used by target option variables. */"; |
| 307 print "extern void cl_target_option_free (struct cl_target_option *);"; | |
| 308 print ""; | |
| 111 | 309 print "/* Hash option variables from a structure. */"; |
| 310 print "extern hashval_t cl_target_option_hash (const struct cl_target_option *);"; | |
| 311 print ""; | |
| 312 print "/* Hash optimization from a structure. */"; | |
| 313 print "extern hashval_t cl_optimization_hash (const struct cl_optimization *);"; | |
| 314 print ""; | |
| 131 | 315 print "/* Compare two optimization options. */"; |
| 316 print "extern bool cl_optimization_option_eq (cl_optimization const *ptr1, cl_optimization const *ptr2);" | |
| 317 print ""; | |
| 145 | 318 print "/* Free heap memory used by optimization options. */"; |
| 319 print "extern void cl_optimization_option_free (cl_optimization *ptr1);" | |
| 320 print ""; | |
| 111 | 321 print "/* Generator files may not have access to location_t, and don't need these. */" |
| 322 print "#if defined(UNKNOWN_LOCATION)" | |
| 323 print "bool " | |
| 324 print "common_handle_option_auto (struct gcc_options *opts, " | |
| 325 print " struct gcc_options *opts_set, " | |
| 326 print " const struct cl_decoded_option *decoded, " | |
| 327 print " unsigned int lang_mask, int kind, " | |
| 328 print " location_t loc, " | |
| 329 print " const struct cl_option_handlers *handlers, " | |
| 330 print " diagnostic_context *dc); " | |
| 331 for (i = 0; i < n_langs; i++) { | |
| 332 lang_name = lang_sanitized_name(langs[i]); | |
| 131 | 333 print "bool" |
| 334 print lang_name "_handle_option_auto (struct gcc_options *opts," | |
| 335 print " struct gcc_options *opts_set," | |
| 336 print " size_t scode, const char *arg," | |
| 337 print " HOST_WIDE_INT value," | |
| 338 print " unsigned int lang_mask, int kind," | |
| 339 print " location_t loc," | |
| 340 print " const struct cl_option_handlers *handlers," | |
| 341 print " diagnostic_context *dc);" | |
| 111 | 342 } |
| 343 print "void cpp_handle_option_auto (const struct gcc_options * opts, size_t scode," | |
| 344 print " struct cpp_options * cpp_opts);" | |
| 345 print "void init_global_opts_from_cpp(struct gcc_options * opts, " | |
| 346 print " const struct cpp_options * cpp_opts);" | |
| 347 print "#endif"; | |
| 0 | 348 print "#endif"; |
| 349 print ""; | |
| 350 | |
| 351 for (i = 0; i < n_opts; i++) { | |
| 352 name = opt_args("Mask", flags[i]) | |
| 111 | 353 if (name == "") { |
| 354 opt = opt_args("InverseMask", flags[i]) | |
| 355 if (opt ~ ",") | |
| 356 name = nth_arg(0, opt) | |
| 357 else | |
| 358 name = opt | |
| 0 | 359 } |
| 111 | 360 if (name != "" && mask_bits[name] == 0) { |
| 361 mask_bits[name] = 1 | |
| 362 vname = var_name(flags[i]) | |
| 363 mask = "MASK_" | |
| 364 mask_1 = "1U" | |
| 365 if (vname != "") { | |
| 366 mask = "OPTION_MASK_" | |
| 367 if (host_wide_int[vname] == "yes") | |
| 368 mask_1 = "HOST_WIDE_INT_1U" | |
| 369 } else | |
| 370 extra_mask_bits[name] = 1 | |
| 371 print "#define " mask name " (" mask_1 " << " masknum[vname]++ ")" | |
| 372 } | |
| 0 | 373 } |
| 374 for (i = 0; i < n_extra_masks; i++) { | |
| 111 | 375 if (extra_mask_bits[extra_masks[i]] == 0) |
| 376 print "#define MASK_" extra_masks[i] " (1U << " masknum[""]++ ")" | |
| 0 | 377 } |
| 378 | |
| 379 for (var in masknum) { | |
| 111 | 380 if (var != "" && host_wide_int[var] == "yes") { |
| 381 print "#if defined(HOST_BITS_PER_WIDE_INT) && " masknum[var] " > HOST_BITS_PER_WIDE_INT" | |
| 382 print "#error too many masks for " var | |
| 383 print "#endif" | |
| 384 } | |
| 385 else if (masknum[var] > 32) { | |
| 0 | 386 if (var == "") |
| 387 print "#error too many target masks" | |
| 388 else | |
| 389 print "#error too many masks for " var | |
| 390 } | |
| 391 } | |
| 392 print "" | |
| 393 | |
| 394 for (i = 0; i < n_opts; i++) { | |
| 395 name = opt_args("Mask", flags[i]) | |
| 111 | 396 if (name == "") { |
| 397 opt = opt_args("InverseMask", flags[i]) | |
| 398 if (opt ~ ",") | |
| 399 name = nth_arg(0, opt) | |
| 400 else | |
| 401 name = opt | |
| 0 | 402 } |
| 111 | 403 if (name != "" && mask_macros[name] == 0) { |
| 404 mask_macros[name] = 1 | |
| 405 vname = var_name(flags[i]) | |
| 406 mask = "OPTION_MASK_" | |
| 407 if (vname == "") { | |
| 408 vname = "target_flags" | |
| 409 mask = "MASK_" | |
| 410 extra_mask_macros[name] = 1 | |
| 411 } | |
| 412 print "#define TARGET_" name \ | |
| 0 | 413 " ((" vname " & " mask name ") != 0)" |
| 111 | 414 print "#define TARGET_" name "_P(" vname ")" \ |
| 415 " (((" vname ") & " mask name ") != 0)" | |
| 416 } | |
| 0 | 417 } |
| 418 for (i = 0; i < n_extra_masks; i++) { | |
| 111 | 419 if (extra_mask_macros[extra_masks[i]] == 0) |
| 420 print "#define TARGET_" extra_masks[i] \ | |
| 421 " ((target_flags & MASK_" extra_masks[i] ") != 0)" | |
| 0 | 422 } |
| 423 print "" | |
| 424 | |
| 425 for (i = 0; i < n_opts; i++) { | |
| 426 opt = opt_args("InverseMask", flags[i]) | |
| 427 if (opt ~ ",") { | |
| 428 vname = var_name(flags[i]) | |
| 429 mask = "OPTION_MASK_" | |
| 430 if (vname == "") { | |
| 431 vname = "target_flags" | |
| 432 mask = "MASK_" | |
| 433 } | |
| 111 | 434 print "#define TARGET_" nth_arg(1, opt) \ |
| 0 | 435 " ((" vname " & " mask nth_arg(0, opt) ") == 0)" |
| 436 } | |
| 437 } | |
| 438 print "" | |
| 439 | |
| 440 for (i = 0; i < n_langs; i++) { | |
| 111 | 441 macros[i] = "CL_" lang_sanitized_name(langs[i]) |
| 0 | 442 s = substr(" ", length (macros[i])) |
| 111 | 443 print "#define " macros[i] s " (1U << " i ")" |
| 0 | 444 } |
| 111 | 445 print "#define CL_LANG_ALL ((1U << " n_langs ") - 1)" |
| 0 | 446 |
| 447 print "" | |
| 448 print "enum opt_code" | |
| 449 print "{" | |
| 450 | |
| 451 for (i = 0; i < n_opts; i++) | |
| 452 back_chain[i] = "N_OPTS"; | |
| 453 | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
454 enum_value = 0 |
| 0 | 455 for (i = 0; i < n_opts; i++) { |
| 456 # Combine the flags of identical switches. Switches | |
| 457 # appear many times if they are handled by many front | |
| 458 # ends, for example. | |
| 459 while( i + 1 != n_opts && opts[i] == opts[i + 1] ) { | |
| 460 flags[i + 1] = flags[i] " " flags[i + 1]; | |
| 461 i++; | |
| 462 } | |
| 463 | |
| 464 len = length (opts[i]); | |
|
63
b7f97abdc517
update gcc from gcc-4.5.0 to gcc-4.6
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
465 enum = opt_enum(opts[i]) |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
466 enum_string = enum " = " enum_value "," |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
467 |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
468 # Aliases do not get enumeration names. |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
469 if ((flag_set_p("Alias.*", flags[i]) \ |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
470 && !flag_set_p("SeparateAlias", flags[i])) \ |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
471 || flag_set_p("Ignore", flags[i])) { |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
472 enum_string = "/* " enum_string " */" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
473 } |
| 0 | 474 |
| 475 # If this switch takes joined arguments, back-chain all | |
| 476 # subsequent switches to it for which it is a prefix. If | |
| 477 # a later switch S is a longer prefix of a switch T, T | |
| 478 # will be back-chained to S in a later iteration of this | |
| 479 # for() loop, which is what we want. | |
| 480 if (flag_set_p("Joined.*", flags[i])) { | |
| 481 for (j = i + 1; j < n_opts; j++) { | |
| 482 if (substr (opts[j], 1, len) != opts[i]) | |
| 483 break; | |
| 484 back_chain[j] = enum; | |
| 485 } | |
| 486 } | |
| 487 | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
488 s = substr(" ", |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
489 length (enum_string)) |
| 0 | 490 |
| 491 if (help[i] == "") | |
| 492 hlp = "0" | |
| 493 else | |
| 494 hlp = "N_(\"" help[i] "\")"; | |
| 495 | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
496 print " " enum_string s "/* -" opts[i] " */" |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
497 enum_value++ |
| 0 | 498 } |
| 499 | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
500 print " N_OPTS," |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
501 print " OPT_SPECIAL_unknown," |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
502 print " OPT_SPECIAL_ignore," |
| 145 | 503 print " OPT_SPECIAL_warn_removed," |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
504 print " OPT_SPECIAL_program_name," |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
63
diff
changeset
|
505 print " OPT_SPECIAL_input_file" |
| 0 | 506 print "};" |
| 507 print "" | |
| 111 | 508 print "#ifdef GCC_C_COMMON_C" |
| 509 print "/* Mapping from cpp message reasons to the options that enable them. */" | |
| 510 print "#include <cpplib.h>" | |
| 511 print "struct cpp_reason_option_codes_t" | |
| 512 print "{" | |
| 131 | 513 print " /* cpplib message reason. */" |
| 514 print " const enum cpp_warning_reason reason;" | |
| 515 print " /* gcc option that controls this message. */" | |
| 516 print " const int option_code;" | |
| 111 | 517 print "};" |
| 518 print "" | |
| 519 print "static const struct cpp_reason_option_codes_t cpp_reason_option_codes[] = {" | |
| 520 for (i = 0; i < n_opts; i++) { | |
| 521 # With identical flags, pick only the last one. The | |
| 522 # earlier loop ensured that it has all flags merged, | |
| 523 # and a nonempty help text if one of the texts was nonempty. | |
| 524 while( i + 1 != n_opts && opts[i] == opts[i + 1] ) { | |
| 525 i++; | |
| 526 } | |
| 527 cpp_reason = nth_arg(0, opt_args("CppReason", flags[i])); | |
| 528 if (cpp_reason != "") { | |
| 529 cpp_reason = cpp_reason ","; | |
| 530 printf(" {%-40s %s},\n", cpp_reason, opt_enum(opts[i])) | |
| 531 } | |
| 532 } | |
| 533 printf(" {%-40s 0},\n", "CPP_W_NONE,") | |
| 534 print "};" | |
| 535 print "#endif" | |
| 536 print "" | |
| 0 | 537 print "#endif /* OPTIONS_H */" |
| 538 } |