From 776dc15d3809dbd893c878907960ad4ea556604d Mon Sep 17 00:00:00 2001 From: Kelley Cook Date: Fri, 18 Jun 2004 01:59:45 +0000 Subject: opts.sh: Delete. 2004-06-18 Kelley Cook * opts.sh: Delete. Break out generated code to next four files. * opt-gather.awk: New file. * optc-gen.awk: New file. * opth-gen.awk: New file. * opt-functions.awk: New common file. * Makefile.in: Update for above. * configure.ac: Update comment. * configure: Regenerate. From-SVN: r83333 --- gcc/opt-functions.awk | 76 +++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 76 insertions(+) create mode 100644 gcc/opt-functions.awk (limited to 'gcc/opt-functions.awk') diff --git a/gcc/opt-functions.awk b/gcc/opt-functions.awk new file mode 100644 index 0000000..a21f29d --- /dev/null +++ b/gcc/opt-functions.awk @@ -0,0 +1,76 @@ +# Copyright (C) 2003,2004 Free Software Foundation, Inc. +# Contributed by Kelley Cook, June 2004. +# Original code from Neil Booth, May 2003. +# +# This program is free software; you can redistribute it and/or modify it +# under the terms of the GNU General Public License as published by the +# Free Software Foundation; either version 2, or (at your option) any +# later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program; if not, write to the Free Software +# Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. + +# Some common subroutines for use by opt[ch]-gen.awk. + +function switch_flags (flags) +{ + flags = " " flags " " + result = "0" + for (j = 0; j < n_langs; j++) { + regex = " " langs[j] " " + gsub ( "\\+", "\\+", regex ) + if (flags ~ regex) + result = result " | " macros[j] + } + if (flags ~ " Common ") result = result " | CL_COMMON" + if (flags ~ " Joined ") result = result " | CL_JOINED" + if (flags ~ " JoinedOrMissing ") \ + result = result " | CL_JOINED | CL_MISSING_OK" + if (flags ~ " Separate ") result = result " | CL_SEPARATE" + if (flags ~ " RejectNegative ") result = result " | CL_REJECT_NEGATIVE" + if (flags ~ " UInteger ") result = result " | CL_UINTEGER" + if (flags ~ " Undocumented ") result = result " | CL_UNDOCUMENTED" + if (flags ~ " Report ") result = result " | CL_REPORT" + sub( "^0 \\| ", "", result ) + return result +} + +function var_args(flags) +{ + if (flags !~ "Var\\(") + return "" + sub(".*Var\\(", "", flags) + sub("\\).*", "", flags) + + return flags +} +function var_name(flags) +{ + s = var_args(flags) + if (s == "") + return ""; + sub( ",.*", "", s) + return s +} +function var_set(flags) +{ + s = var_args(flags) + if (s !~ ",") + return "0, 0" + sub( "[^,]*,", "", s) + return "1, " s +} +function var_ref(flags) +{ + name = var_name(flags) + if (name == "") + return "0" + else + return "&" name +} -- cgit v1.1