Index: .gitignore =================================================================== --- .gitignore (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ .gitignore (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -1,8 +1,6 @@ # build files -*.[ado] +*.[ao] # generated by configure -Makefile -aclocal.m4 autom4te.cache config.h @@ -10,4 +8,5 @@ config.log stamp-h1 +Makefile driver/Makefile libcfa/Makefile @@ -15,16 +14,15 @@ # build directories +.deps +.dirstamp bin lib # src executables, for lib and bin -driver/cc1 -driver/cfa +src/driver/cc1 +src/driver/cfa src/cfa-cpp -libcfa/libcfa-prelude.c +src/libcfa/libcfa-prelude.c -# generated by bison and lex from cfa.y and lex.l, respectively -src/Parser/cfa.output -src/Parser/cfa.tab.cc -src/Parser/cfa.tab.h -src/Parser/lex.yy.cc +# generated by bison and lex from cfa.yy and lex.ll, respectively +src/Parser/parser.output Index: INSTALL =================================================================== --- INSTALL (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ INSTALL (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -3,5 +3,5 @@ Cforall is built using GNU Make and the GNU Autoconf system. It also requires -g++ version 3, bison and flex. On systems where GNU Make is the default make +g++ version 4, bison and flex. On systems where GNU Make is the default make it may suffice to build the system by entering the commands @@ -17,9 +17,9 @@ --prefix=/some/directory controls the path prefix common to all installed -cfa-cc components. Some components will be installed in /some/directory/bin, -others in /some/directory/lib. If unspecified, this defaults to /usr/local. + cfa-cc components. Some components will be installed in /some/directory/bin, + others in /some/directory/lib. If unspecified, this defaults to /usr/local. ---with-backend-compiler=PROGRAM specifies the installed path of gcc 3.2. It -defaults to the first command named 'gcc' in the current PATH. +--with-backend-compiler=PROGRAM specifies the installed path of gcc. It + defaults to the first command named 'gcc' in the current PATH. cfa-cc itself is built with the version of g++ specified by the environment Index: Makefile.am =================================================================== --- Makefile.am (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ Makefile.am (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -1,6 +1,20 @@ -SUBDIRS = driver libcfa src +######################## -*- Mode: Makefile-Automake -*- ###################### +## +## Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo +## +## The contents of this file are covered under the licence agreement in the +## file "LICENCE" distributed with Cforall. +## +## Makefile.am -- +## +## Author : Peter A. Buhr +## Created On : Sun May 31 22:14:18 2015 +## Last Modified By : Peter A. Buhr +## Last Modified On : Mon Jun 1 20:20:40 2015 +## Update Count : 5 +############################################################################### -# non-source files -EXTRA_DIST = Docs - -BACKEND_CC = @BACKEND_CC@ +AUTOMAKE_OPTIONS = foreign # do not require all the GNU file names +SUBDIRS = src/driver src src/libcfa # order important, src before libcfa because cfa-cpp used to build prelude +EXTRA_DIST = Docs # non-source files +BACKEND_CC = @BACKEND_CC@ # C compiler used to compile Cforall programs, versus C++ compiler used to build cfa command Index: Makefile.in =================================================================== --- Makefile.in (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ Makefile.in (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -15,4 +15,7 @@ @SET_MAKE@ + +######################## -*- Mode: Makefile-Automake -*- ###################### +############################################################################### VPATH = @srcdir@ pkgdatadir = $(datadir)/@PACKAGE@ @@ -35,18 +38,16 @@ DIST_COMMON = README $(am__configure_deps) $(srcdir)/Makefile.am \ $(srcdir)/Makefile.in $(srcdir)/config.h.in \ - $(top_srcdir)/configure $(top_srcdir)/driver/Makefile.in \ - $(top_srcdir)/libcfa/Makefile.in $(top_srcdir)/src/Makefile.in \ - $(top_srcdir)/src/examples/Makefile.in AUTHORS INSTALL TODO \ - install-sh missing mkinstalldirs + $(top_srcdir)/configure INSTALL automake/compile \ + automake/depcomp automake/install-sh automake/missing \ + automake/ylwrap ACLOCAL_M4 = $(top_srcdir)/aclocal.m4 -am__aclocal_m4_deps = $(top_srcdir)/configure.in +am__aclocal_m4_deps = $(top_srcdir)/configure.ac am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \ $(ACLOCAL_M4) am__CONFIG_DISTCLEAN_FILES = config.status config.cache config.log \ configure.lineno config.status.lineno -mkinstalldirs = $(SHELL) $(top_srcdir)/mkinstalldirs +mkinstalldirs = $(install_sh) -d CONFIG_HEADER = config.h -CONFIG_CLEAN_FILES = src/Makefile driver/Makefile libcfa/Makefile \ - src/examples/Makefile +CONFIG_CLEAN_FILES = CONFIG_CLEAN_VPATH_FILES = SOURCES = @@ -108,4 +109,5 @@ distcleancheck_listfiles = find . -type f -print ACLOCAL = @ACLOCAL@ +ALLOCA = @ALLOCA@ AMTAR = @AMTAR@ AUTOCONF = @AUTOCONF@ @@ -113,5 +115,5 @@ AUTOMAKE = @AUTOMAKE@ AWK = @AWK@ -BACKEND_CC = @BACKEND_CC@ +BACKEND_CC = @BACKEND_CC@ # C compiler used to compile Cforall programs, versus C++ compiler used to build cfa command CC = @CC@ CCDEPMODE = @CCDEPMODE@ @@ -123,5 +125,4 @@ CPP = @CPP@ CPPFLAGS = @CPPFLAGS@ -CPP_PATH = @CPP_PATH@ CXX = @CXX@ CXXDEPMODE = @CXXDEPMODE@ @@ -149,4 +150,5 @@ LIBS = @LIBS@ LTLIBOBJS = @LTLIBOBJS@ +MAINT = @MAINT@ MAKEINFO = @MAKEINFO@ MKDIR_P = @MKDIR_P@ @@ -160,4 +162,5 @@ PACKAGE_VERSION = @PACKAGE_VERSION@ PATH_SEPARATOR = @PATH_SEPARATOR@ +RANLIB = @RANLIB@ SET_MAKE = @SET_MAKE@ SHELL = @SHELL@ @@ -199,5 +202,4 @@ pdfdir = @pdfdir@ prefix = @prefix@ -preludedir = @preludedir@ program_transform_name = @program_transform_name@ psdir = @psdir@ @@ -210,8 +212,7 @@ top_builddir = @top_builddir@ top_srcdir = @top_srcdir@ -SUBDIRS = driver libcfa src - -# non-source files -EXTRA_DIST = Docs +AUTOMAKE_OPTIONS = foreign # do not require all the GNU file names +SUBDIRS = src/driver src src/libcfa # order important, src before libcfa because cfa-cpp used to build prelude +EXTRA_DIST = Docs # non-source files all: config.h $(MAKE) $(AM_MAKEFLAGS) all-recursive @@ -220,5 +221,5 @@ am--refresh: Makefile @: -$(srcdir)/Makefile.in: $(srcdir)/Makefile.am $(am__configure_deps) +$(srcdir)/Makefile.in: @MAINTAINER_MODE_TRUE@ $(srcdir)/Makefile.am $(am__configure_deps) @for dep in $?; do \ case '$(am__configure_deps)' in \ @@ -247,7 +248,7 @@ $(SHELL) ./config.status --recheck -$(top_srcdir)/configure: $(am__configure_deps) +$(top_srcdir)/configure: @MAINTAINER_MODE_TRUE@ $(am__configure_deps) $(am__cd) $(srcdir) && $(AUTOCONF) -$(ACLOCAL_M4): $(am__aclocal_m4_deps) +$(ACLOCAL_M4): @MAINTAINER_MODE_TRUE@ $(am__aclocal_m4_deps) $(am__cd) $(srcdir) && $(ACLOCAL) $(ACLOCAL_AMFLAGS) $(am__aclocal_m4_deps): @@ -260,5 +261,5 @@ @rm -f stamp-h1 cd $(top_builddir) && $(SHELL) ./config.status config.h -$(srcdir)/config.h.in: $(am__configure_deps) +$(srcdir)/config.h.in: @MAINTAINER_MODE_TRUE@ $(am__configure_deps) ($(am__cd) $(top_srcdir) && $(AUTOHEADER)) rm -f stamp-h1 @@ -267,12 +268,4 @@ distclean-hdr: -rm -f config.h stamp-h1 -src/Makefile: $(top_builddir)/config.status $(top_srcdir)/src/Makefile.in - cd $(top_builddir) && $(SHELL) ./config.status $@ -driver/Makefile: $(top_builddir)/config.status $(top_srcdir)/driver/Makefile.in - cd $(top_builddir) && $(SHELL) ./config.status $@ -libcfa/Makefile: $(top_builddir)/config.status $(top_srcdir)/libcfa/Makefile.in - cd $(top_builddir) && $(SHELL) ./config.status $@ -src/examples/Makefile: $(top_builddir)/config.status $(top_srcdir)/src/examples/Makefile.in - cd $(top_builddir) && $(SHELL) ./config.status $@ # This directory's subdirectories are mostly independent; you can cd Index: README =================================================================== --- README (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ README (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -2,81 +2,73 @@ ====================================== -This is a PRE-RELEASE version of cfa-cc. It exists solely for the -purpose of private experimentation and scholarly research. The authors -disclaim all responsibility for the consequences of any malfunction of -the software, including the malfunction of any programs compiled using -the software. +This is a PRE-RELEASE version of cfa-cc. It exists solely for the purpose of +private experimentation and scholarly research. The authors disclaim all +responsibility for the consequences of any malfunction of the software, +including the malfunction of any programs compiled using the software. What is Cforall? ---------------- -Cforall is a language design extending ISO C. The purpose of the -project is to engineer modern language features into C in an -evolutionary rather than revolutionary way. Java is an example of the -revolutionary approach of modernizing C/C++, resulting in a new -language rather than an extension of its descendents. C++, Fortran 95 -and Cobol 9X are examples of the evolutionary approach where modern -language features are added and problems fixed within the framework of -an existing language. +Cforall is a language design extending ISO C. The purpose of the project is to +engineer modern language features into C in an evolutionary rather than +revolutionary way. Java is an example of the revolutionary approach of +modernizing C/C++, resulting in a new language rather than an extension of its +descendents. C++, Fortran 95 and Cobol 9X are examples of the evolutionary +approach where modern language features are added and problems fixed within the +framework of an existing language. -The goal of this project is to produce a largely backwards compatible -version of C containing many modern language features and fixing some -of the well known C problems. Without continued development of the -language, C will be unable to cope with the needs of modern programming -problems and programmers; as a result, it will fade into disuse. -Considering the large body of existing C code and programmers, there is -a significant impetus to ensure C is transformed into a modern -programming language. +The goal of this project is to produce a largely backwards compatible version +of C containing many modern language features and fixing some of the well known +C problems. Without continued development of the language, C will be unable to +cope with the needs of modern programming problems and programmers; as a +result, it will fade into disuse. Considering the large body of existing C +code and programmers, there is a significant impetus to ensure C is transformed +into a modern programming language. What is cfa-cc? --------------- -cfa-cc is a collection of programs centred around a translator that -takes Cforall code as input and outputs corresponding C code. This -is complemented by a compiler driver in the style of "gcc", which -handles preprocessing, compiling, assembling, and linking and invokes -the translator at appropriate moments. +cfa-cc is a collection of programs centred around a translator that takes +Cforall code as input and outputs corresponding C code. This is complemented +by a compiler driver in the style of "gcc", which handles preprocessing, +compiling, assembling, and linking and invokes the translator at appropriate +moments. What is required in order to use cfa-cc? ---------------------------------------- -Building cfa-cc requires GNU Make and gcc/g++ 3. cfa-cc is written in -C++. +Building cfa-cc requires GNU Make and gcc/g++ 4. cfa-cc is written in C++. -The compiler driver uses an installed version of gcc to handle all -aspects of the compilation process except for the Cforall->C translation. -Currently, only gcc 3.2 is supported. +The compiler driver uses an installed version of gcc to handle all aspects of +the compilation process except for the Cforall->C translation. Currently, only +gcc 4.x is supported. How is cfa-cc used? ------------------- -The compiler driver "cfa" accepts all of the arguments of gcc, and is -used in the same way. For example: +The compiler driver "cfa" accepts all of the arguments of gcc, and is used in +the same way. For example: cfa -c test.c cfa test.o -Cforall source files must end with '.c' in order to be compiled by the -compiler driver. In addition, the flag "-CFA" causes cfa to invoke the -preprocessor and translator and send the translator output to standard -output. +Cforall source files must end with '.c' in order to be compiled by the compiler +driver. In addition, the flag "-CFA" causes cfa to invoke the preprocessor and +translator and send the translator output to standard output. -In cases where the compiler driver is not useful (i.e., where gcc 3.2 -is not available), it is still possible to invoke the translator -directly. The translator is installed by default as -/usr/local/lib/cfa-cpp. A typical invocation is: +It is possible to invoke the translator directly. The translator is installed +by default as /usr/local/lib/cfa-cpp. A typical invocation is: /usr/local/lib/cfa-cpp -cp infile outfile -If outfile is omitted, output goes to standard output; if infile is -also omitted, input comes from standard input. Options to the -translator other than "-cp" will not produce valid C code and are only -useful for debugging the translator. +If outfile is omitted, output goes to standard output; if infile is also +omitted, input comes from standard input. Options to the translator other than +"-cp" will not produce valid C code and are only useful for debugging the +translator. How can C code be used with cfa-cc? ----------------------------------- -cfa-cc should be able to compile most ANSI C programs. It is also -possible to link against C libraries in most cases. Since Cforall -supports overloading, however, names used in Cforall code are -mangled in the output C code. This will cause linker failures when -the names refer to functions and objects in code compiled with -a standard C compiler. For this reason, it is necessary to enclose -the declarations of these functions and objects in extern "C" {} +cfa-cc should be able to compile most ANSI C programs. It is also possible to +link against C libraries in most cases. Since Cforall supports overloading, +however, names used in Cforall code are mangled in the output C code. This +caused linker failures when the names refer to functions and objects in code +compiled with a standard C compiler. For this reason, it is necessary to +enclose the declarations of these functions and objects in extern "C" {} blocks. For example: @@ -87,38 +79,32 @@ The extern "C" turns off name mangling for functions and objects declared -within the block. As a result, it is not possible to overload their -names. - -It is our intention to have a transparent solution to this problem -in place for our first official release. +within the block. As a result, it is not possible to overload their names. What's wrong with cfa-cc? ------------------------- -The authors consider this software to be in an unstable state. It is -quite likely that there are many reasonable programs that will fail -to compile. We encourage users to report their experiences to -cforall@plg.uwaterloo.ca, but we make no promises regarding support. -We have fixed most of the problems that we are aware of. There are -some exceptions: +The authors consider this software to be in an unstable state. It is quite +likely that there are many reasonable programs that will fail to compile. We +encourage users to report their experiences to cforall@plg.uwaterloo.ca, but we +make no promises regarding support. - - initializers are poorly implemented; in particular, - file-scope initializers may result in the generation of invalid - C code +We have fixed most of the problems that we are aware of. There are some +exceptions: - - the ISO C99 designated initialization syntax '[n] = m' or - '.n = m' is not supported; use a colon in place of the equal sign - - - some legitimate programs will produce warnings from the C - compiler; these are harmless (in particular, the creation of - libcfa.a in the build process should cause four warnings from - gcc) +- initializers are poorly implemented; in particular, file-scope initializers + may result in the generation of invalid C code - - abstract types introduced using the keyword 'type' are not - implemented (although 'type' can be used to introduce type - parameters) +- the ISO C99 designated initialization syntax '[n] = m' or '.n = m' is not + supported; use a colon in place of the equal sign - - the implicit coercion of structure types to the type of their - first member is not implemented +- some legitimate programs will produce warnings from the C compiler; these are + harmless (in particular, the creation of libcfa.a in the build process should + cause four warnings from gcc) + +- abstract types introduced using the keyword 'type' are not implemented + (although 'type' can be used to introduce type parameters) + +- the implicit coercion of structure types to the type of their first member is + not implemented Who is responsible for cfa-cc? Index: aclocal.m4 =================================================================== --- aclocal.m4 (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ aclocal.m4 (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -417,16 +417,4 @@ ]) -# Copyright (C) 1996, 1997, 2000, 2001, 2003, 2005 -# Free Software Foundation, Inc. -# -# This file is free software; the Free Software Foundation -# gives unlimited permission to copy and/or distribute it, -# with or without modifications, as long as this notice is preserved. - -# serial 8 - -# AM_CONFIG_HEADER is obsolete. It has been replaced by AC_CONFIG_HEADERS. -AU_DEFUN([AM_CONFIG_HEADER], [AC_CONFIG_HEADERS($@)]) - # Do all the work for Automake. -*- Autoconf -*- @@ -613,6 +601,9 @@ AC_SUBST([am__leading_dot])]) -# Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2005 -# Free Software Foundation, Inc. +# Add --enable-maintainer-mode option to configure. -*- Autoconf -*- +# From Jim Meyering + +# Copyright (C) 1996, 1998, 2000, 2001, 2002, 2003, 2004, 2005, 2008, +# 2011 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation @@ -622,15 +613,31 @@ # serial 5 -# AM_PROG_LEX -# ----------- -# Autoconf leaves LEX=: if lex or flex can't be found. Change that to a -# "missing" invocation, for better error output. -AC_DEFUN([AM_PROG_LEX], -[AC_PREREQ(2.50)dnl -AC_REQUIRE([AM_MISSING_HAS_RUN])dnl -AC_REQUIRE([AC_PROG_LEX])dnl -if test "$LEX" = :; then - LEX=${am_missing_run}flex -fi]) +# AM_MAINTAINER_MODE([DEFAULT-MODE]) +# ---------------------------------- +# Control maintainer-specific portions of Makefiles. +# Default is to disable them, unless `enable' is passed literally. +# For symmetry, `disable' may be passed as well. Anyway, the user +# can override the default with the --enable/--disable switch. +AC_DEFUN([AM_MAINTAINER_MODE], +[m4_case(m4_default([$1], [disable]), + [enable], [m4_define([am_maintainer_other], [disable])], + [disable], [m4_define([am_maintainer_other], [enable])], + [m4_define([am_maintainer_other], [enable]) + m4_warn([syntax], [unexpected argument to AM@&t@_MAINTAINER_MODE: $1])]) +AC_MSG_CHECKING([whether to enable maintainer-specific portions of Makefiles]) + dnl maintainer-mode's default is 'disable' unless 'enable' is passed + AC_ARG_ENABLE([maintainer-mode], +[ --][am_maintainer_other][-maintainer-mode am_maintainer_other make rules and dependencies not useful + (and sometimes confusing) to the casual installer], + [USE_MAINTAINER_MODE=$enableval], + [USE_MAINTAINER_MODE=]m4_if(am_maintainer_other, [enable], [no], [yes])) + AC_MSG_RESULT([$USE_MAINTAINER_MODE]) + AM_CONDITIONAL([MAINTAINER_MODE], [test $USE_MAINTAINER_MODE = yes]) + MAINT=$MAINTAINER_MODE_TRUE + AC_SUBST([MAINT])dnl +] +) + +AU_DEFUN([jm_MAINTAINER_MODE], [AM_MAINTAINER_MODE]) # Check to see how 'make' treats includes. -*- Autoconf -*- @@ -684,4 +691,39 @@ AC_MSG_RESULT([$_am_result]) rm -f confinc confmf +]) + +# Copyright (C) 1999, 2000, 2001, 2003, 2004, 2005, 2008 +# Free Software Foundation, Inc. +# +# This file is free software; the Free Software Foundation +# gives unlimited permission to copy and/or distribute it, +# with or without modifications, as long as this notice is preserved. + +# serial 6 + +# AM_PROG_CC_C_O +# -------------- +# Like AC_PROG_CC_C_O, but changed for automake. +AC_DEFUN([AM_PROG_CC_C_O], +[AC_REQUIRE([AC_PROG_CC_C_O])dnl +AC_REQUIRE([AM_AUX_DIR_EXPAND])dnl +AC_REQUIRE_AUX_FILE([compile])dnl +# FIXME: we rely on the cache variable name because +# there is no other way. +set dummy $CC +am_cc=`echo $[2] | sed ['s/[^a-zA-Z0-9_]/_/g;s/^[0-9]/_/']` +eval am_t=\$ac_cv_prog_cc_${am_cc}_c_o +if test "$am_t" != yes; then + # Losing compiler, so override with the script. + # FIXME: It is wrong to rewrite CC. + # But if we don't then we get into trouble of one sort or another. + # A longer-term fix would be to have automake use am__CC in this case, + # and then we could set am__CC="\$(top_srcdir)/compile \$(CC)" + CC="$am_aux_dir/compile $CC" +fi +dnl Make sure AC_PROG_CC is never called again, or it will override our +dnl setting of CC. +m4_define([AC_PROG_CC], + [m4_fatal([AC_PROG_CC cannot be called after AM_PROG_CC_C_O])]) ]) Index: automake/compile =================================================================== --- automake/compile (revision 937e51d79693364ccc3aec416b5db0894464e624) +++ automake/compile (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -0,0 +1,310 @@ +#! /bin/sh +# Wrapper for compilers which do not understand '-c -o'. + +scriptversion=2012-01-04.17; # UTC + +# Copyright (C) 1999, 2000, 2003, 2004, 2005, 2009, 2010, 2012 Free +# Software Foundation, Inc. +# Written by Tom Tromey . +# +# 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, see . + +# As a special exception to the GNU General Public License, if you +# distribute this file as part of a program that contains a +# configuration script generated by Autoconf, you may include it under +# the same distribution terms that you use for the rest of that program. + +# This file is maintained in Automake, please report +# bugs to or send patches to +# . + +nl=' +' + +# We need space, tab and new line, in precisely that order. Quoting is +# there to prevent tools from complaining about whitespace usage. +IFS=" "" $nl" + +file_conv= + +# func_file_conv build_file lazy +# Convert a $build file to $host form and store it in $file +# Currently only supports Windows hosts. If the determined conversion +# type is listed in (the comma separated) LAZY, no conversion will +# take place. +func_file_conv () +{ + file=$1 + case $file in + / | /[!/]*) # absolute file, and not a UNC file + if test -z "$file_conv"; then + # lazily determine how to convert abs files + case `uname -s` in + MINGW*) + file_conv=mingw + ;; + CYGWIN*) + file_conv=cygwin + ;; + *) + file_conv=wine + ;; + esac + fi + case $file_conv/,$2, in + *,$file_conv,*) + ;; + mingw/*) + file=`cmd //C echo "$file " | sed -e 's/"\(.*\) " *$/\1/'` + ;; + cygwin/*) + file=`cygpath -m "$file" || echo "$file"` + ;; + wine/*) + file=`winepath -w "$file" || echo "$file"` + ;; + esac + ;; + esac +} + +# func_cl_wrapper cl arg... +# Adjust compile command to suit cl +func_cl_wrapper () +{ + # Assume a capable shell + lib_path= + shared=: + linker_opts= + for arg + do + if test -n "$eat"; then + eat= + else + case $1 in + -o) + # configure might choose to run compile as 'compile cc -o foo foo.c'. + eat=1 + case $2 in + *.o | *.[oO][bB][jJ]) + func_file_conv "$2" + set x "$@" -Fo"$file" + shift + ;; + *) + func_file_conv "$2" + set x "$@" -Fe"$file" + shift + ;; + esac + ;; + -I*) + func_file_conv "${1#-I}" mingw + set x "$@" -I"$file" + shift + ;; + -l*) + lib=${1#-l} + found=no + save_IFS=$IFS + IFS=';' + for dir in $lib_path $LIB + do + IFS=$save_IFS + if $shared && test -f "$dir/$lib.dll.lib"; then + found=yes + set x "$@" "$dir/$lib.dll.lib" + break + fi + if test -f "$dir/$lib.lib"; then + found=yes + set x "$@" "$dir/$lib.lib" + break + fi + done + IFS=$save_IFS + + test "$found" != yes && set x "$@" "$lib.lib" + shift + ;; + -L*) + func_file_conv "${1#-L}" + if test -z "$lib_path"; then + lib_path=$file + else + lib_path="$lib_path;$file" + fi + linker_opts="$linker_opts -LIBPATH:$file" + ;; + -static) + shared=false + ;; + -Wl,*) + arg=${1#-Wl,} + save_ifs="$IFS"; IFS=',' + for flag in $arg; do + IFS="$save_ifs" + linker_opts="$linker_opts $flag" + done + IFS="$save_ifs" + ;; + -Xlinker) + eat=1 + linker_opts="$linker_opts $2" + ;; + -*) + set x "$@" "$1" + shift + ;; + *.cc | *.CC | *.cxx | *.CXX | *.[cC]++) + func_file_conv "$1" + set x "$@" -Tp"$file" + shift + ;; + *.c | *.cpp | *.CPP | *.lib | *.LIB | *.Lib | *.OBJ | *.obj | *.[oO]) + func_file_conv "$1" mingw + set x "$@" "$file" + shift + ;; + *) + set x "$@" "$1" + shift + ;; + esac + fi + shift + done + if test -n "$linker_opts"; then + linker_opts="-link$linker_opts" + fi + exec "$@" $linker_opts + exit 1 +} + +eat= + +case $1 in + '') + echo "$0: No command. Try '$0 --help' for more information." 1>&2 + exit 1; + ;; + -h | --h*) + cat <<\EOF +Usage: compile [--help] [--version] PROGRAM [ARGS] + +Wrapper for compilers which do not understand '-c -o'. +Remove '-o dest.o' from ARGS, run PROGRAM with the remaining +arguments, and rename the output as expected. + +If you are trying to build a whole package this is not the +right script to run: please start by reading the file 'INSTALL'. + +Report bugs to . +EOF + exit $? + ;; + -v | --v*) + echo "compile $scriptversion" + exit $? + ;; + cl | *[/\\]cl | cl.exe | *[/\\]cl.exe ) + func_cl_wrapper "$@" # Doesn't return... + ;; +esac + +ofile= +cfile= + +for arg +do + if test -n "$eat"; then + eat= + else + case $1 in + -o) + # configure might choose to run compile as 'compile cc -o foo foo.c'. + # So we strip '-o arg' only if arg is an object. + eat=1 + case $2 in + *.o | *.obj) + ofile=$2 + ;; + *) + set x "$@" -o "$2" + shift + ;; + esac + ;; + *.c) + cfile=$1 + set x "$@" "$1" + shift + ;; + *) + set x "$@" "$1" + shift + ;; + esac + fi + shift +done + +if test -z "$ofile" || test -z "$cfile"; then + # If no '-o' option was seen then we might have been invoked from a + # pattern rule where we don't need one. That is ok -- this is a + # normal compilation that the losing compiler can handle. If no + # '.c' file was seen then we are probably linking. That is also + # ok. + exec "$@" +fi + +# Name of file we expect compiler to create. +cofile=`echo "$cfile" | sed 's|^.*[\\/]||; s|^[a-zA-Z]:||; s/\.c$/.o/'` + +# Create the lock directory. +# Note: use '[/\\:.-]' here to ensure that we don't use the same name +# that we are using for the .o file. Also, base the name on the expected +# object file name, since that is what matters with a parallel build. +lockdir=`echo "$cofile" | sed -e 's|[/\\:.-]|_|g'`.d +while true; do + if mkdir "$lockdir" >/dev/null 2>&1; then + break + fi + sleep 1 +done +# FIXME: race condition here if user kills between mkdir and trap. +trap "rmdir '$lockdir'; exit 1" 1 2 15 + +# Run the compile. +"$@" +ret=$? + +if test -f "$cofile"; then + test "$cofile" = "$ofile" || mv "$cofile" "$ofile" +elif test -f "${cofile}bj"; then + test "${cofile}bj" = "$ofile" || mv "${cofile}bj" "$ofile" +fi + +rmdir "$lockdir" +exit $ret + +# Local Variables: +# mode: shell-script +# sh-indentation: 2 +# eval: (add-hook 'write-file-hooks 'time-stamp) +# time-stamp-start: "scriptversion=" +# time-stamp-format: "%:y-%02m-%02d.%02H" +# time-stamp-time-zone: "UTC" +# time-stamp-end: "; # UTC" +# End: Index: automake/depcomp =================================================================== --- automake/depcomp (revision 937e51d79693364ccc3aec416b5db0894464e624) +++ automake/depcomp (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -0,0 +1,688 @@ +#! /bin/sh +# depcomp - compile a program generating dependencies as side-effects + +scriptversion=2011-12-04.11; # UTC + +# Copyright (C) 1999, 2000, 2003, 2004, 2005, 2006, 2007, 2009, 2010, +# 2011 Free Software Foundation, Inc. + +# 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, see . + +# As a special exception to the GNU General Public License, if you +# distribute this file as part of a program that contains a +# configuration script generated by Autoconf, you may include it under +# the same distribution terms that you use for the rest of that program. + +# Originally written by Alexandre Oliva . + +case $1 in + '') + echo "$0: No command. Try \`$0 --help' for more information." 1>&2 + exit 1; + ;; + -h | --h*) + cat <<\EOF +Usage: depcomp [--help] [--version] PROGRAM [ARGS] + +Run PROGRAMS ARGS to compile a file, generating dependencies +as side-effects. + +Environment variables: + depmode Dependency tracking mode. + source Source file read by `PROGRAMS ARGS'. + object Object file output by `PROGRAMS ARGS'. + DEPDIR directory where to store dependencies. + depfile Dependency file to output. + tmpdepfile Temporary file to use when outputting dependencies. + libtool Whether libtool is used (yes/no). + +Report bugs to . +EOF + exit $? + ;; + -v | --v*) + echo "depcomp $scriptversion" + exit $? + ;; +esac + +if test -z "$depmode" || test -z "$source" || test -z "$object"; then + echo "depcomp: Variables source, object and depmode must be set" 1>&2 + exit 1 +fi + +# Dependencies for sub/bar.o or sub/bar.obj go into sub/.deps/bar.Po. +depfile=${depfile-`echo "$object" | + sed 's|[^\\/]*$|'${DEPDIR-.deps}'/&|;s|\.\([^.]*\)$|.P\1|;s|Pobj$|Po|'`} +tmpdepfile=${tmpdepfile-`echo "$depfile" | sed 's/\.\([^.]*\)$/.T\1/'`} + +rm -f "$tmpdepfile" + +# Some modes work just like other modes, but use different flags. We +# parameterize here, but still list the modes in the big case below, +# to make depend.m4 easier to write. Note that we *cannot* use a case +# here, because this file can only contain one case statement. +if test "$depmode" = hp; then + # HP compiler uses -M and no extra arg. + gccflag=-M + depmode=gcc +fi + +if test "$depmode" = dashXmstdout; then + # This is just like dashmstdout with a different argument. + dashmflag=-xM + depmode=dashmstdout +fi + +cygpath_u="cygpath -u -f -" +if test "$depmode" = msvcmsys; then + # This is just like msvisualcpp but w/o cygpath translation. + # Just convert the backslash-escaped backslashes to single forward + # slashes to satisfy depend.m4 + cygpath_u='sed s,\\\\,/,g' + depmode=msvisualcpp +fi + +if test "$depmode" = msvc7msys; then + # This is just like msvc7 but w/o cygpath translation. + # Just convert the backslash-escaped backslashes to single forward + # slashes to satisfy depend.m4 + cygpath_u='sed s,\\\\,/,g' + depmode=msvc7 +fi + +case "$depmode" in +gcc3) +## gcc 3 implements dependency tracking that does exactly what +## we want. Yay! Note: for some reason libtool 1.4 doesn't like +## it if -MD -MP comes after the -MF stuff. Hmm. +## Unfortunately, FreeBSD c89 acceptance of flags depends upon +## the command line argument order; so add the flags where they +## appear in depend2.am. Note that the slowdown incurred here +## affects only configure: in makefiles, %FASTDEP% shortcuts this. + for arg + do + case $arg in + -c) set fnord "$@" -MT "$object" -MD -MP -MF "$tmpdepfile" "$arg" ;; + *) set fnord "$@" "$arg" ;; + esac + shift # fnord + shift # $arg + done + "$@" + stat=$? + if test $stat -eq 0; then : + else + rm -f "$tmpdepfile" + exit $stat + fi + mv "$tmpdepfile" "$depfile" + ;; + +gcc) +## There are various ways to get dependency output from gcc. Here's +## why we pick this rather obscure method: +## - Don't want to use -MD because we'd like the dependencies to end +## up in a subdir. Having to rename by hand is ugly. +## (We might end up doing this anyway to support other compilers.) +## - The DEPENDENCIES_OUTPUT environment variable makes gcc act like +## -MM, not -M (despite what the docs say). +## - Using -M directly means running the compiler twice (even worse +## than renaming). + if test -z "$gccflag"; then + gccflag=-MD, + fi + "$@" -Wp,"$gccflag$tmpdepfile" + stat=$? + if test $stat -eq 0; then : + else + rm -f "$tmpdepfile" + exit $stat + fi + rm -f "$depfile" + echo "$object : \\" > "$depfile" + alpha=ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz +## The second -e expression handles DOS-style file names with drive letters. + sed -e 's/^[^:]*: / /' \ + -e 's/^['$alpha']:\/[^:]*: / /' < "$tmpdepfile" >> "$depfile" +## This next piece of magic avoids the `deleted header file' problem. +## The problem is that when a header file which appears in a .P file +## is deleted, the dependency causes make to die (because there is +## typically no way to rebuild the header). We avoid this by adding +## dummy dependencies for each header file. Too bad gcc doesn't do +## this for us directly. + tr ' ' ' +' < "$tmpdepfile" | +## Some versions of gcc put a space before the `:'. On the theory +## that the space means something, we add a space to the output as +## well. hp depmode also adds that space, but also prefixes the VPATH +## to the object. Take care to not repeat it in the output. +## Some versions of the HPUX 10.20 sed can't process this invocation +## correctly. Breaking it into two sed invocations is a workaround. + sed -e 's/^\\$//' -e '/^$/d' -e "s|.*$object$||" -e '/:$/d' \ + | sed -e 's/$/ :/' >> "$depfile" + rm -f "$tmpdepfile" + ;; + +hp) + # This case exists only to let depend.m4 do its work. It works by + # looking at the text of this script. This case will never be run, + # since it is checked for above. + exit 1 + ;; + +sgi) + if test "$libtool" = yes; then + "$@" "-Wp,-MDupdate,$tmpdepfile" + else + "$@" -MDupdate "$tmpdepfile" + fi + stat=$? + if test $stat -eq 0; then : + else + rm -f "$tmpdepfile" + exit $stat + fi + rm -f "$depfile" + + if test -f "$tmpdepfile"; then # yes, the sourcefile depend on other files + echo "$object : \\" > "$depfile" + + # Clip off the initial element (the dependent). Don't try to be + # clever and replace this with sed code, as IRIX sed won't handle + # lines with more than a fixed number of characters (4096 in + # IRIX 6.2 sed, 8192 in IRIX 6.5). We also remove comment lines; + # the IRIX cc adds comments like `#:fec' to the end of the + # dependency line. + tr ' ' ' +' < "$tmpdepfile" \ + | sed -e 's/^.*\.o://' -e 's/#.*$//' -e '/^$/ d' | \ + tr ' +' ' ' >> "$depfile" + echo >> "$depfile" + + # The second pass generates a dummy entry for each header file. + tr ' ' ' +' < "$tmpdepfile" \ + | sed -e 's/^.*\.o://' -e 's/#.*$//' -e '/^$/ d' -e 's/$/:/' \ + >> "$depfile" + else + # The sourcefile does not contain any dependencies, so just + # store a dummy comment line, to avoid errors with the Makefile + # "include basename.Plo" scheme. + echo "#dummy" > "$depfile" + fi + rm -f "$tmpdepfile" + ;; + +aix) + # The C for AIX Compiler uses -M and outputs the dependencies + # in a .u file. In older versions, this file always lives in the + # current directory. Also, the AIX compiler puts `$object:' at the + # start of each line; $object doesn't have directory information. + # Version 6 uses the directory in both cases. + dir=`echo "$object" | sed -e 's|/[^/]*$|/|'` + test "x$dir" = "x$object" && dir= + base=`echo "$object" | sed -e 's|^.*/||' -e 's/\.o$//' -e 's/\.lo$//'` + if test "$libtool" = yes; then + tmpdepfile1=$dir$base.u + tmpdepfile2=$base.u + tmpdepfile3=$dir.libs/$base.u + "$@" -Wc,-M + else + tmpdepfile1=$dir$base.u + tmpdepfile2=$dir$base.u + tmpdepfile3=$dir$base.u + "$@" -M + fi + stat=$? + + if test $stat -eq 0; then : + else + rm -f "$tmpdepfile1" "$tmpdepfile2" "$tmpdepfile3" + exit $stat + fi + + for tmpdepfile in "$tmpdepfile1" "$tmpdepfile2" "$tmpdepfile3" + do + test -f "$tmpdepfile" && break + done + if test -f "$tmpdepfile"; then + # Each line is of the form `foo.o: dependent.h'. + # Do two passes, one to just change these to + # `$object: dependent.h' and one to simply `dependent.h:'. + sed -e "s,^.*\.[a-z]*:,$object:," < "$tmpdepfile" > "$depfile" + # That's a tab and a space in the []. + sed -e 's,^.*\.[a-z]*:[ ]*,,' -e 's,$,:,' < "$tmpdepfile" >> "$depfile" + else + # The sourcefile does not contain any dependencies, so just + # store a dummy comment line, to avoid errors with the Makefile + # "include basename.Plo" scheme. + echo "#dummy" > "$depfile" + fi + rm -f "$tmpdepfile" + ;; + +icc) + # Intel's C compiler understands `-MD -MF file'. However on + # icc -MD -MF foo.d -c -o sub/foo.o sub/foo.c + # ICC 7.0 will fill foo.d with something like + # foo.o: sub/foo.c + # foo.o: sub/foo.h + # which is wrong. We want: + # sub/foo.o: sub/foo.c + # sub/foo.o: sub/foo.h + # sub/foo.c: + # sub/foo.h: + # ICC 7.1 will output + # foo.o: sub/foo.c sub/foo.h + # and will wrap long lines using \ : + # foo.o: sub/foo.c ... \ + # sub/foo.h ... \ + # ... + + "$@" -MD -MF "$tmpdepfile" + stat=$? + if test $stat -eq 0; then : + else + rm -f "$tmpdepfile" + exit $stat + fi + rm -f "$depfile" + # Each line is of the form `foo.o: dependent.h', + # or `foo.o: dep1.h dep2.h \', or ` dep3.h dep4.h \'. + # Do two passes, one to just change these to + # `$object: dependent.h' and one to simply `dependent.h:'. + sed "s,^[^:]*:,$object :," < "$tmpdepfile" > "$depfile" + # Some versions of the HPUX 10.20 sed can't process this invocation + # correctly. Breaking it into two sed invocations is a workaround. + sed 's,^[^:]*: \(.*\)$,\1,;s/^\\$//;/^$/d;/:$/d' < "$tmpdepfile" | + sed -e 's/$/ :/' >> "$depfile" + rm -f "$tmpdepfile" + ;; + +hp2) + # The "hp" stanza above does not work with aCC (C++) and HP's ia64 + # compilers, which have integrated preprocessors. The correct option + # to use with these is +Maked; it writes dependencies to a file named + # 'foo.d', which lands next to the object file, wherever that + # happens to be. + # Much of this is similar to the tru64 case; see comments there. + dir=`echo "$object" | sed -e 's|/[^/]*$|/|'` + test "x$dir" = "x$object" && dir= + base=`echo "$object" | sed -e 's|^.*/||' -e 's/\.o$//' -e 's/\.lo$//'` + if test "$libtool" = yes; then + tmpdepfile1=$dir$base.d + tmpdepfile2=$dir.libs/$base.d + "$@" -Wc,+Maked + else + tmpdepfile1=$dir$base.d + tmpdepfile2=$dir$base.d + "$@" +Maked + fi + stat=$? + if test $stat -eq 0; then : + else + rm -f "$tmpdepfile1" "$tmpdepfile2" + exit $stat + fi + + for tmpdepfile in "$tmpdepfile1" "$tmpdepfile2" + do + test -f "$tmpdepfile" && break + done + if test -f "$tmpdepfile"; then + sed -e "s,^.*\.[a-z]*:,$object:," "$tmpdepfile" > "$depfile" + # Add `dependent.h:' lines. + sed -ne '2,${ + s/^ *// + s/ \\*$// + s/$/:/ + p + }' "$tmpdepfile" >> "$depfile" + else + echo "#dummy" > "$depfile" + fi + rm -f "$tmpdepfile" "$tmpdepfile2" + ;; + +tru64) + # The Tru64 compiler uses -MD to generate dependencies as a side + # effect. `cc -MD -o foo.o ...' puts the dependencies into `foo.o.d'. + # At least on Alpha/Redhat 6.1, Compaq CCC V6.2-504 seems to put + # dependencies in `foo.d' instead, so we check for that too. + # Subdirectories are respected. + dir=`echo "$object" | sed -e 's|/[^/]*$|/|'` + test "x$dir" = "x$object" && dir= + base=`echo "$object" | sed -e 's|^.*/||' -e 's/\.o$//' -e 's/\.lo$//'` + + if test "$libtool" = yes; then + # With Tru64 cc, shared objects can also be used to make a + # static library. This mechanism is used in libtool 1.4 series to + # handle both shared and static libraries in a single compilation. + # With libtool 1.4, dependencies were output in $dir.libs/$base.lo.d. + # + # With libtool 1.5 this exception was removed, and libtool now + # generates 2 separate objects for the 2 libraries. These two + # compilations output dependencies in $dir.libs/$base.o.d and + # in $dir$base.o.d. We have to check for both files, because + # one of the two compilations can be disabled. We should prefer + # $dir$base.o.d over $dir.libs/$base.o.d because the latter is + # automatically cleaned when .libs/ is deleted, while ignoring + # the former would cause a distcleancheck panic. + tmpdepfile1=$dir.libs/$base.lo.d # libtool 1.4 + tmpdepfile2=$dir$base.o.d # libtool 1.5 + tmpdepfile3=$dir.libs/$base.o.d # libtool 1.5 + tmpdepfile4=$dir.libs/$base.d # Compaq CCC V6.2-504 + "$@" -Wc,-MD + else + tmpdepfile1=$dir$base.o.d + tmpdepfile2=$dir$base.d + tmpdepfile3=$dir$base.d + tmpdepfile4=$dir$base.d + "$@" -MD + fi + + stat=$? + if test $stat -eq 0; then : + else + rm -f "$tmpdepfile1" "$tmpdepfile2" "$tmpdepfile3" "$tmpdepfile4" + exit $stat + fi + + for tmpdepfile in "$tmpdepfile1" "$tmpdepfile2" "$tmpdepfile3" "$tmpdepfile4" + do + test -f "$tmpdepfile" && break + done + if test -f "$tmpdepfile"; then + sed -e "s,^.*\.[a-z]*:,$object:," < "$tmpdepfile" > "$depfile" + # That's a tab and a space in the []. + sed -e 's,^.*\.[a-z]*:[ ]*,,' -e 's,$,:,' < "$tmpdepfile" >> "$depfile" + else + echo "#dummy" > "$depfile" + fi + rm -f "$tmpdepfile" + ;; + +msvc7) + if test "$libtool" = yes; then + showIncludes=-Wc,-showIncludes + else + showIncludes=-showIncludes + fi + "$@" $showIncludes > "$tmpdepfile" + stat=$? + grep -v '^Note: including file: ' "$tmpdepfile" + if test "$stat" = 0; then : + else + rm -f "$tmpdepfile" + exit $stat + fi + rm -f "$depfile" + echo "$object : \\" > "$depfile" + # The first sed program below extracts the file names and escapes + # backslashes for cygpath. The second sed program outputs the file + # name when reading, but also accumulates all include files in the + # hold buffer in order to output them again at the end. This only + # works with sed implementations that can handle large buffers. + sed < "$tmpdepfile" -n ' +/^Note: including file: *\(.*\)/ { + s//\1/ + s/\\/\\\\/g + p +}' | $cygpath_u | sort -u | sed -n ' +s/ /\\ /g +s/\(.*\)/ \1 \\/p +s/.\(.*\) \\/\1:/ +H +$ { + s/.*/ / + G + p +}' >> "$depfile" + rm -f "$tmpdepfile" + ;; + +msvc7msys) + # This case exists only to let depend.m4 do its work. It works by + # looking at the text of this script. This case will never be run, + # since it is checked for above. + exit 1 + ;; + +#nosideeffect) + # This comment above is used by automake to tell side-effect + # dependency tracking mechanisms from slower ones. + +dashmstdout) + # Important note: in order to support this mode, a compiler *must* + # always write the preprocessed file to stdout, regardless of -o. + "$@" || exit $? + + # Remove the call to Libtool. + if test "$libtool" = yes; then + while test "X$1" != 'X--mode=compile'; do + shift + done + shift + fi + + # Remove `-o $object'. + IFS=" " + for arg + do + case $arg in + -o) + shift + ;; + $object) + shift + ;; + *) + set fnord "$@" "$arg" + shift # fnord + shift # $arg + ;; + esac + done + + test -z "$dashmflag" && dashmflag=-M + # Require at least two characters before searching for `:' + # in the target name. This is to cope with DOS-style filenames: + # a dependency such as `c:/foo/bar' could be seen as target `c' otherwise. + "$@" $dashmflag | + sed 's:^[ ]*[^: ][^:][^:]*\:[ ]*:'"$object"'\: :' > "$tmpdepfile" + rm -f "$depfile" + cat < "$tmpdepfile" > "$depfile" + tr ' ' ' +' < "$tmpdepfile" | \ +## Some versions of the HPUX 10.20 sed can't process this invocation +## correctly. Breaking it into two sed invocations is a workaround. + sed -e 's/^\\$//' -e '/^$/d' -e '/:$/d' | sed -e 's/$/ :/' >> "$depfile" + rm -f "$tmpdepfile" + ;; + +dashXmstdout) + # This case only exists to satisfy depend.m4. It is never actually + # run, as this mode is specially recognized in the preamble. + exit 1 + ;; + +makedepend) + "$@" || exit $? + # Remove any Libtool call + if test "$libtool" = yes; then + while test "X$1" != 'X--mode=compile'; do + shift + done + shift + fi + # X makedepend + shift + cleared=no eat=no + for arg + do + case $cleared in + no) + set ""; shift + cleared=yes ;; + esac + if test $eat = yes; then + eat=no + continue + fi + case "$arg" in + -D*|-I*) + set fnord "$@" "$arg"; shift ;; + # Strip any option that makedepend may not understand. Remove + # the object too, otherwise makedepend will parse it as a source file. + -arch) + eat=yes ;; + -*|$object) + ;; + *) + set fnord "$@" "$arg"; shift ;; + esac + done + obj_suffix=`echo "$object" | sed 's/^.*\././'` + touch "$tmpdepfile" + ${MAKEDEPEND-makedepend} -o"$obj_suffix" -f"$tmpdepfile" "$@" + rm -f "$depfile" + # makedepend may prepend the VPATH from the source file name to the object. + # No need to regex-escape $object, excess matching of '.' is harmless. + sed "s|^.*\($object *:\)|\1|" "$tmpdepfile" > "$depfile" + sed '1,2d' "$tmpdepfile" | tr ' ' ' +' | \ +## Some versions of the HPUX 10.20 sed can't process this invocation +## correctly. Breaking it into two sed invocations is a workaround. + sed -e 's/^\\$//' -e '/^$/d' -e '/:$/d' | sed -e 's/$/ :/' >> "$depfile" + rm -f "$tmpdepfile" "$tmpdepfile".bak + ;; + +cpp) + # Important note: in order to support this mode, a compiler *must* + # always write the preprocessed file to stdout. + "$@" || exit $? + + # Remove the call to Libtool. + if test "$libtool" = yes; then + while test "X$1" != 'X--mode=compile'; do + shift + done + shift + fi + + # Remove `-o $object'. + IFS=" " + for arg + do + case $arg in + -o) + shift + ;; + $object) + shift + ;; + *) + set fnord "$@" "$arg" + shift # fnord + shift # $arg + ;; + esac + done + + "$@" -E | + sed -n -e '/^# [0-9][0-9]* "\([^"]*\)".*/ s:: \1 \\:p' \ + -e '/^#line [0-9][0-9]* "\([^"]*\)".*/ s:: \1 \\:p' | + sed '$ s: \\$::' > "$tmpdepfile" + rm -f "$depfile" + echo "$object : \\" > "$depfile" + cat < "$tmpdepfile" >> "$depfile" + sed < "$tmpdepfile" '/^$/d;s/^ //;s/ \\$//;s/$/ :/' >> "$depfile" + rm -f "$tmpdepfile" + ;; + +msvisualcpp) + # Important note: in order to support this mode, a compiler *must* + # always write the preprocessed file to stdout. + "$@" || exit $? + + # Remove the call to Libtool. + if test "$libtool" = yes; then + while test "X$1" != 'X--mode=compile'; do + shift + done + shift + fi + + IFS=" " + for arg + do + case "$arg" in + -o) + shift + ;; + $object) + shift + ;; + "-Gm"|"/Gm"|"-Gi"|"/Gi"|"-ZI"|"/ZI") + set fnord "$@" + shift + shift + ;; + *) + set fnord "$@" "$arg" + shift + shift + ;; + esac + done + "$@" -E 2>/dev/null | + sed -n '/^#line [0-9][0-9]* "\([^"]*\)"/ s::\1:p' | $cygpath_u | sort -u > "$tmpdepfile" + rm -f "$depfile" + echo "$object : \\" > "$depfile" + sed < "$tmpdepfile" -n -e 's% %\\ %g' -e '/^\(.*\)$/ s:: \1 \\:p' >> "$depfile" + echo " " >> "$depfile" + sed < "$tmpdepfile" -n -e 's% %\\ %g' -e '/^\(.*\)$/ s::\1\::p' >> "$depfile" + rm -f "$tmpdepfile" + ;; + +msvcmsys) + # This case exists only to let depend.m4 do its work. It works by + # looking at the text of this script. This case will never be run, + # since it is checked for above. + exit 1 + ;; + +none) + exec "$@" + ;; + +*) + echo "Unknown depmode $depmode" 1>&2 + exit 1 + ;; +esac + +exit 0 + +# Local Variables: +# mode: shell-script +# sh-indentation: 2 +# eval: (add-hook 'write-file-hooks 'time-stamp) +# time-stamp-start: "scriptversion=" +# time-stamp-format: "%:y-%02m-%02d.%02H" +# time-stamp-time-zone: "UTC" +# time-stamp-end: "; # UTC" +# End: Index: automake/install-sh =================================================================== --- automake/install-sh (revision 937e51d79693364ccc3aec416b5db0894464e624) +++ automake/install-sh (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -0,0 +1,527 @@ +#!/bin/sh +# install - install a program, script, or datafile + +scriptversion=2011-01-19.21; # UTC + +# This originates from X11R5 (mit/util/scripts/install.sh), which was +# later released in X11R6 (xc/config/util/install.sh) with the +# following copyright and license. +# +# Copyright (C) 1994 X Consortium +# +# Permission is hereby granted, free of charge, to any person obtaining a copy +# of this software and associated documentation files (the "Software"), to +# deal in the Software without restriction, including without limitation the +# rights to use, copy, modify, merge, publish, distribute, sublicense, and/or +# sell copies of the Software, and to permit persons to whom the Software is +# furnished to do so, subject to the following conditions: +# +# The above copyright notice and this permission notice shall be included in +# all copies or substantial portions of the Software. +# +# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR +# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE +# X CONSORTIUM BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN +# AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNEC- +# TION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. +# +# Except as contained in this notice, the name of the X Consortium shall not +# be used in advertising or otherwise to promote the sale, use or other deal- +# ings in this Software without prior written authorization from the X Consor- +# tium. +# +# +# FSF changes to this file are in the public domain. +# +# Calling this script install-sh is preferred over install.sh, to prevent +# `make' implicit rules from creating a file called install from it +# when there is no Makefile. +# +# This script is compatible with the BSD install script, but was written +# from scratch. + +nl=' +' +IFS=" "" $nl" + +# set DOITPROG to echo to test this script + +# Don't use :- since 4.3BSD and earlier shells don't like it. +doit=${DOITPROG-} +if test -z "$doit"; then + doit_exec=exec +else + doit_exec=$doit +fi + +# Put in absolute file names if you don't have them in your path; +# or use environment vars. + +chgrpprog=${CHGRPPROG-chgrp} +chmodprog=${CHMODPROG-chmod} +chownprog=${CHOWNPROG-chown} +cmpprog=${CMPPROG-cmp} +cpprog=${CPPROG-cp} +mkdirprog=${MKDIRPROG-mkdir} +mvprog=${MVPROG-mv} +rmprog=${RMPROG-rm} +stripprog=${STRIPPROG-strip} + +posix_glob='?' +initialize_posix_glob=' + test "$posix_glob" != "?" || { + if (set -f) 2>/dev/null; then + posix_glob= + else + posix_glob=: + fi + } +' + +posix_mkdir= + +# Desired mode of installed file. +mode=0755 + +chgrpcmd= +chmodcmd=$chmodprog +chowncmd= +mvcmd=$mvprog +rmcmd="$rmprog -f" +stripcmd= + +src= +dst= +dir_arg= +dst_arg= + +copy_on_change=false +no_target_directory= + +usage="\ +Usage: $0 [OPTION]... [-T] SRCFILE DSTFILE + or: $0 [OPTION]... SRCFILES... DIRECTORY + or: $0 [OPTION]... -t DIRECTORY SRCFILES... + or: $0 [OPTION]... -d DIRECTORIES... + +In the 1st form, copy SRCFILE to DSTFILE. +In the 2nd and 3rd, copy all SRCFILES to DIRECTORY. +In the 4th, create DIRECTORIES. + +Options: + --help display this help and exit. + --version display version info and exit. + + -c (ignored) + -C install only if different (preserve the last data modification time) + -d create directories instead of installing files. + -g GROUP $chgrpprog installed files to GROUP. + -m MODE $chmodprog installed files to MODE. + -o USER $chownprog installed files to USER. + -s $stripprog installed files. + -t DIRECTORY install into DIRECTORY. + -T report an error if DSTFILE is a directory. + +Environment variables override the default commands: + CHGRPPROG CHMODPROG CHOWNPROG CMPPROG CPPROG MKDIRPROG MVPROG + RMPROG STRIPPROG +" + +while test $# -ne 0; do + case $1 in + -c) ;; + + -C) copy_on_change=true;; + + -d) dir_arg=true;; + + -g) chgrpcmd="$chgrpprog $2" + shift;; + + --help) echo "$usage"; exit $?;; + + -m) mode=$2 + case $mode in + *' '* | *' '* | *' +'* | *'*'* | *'?'* | *'['*) + echo "$0: invalid mode: $mode" >&2 + exit 1;; + esac + shift;; + + -o) chowncmd="$chownprog $2" + shift;; + + -s) stripcmd=$stripprog;; + + -t) dst_arg=$2 + # Protect names problematic for `test' and other utilities. + case $dst_arg in + -* | [=\(\)!]) dst_arg=./$dst_arg;; + esac + shift;; + + -T) no_target_directory=true;; + + --version) echo "$0 $scriptversion"; exit $?;; + + --) shift + break;; + + -*) echo "$0: invalid option: $1" >&2 + exit 1;; + + *) break;; + esac + shift +done + +if test $# -ne 0 && test -z "$dir_arg$dst_arg"; then + # When -d is used, all remaining arguments are directories to create. + # When -t is used, the destination is already specified. + # Otherwise, the last argument is the destination. Remove it from $@. + for arg + do + if test -n "$dst_arg"; then + # $@ is not empty: it contains at least $arg. + set fnord "$@" "$dst_arg" + shift # fnord + fi + shift # arg + dst_arg=$arg + # Protect names problematic for `test' and other utilities. + case $dst_arg in + -* | [=\(\)!]) dst_arg=./$dst_arg;; + esac + done +fi + +if test $# -eq 0; then + if test -z "$dir_arg"; then + echo "$0: no input file specified." >&2 + exit 1 + fi + # It's OK to call `install-sh -d' without argument. + # This can happen when creating conditional directories. + exit 0 +fi + +if test -z "$dir_arg"; then + do_exit='(exit $ret); exit $ret' + trap "ret=129; $do_exit" 1 + trap "ret=130; $do_exit" 2 + trap "ret=141; $do_exit" 13 + trap "ret=143; $do_exit" 15 + + # Set umask so as not to create temps with too-generous modes. + # However, 'strip' requires both read and write access to temps. + case $mode in + # Optimize common cases. + *644) cp_umask=133;; + *755) cp_umask=22;; + + *[0-7]) + if test -z "$stripcmd"; then + u_plus_rw= + else + u_plus_rw='% 200' + fi + cp_umask=`expr '(' 777 - $mode % 1000 ')' $u_plus_rw`;; + *) + if test -z "$stripcmd"; then + u_plus_rw= + else + u_plus_rw=,u+rw + fi + cp_umask=$mode$u_plus_rw;; + esac +fi + +for src +do + # Protect names problematic for `test' and other utilities. + case $src in + -* | [=\(\)!]) src=./$src;; + esac + + if test -n "$dir_arg"; then + dst=$src + dstdir=$dst + test -d "$dstdir" + dstdir_status=$? + else + + # Waiting for this to be detected by the "$cpprog $src $dsttmp" command + # might cause directories to be created, which would be especially bad + # if $src (and thus $dsttmp) contains '*'. + if test ! -f "$src" && test ! -d "$src"; then + echo "$0: $src does not exist." >&2 + exit 1 + fi + + if test -z "$dst_arg"; then + echo "$0: no destination specified." >&2 + exit 1 + fi + dst=$dst_arg + + # If destination is a directory, append the input filename; won't work + # if double slashes aren't ignored. + if test -d "$dst"; then + if test -n "$no_target_directory"; then + echo "$0: $dst_arg: Is a directory" >&2 + exit 1 + fi + dstdir=$dst + dst=$dstdir/`basename "$src"` + dstdir_status=0 + else + # Prefer dirname, but fall back on a substitute if dirname fails. + dstdir=` + (dirname "$dst") 2>/dev/null || + expr X"$dst" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ + X"$dst" : 'X\(//\)[^/]' \| \ + X"$dst" : 'X\(//\)$' \| \ + X"$dst" : 'X\(/\)' \| . 2>/dev/null || + echo X"$dst" | + sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ + s//\1/ + q + } + /^X\(\/\/\)[^/].*/{ + s//\1/ + q + } + /^X\(\/\/\)$/{ + s//\1/ + q + } + /^X\(\/\).*/{ + s//\1/ + q + } + s/.*/./; q' + ` + + test -d "$dstdir" + dstdir_status=$? + fi + fi + + obsolete_mkdir_used=false + + if test $dstdir_status != 0; then + case $posix_mkdir in + '') + # Create intermediate dirs using mode 755 as modified by the umask. + # This is like FreeBSD 'install' as of 1997-10-28. + umask=`umask` + case $stripcmd.$umask in + # Optimize common cases. + *[2367][2367]) mkdir_umask=$umask;; + .*0[02][02] | .[02][02] | .[02]) mkdir_umask=22;; + + *[0-7]) + mkdir_umask=`expr $umask + 22 \ + - $umask % 100 % 40 + $umask % 20 \ + - $umask % 10 % 4 + $umask % 2 + `;; + *) mkdir_umask=$umask,go-w;; + esac + + # With -d, create the new directory with the user-specified mode. + # Otherwise, rely on $mkdir_umask. + if test -n "$dir_arg"; then + mkdir_mode=-m$mode + else + mkdir_mode= + fi + + posix_mkdir=false + case $umask in + *[123567][0-7][0-7]) + # POSIX mkdir -p sets u+wx bits regardless of umask, which + # is incompatible with FreeBSD 'install' when (umask & 300) != 0. + ;; + *) + tmpdir=${TMPDIR-/tmp}/ins$RANDOM-$$ + trap 'ret=$?; rmdir "$tmpdir/d" "$tmpdir" 2>/dev/null; exit $ret' 0 + + if (umask $mkdir_umask && + exec $mkdirprog $mkdir_mode -p -- "$tmpdir/d") >/dev/null 2>&1 + then + if test -z "$dir_arg" || { + # Check for POSIX incompatibilities with -m. + # HP-UX 11.23 and IRIX 6.5 mkdir -m -p sets group- or + # other-writeable bit of parent directory when it shouldn't. + # FreeBSD 6.1 mkdir -m -p sets mode of existing directory. + ls_ld_tmpdir=`ls -ld "$tmpdir"` + case $ls_ld_tmpdir in + d????-?r-*) different_mode=700;; + d????-?--*) different_mode=755;; + *) false;; + esac && + $mkdirprog -m$different_mode -p -- "$tmpdir" && { + ls_ld_tmpdir_1=`ls -ld "$tmpdir"` + test "$ls_ld_tmpdir" = "$ls_ld_tmpdir_1" + } + } + then posix_mkdir=: + fi + rmdir "$tmpdir/d" "$tmpdir" + else + # Remove any dirs left behind by ancient mkdir implementations. + rmdir ./$mkdir_mode ./-p ./-- 2>/dev/null + fi + trap '' 0;; + esac;; + esac + + if + $posix_mkdir && ( + umask $mkdir_umask && + $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir" + ) + then : + else + + # The umask is ridiculous, or mkdir does not conform to POSIX, + # or it failed possibly due to a race condition. Create the + # directory the slow way, step by step, checking for races as we go. + + case $dstdir in + /*) prefix='/';; + [-=\(\)!]*) prefix='./';; + *) prefix='';; + esac + + eval "$initialize_posix_glob" + + oIFS=$IFS + IFS=/ + $posix_glob set -f + set fnord $dstdir + shift + $posix_glob set +f + IFS=$oIFS + + prefixes= + + for d + do + test X"$d" = X && continue + + prefix=$prefix$d + if test -d "$prefix"; then + prefixes= + else + if $posix_mkdir; then + (umask=$mkdir_umask && + $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir") && break + # Don't fail if two instances are running concurrently. + test -d "$prefix" || exit 1 + else + case $prefix in + *\'*) qprefix=`echo "$prefix" | sed "s/'/'\\\\\\\\''/g"`;; + *) qprefix=$prefix;; + esac + prefixes="$prefixes '$qprefix'" + fi + fi + prefix=$prefix/ + done + + if test -n "$prefixes"; then + # Don't fail if two instances are running concurrently. + (umask $mkdir_umask && + eval "\$doit_exec \$mkdirprog $prefixes") || + test -d "$dstdir" || exit 1 + obsolete_mkdir_used=true + fi + fi + fi + + if test -n "$dir_arg"; then + { test -z "$chowncmd" || $doit $chowncmd "$dst"; } && + { test -z "$chgrpcmd" || $doit $chgrpcmd "$dst"; } && + { test "$obsolete_mkdir_used$chowncmd$chgrpcmd" = false || + test -z "$chmodcmd" || $doit $chmodcmd $mode "$dst"; } || exit 1 + else + + # Make a couple of temp file names in the proper directory. + dsttmp=$dstdir/_inst.$$_ + rmtmp=$dstdir/_rm.$$_ + + # Trap to clean up those temp files at exit. + trap 'ret=$?; rm -f "$dsttmp" "$rmtmp" && exit $ret' 0 + + # Copy the file name to the temp name. + (umask $cp_umask && $doit_exec $cpprog "$src" "$dsttmp") && + + # and set any options; do chmod last to preserve setuid bits. + # + # If any of these fail, we abort the whole thing. If we want to + # ignore errors from any of these, just make sure not to ignore + # errors from the above "$doit $cpprog $src $dsttmp" command. + # + { test -z "$chowncmd" || $doit $chowncmd "$dsttmp"; } && + { test -z "$chgrpcmd" || $doit $chgrpcmd "$dsttmp"; } && + { test -z "$stripcmd" || $doit $stripcmd "$dsttmp"; } && + { test -z "$chmodcmd" || $doit $chmodcmd $mode "$dsttmp"; } && + + # If -C, don't bother to copy if it wouldn't change the file. + if $copy_on_change && + old=`LC_ALL=C ls -dlL "$dst" 2>/dev/null` && + new=`LC_ALL=C ls -dlL "$dsttmp" 2>/dev/null` && + + eval "$initialize_posix_glob" && + $posix_glob set -f && + set X $old && old=:$2:$4:$5:$6 && + set X $new && new=:$2:$4:$5:$6 && + $posix_glob set +f && + + test "$old" = "$new" && + $cmpprog "$dst" "$dsttmp" >/dev/null 2>&1 + then + rm -f "$dsttmp" + else + # Rename the file to the real destination. + $doit $mvcmd -f "$dsttmp" "$dst" 2>/dev/null || + + # The rename failed, perhaps because mv can't rename something else + # to itself, or perhaps because mv is so ancient that it does not + # support -f. + { + # Now remove or move aside any old file at destination location. + # We try this two ways since rm can't unlink itself on some + # systems and the destination file might be busy for other + # reasons. In this case, the final cleanup might fail but the new + # file should still install successfully. + { + test ! -f "$dst" || + $doit $rmcmd -f "$dst" 2>/dev/null || + { $doit $mvcmd -f "$dst" "$rmtmp" 2>/dev/null && + { $doit $rmcmd -f "$rmtmp" 2>/dev/null; :; } + } || + { echo "$0: cannot unlink or rename $dst" >&2 + (exit 1); exit 1 + } + } && + + # Now rename the file to the real destination. + $doit $mvcmd "$dsttmp" "$dst" + } + fi || exit 1 + + trap '' 0 + fi +done + +# Local variables: +# eval: (add-hook 'write-file-hooks 'time-stamp) +# time-stamp-start: "scriptversion=" +# time-stamp-format: "%:y-%02m-%02d.%02H" +# time-stamp-time-zone: "UTC" +# time-stamp-end: "; # UTC" +# End: Index: automake/missing =================================================================== --- automake/missing (revision 937e51d79693364ccc3aec416b5db0894464e624) +++ automake/missing (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -0,0 +1,331 @@ +#! /bin/sh +# Common stub for a few missing GNU programs while installing. + +scriptversion=2012-01-06.13; # UTC + +# Copyright (C) 1996, 1997, 1999, 2000, 2002, 2003, 2004, 2005, 2006, +# 2008, 2009, 2010, 2011, 2012 Free Software Foundation, Inc. +# Originally by Fran,cois Pinard , 1996. + +# 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, see . + +# As a special exception to the GNU General Public License, if you +# distribute this file as part of a program that contains a +# configuration script generated by Autoconf, you may include it under +# the same distribution terms that you use for the rest of that program. + +if test $# -eq 0; then + echo 1>&2 "Try \`$0 --help' for more information" + exit 1 +fi + +run=: +sed_output='s/.* --output[ =]\([^ ]*\).*/\1/p' +sed_minuso='s/.* -o \([^ ]*\).*/\1/p' + +# In the cases where this matters, `missing' is being run in the +# srcdir already. +if test -f configure.ac; then + configure_ac=configure.ac +else + configure_ac=configure.in +fi + +msg="missing on your system" + +case $1 in +--run) + # Try to run requested program, and just exit if it succeeds. + run= + shift + "$@" && exit 0 + # Exit code 63 means version mismatch. This often happens + # when the user try to use an ancient version of a tool on + # a file that requires a minimum version. In this case we + # we should proceed has if the program had been absent, or + # if --run hadn't been passed. + if test $? = 63; then + run=: + msg="probably too old" + fi + ;; + + -h|--h|--he|--hel|--help) + echo "\ +$0 [OPTION]... PROGRAM [ARGUMENT]... + +Handle \`PROGRAM [ARGUMENT]...' for when PROGRAM is missing, or return an +error status if there is no known handling for PROGRAM. + +Options: + -h, --help display this help and exit + -v, --version output version information and exit + --run try to run the given command, and emulate it if it fails + +Supported PROGRAM values: + aclocal touch file \`aclocal.m4' + autoconf touch file \`configure' + autoheader touch file \`config.h.in' + autom4te touch the output file, or create a stub one + automake touch all \`Makefile.in' files + bison create \`y.tab.[ch]', if possible, from existing .[ch] + flex create \`lex.yy.c', if possible, from existing .c + help2man touch the output file + lex create \`lex.yy.c', if possible, from existing .c + makeinfo touch the output file + yacc create \`y.tab.[ch]', if possible, from existing .[ch] + +Version suffixes to PROGRAM as well as the prefixes \`gnu-', \`gnu', and +\`g' are ignored when checking the name. + +Send bug reports to ." + exit $? + ;; + + -v|--v|--ve|--ver|--vers|--versi|--versio|--version) + echo "missing $scriptversion (GNU Automake)" + exit $? + ;; + + -*) + echo 1>&2 "$0: Unknown \`$1' option" + echo 1>&2 "Try \`$0 --help' for more information" + exit 1 + ;; + +esac + +# normalize program name to check for. +program=`echo "$1" | sed ' + s/^gnu-//; t + s/^gnu//; t + s/^g//; t'` + +# Now exit if we have it, but it failed. Also exit now if we +# don't have it and --version was passed (most likely to detect +# the program). This is about non-GNU programs, so use $1 not +# $program. +case $1 in + lex*|yacc*) + # Not GNU programs, they don't have --version. + ;; + + *) + if test -z "$run" && ($1 --version) > /dev/null 2>&1; then + # We have it, but it failed. + exit 1 + elif test "x$2" = "x--version" || test "x$2" = "x--help"; then + # Could not run --version or --help. This is probably someone + # running `$TOOL --version' or `$TOOL --help' to check whether + # $TOOL exists and not knowing $TOOL uses missing. + exit 1 + fi + ;; +esac + +# If it does not exist, or fails to run (possibly an outdated version), +# try to emulate it. +case $program in + aclocal*) + echo 1>&2 "\ +WARNING: \`$1' is $msg. You should only need it if + you modified \`acinclude.m4' or \`${configure_ac}'. You might want + to install the \`Automake' and \`Perl' packages. Grab them from + any GNU archive site." + touch aclocal.m4 + ;; + + autoconf*) + echo 1>&2 "\ +WARNING: \`$1' is $msg. You should only need it if + you modified \`${configure_ac}'. You might want to install the + \`Autoconf' and \`GNU m4' packages. Grab them from any GNU + archive site." + touch configure + ;; + + autoheader*) + echo 1>&2 "\ +WARNING: \`$1' is $msg. You should only need it if + you modified \`acconfig.h' or \`${configure_ac}'. You might want + to install the \`Autoconf' and \`GNU m4' packages. Grab them + from any GNU archive site." + files=`sed -n 's/^[ ]*A[CM]_CONFIG_HEADER(\([^)]*\)).*/\1/p' ${configure_ac}` + test -z "$files" && files="config.h" + touch_files= + for f in $files; do + case $f in + *:*) touch_files="$touch_files "`echo "$f" | + sed -e 's/^[^:]*://' -e 's/:.*//'`;; + *) touch_files="$touch_files $f.in";; + esac + done + touch $touch_files + ;; + + automake*) + echo 1>&2 "\ +WARNING: \`$1' is $msg. You should only need it if + you modified \`Makefile.am', \`acinclude.m4' or \`${configure_ac}'. + You might want to install the \`Automake' and \`Perl' packages. + Grab them from any GNU archive site." + find . -type f -name Makefile.am -print | + sed 's/\.am$/.in/' | + while read f; do touch "$f"; done + ;; + + autom4te*) + echo 1>&2 "\ +WARNING: \`$1' is needed, but is $msg. + You might have modified some files without having the + proper tools for further handling them. + You can get \`$1' as part of \`Autoconf' from any GNU + archive site." + + file=`echo "$*" | sed -n "$sed_output"` + test -z "$file" && file=`echo "$*" | sed -n "$sed_minuso"` + if test -f "$file"; then + touch $file + else + test -z "$file" || exec >$file + echo "#! /bin/sh" + echo "# Created by GNU Automake missing as a replacement of" + echo "# $ $@" + echo "exit 0" + chmod +x $file + exit 1 + fi + ;; + + bison*|yacc*) + echo 1>&2 "\ +WARNING: \`$1' $msg. You should only need it if + you modified a \`.y' file. You may need the \`Bison' package + in order for those modifications to take effect. You can get + \`Bison' from any GNU archive site." + rm -f y.tab.c y.tab.h + if test $# -ne 1; then + eval LASTARG=\${$#} + case $LASTARG in + *.y) + SRCFILE=`echo "$LASTARG" | sed 's/y$/c/'` + if test -f "$SRCFILE"; then + cp "$SRCFILE" y.tab.c + fi + SRCFILE=`echo "$LASTARG" | sed 's/y$/h/'` + if test -f "$SRCFILE"; then + cp "$SRCFILE" y.tab.h + fi + ;; + esac + fi + if test ! -f y.tab.h; then + echo >y.tab.h + fi + if test ! -f y.tab.c; then + echo 'main() { return 0; }' >y.tab.c + fi + ;; + + lex*|flex*) + echo 1>&2 "\ +WARNING: \`$1' is $msg. You should only need it if + you modified a \`.l' file. You may need the \`Flex' package + in order for those modifications to take effect. You can get + \`Flex' from any GNU archive site." + rm -f lex.yy.c + if test $# -ne 1; then + eval LASTARG=\${$#} + case $LASTARG in + *.l) + SRCFILE=`echo "$LASTARG" | sed 's/l$/c/'` + if test -f "$SRCFILE"; then + cp "$SRCFILE" lex.yy.c + fi + ;; + esac + fi + if test ! -f lex.yy.c; then + echo 'main() { return 0; }' >lex.yy.c + fi + ;; + + help2man*) + echo 1>&2 "\ +WARNING: \`$1' is $msg. You should only need it if + you modified a dependency of a manual page. You may need the + \`Help2man' package in order for those modifications to take + effect. You can get \`Help2man' from any GNU archive site." + + file=`echo "$*" | sed -n "$sed_output"` + test -z "$file" && file=`echo "$*" | sed -n "$sed_minuso"` + if test -f "$file"; then + touch $file + else + test -z "$file" || exec >$file + echo ".ab help2man is required to generate this page" + exit $? + fi + ;; + + makeinfo*) + echo 1>&2 "\ +WARNING: \`$1' is $msg. You should only need it if + you modified a \`.texi' or \`.texinfo' file, or any other file + indirectly affecting the aspect of the manual. The spurious + call might also be the consequence of using a buggy \`make' (AIX, + DU, IRIX). You might want to install the \`Texinfo' package or + the \`GNU make' package. Grab either from any GNU archive site." + # The file to touch is that specified with -o ... + file=`echo "$*" | sed -n "$sed_output"` + test -z "$file" && file=`echo "$*" | sed -n "$sed_minuso"` + if test -z "$file"; then + # ... or it is the one specified with @setfilename ... + infile=`echo "$*" | sed 's/.* \([^ ]*\) *$/\1/'` + file=`sed -n ' + /^@setfilename/{ + s/.* \([^ ]*\) *$/\1/ + p + q + }' $infile` + # ... or it is derived from the source name (dir/f.texi becomes f.info) + test -z "$file" && file=`echo "$infile" | sed 's,.*/,,;s,.[^.]*$,,'`.info + fi + # If the file does not exist, the user really needs makeinfo; + # let's fail without touching anything. + test -f $file || exit 1 + touch $file + ;; + + *) + echo 1>&2 "\ +WARNING: \`$1' is needed, and is $msg. + You might have modified some files without having the + proper tools for further handling them. Check the \`README' file, + it often tells you about the needed prerequisites for installing + this package. You may also peek at any GNU archive site, in case + some other package would contain this missing \`$1' program." + exit 1 + ;; +esac + +exit 0 + +# Local variables: +# eval: (add-hook 'write-file-hooks 'time-stamp) +# time-stamp-start: "scriptversion=" +# time-stamp-format: "%:y-%02m-%02d.%02H" +# time-stamp-time-zone: "UTC" +# time-stamp-end: "; # UTC" +# End: Index: automake/ylwrap =================================================================== --- automake/ylwrap (revision 937e51d79693364ccc3aec416b5db0894464e624) +++ automake/ylwrap (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -0,0 +1,226 @@ +#! /bin/sh +# ylwrap - wrapper for lex/yacc invocations. + +scriptversion=2011-08-25.18; # UTC + +# Copyright (C) 1996, 1997, 1998, 1999, 2001, 2002, 2003, 2004, 2005, +# 2007, 2009, 2010, 2011 Free Software Foundation, Inc. +# +# Written by Tom Tromey . +# +# 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, see . + +# As a special exception to the GNU General Public License, if you +# distribute this file as part of a program that contains a +# configuration script generated by Autoconf, you may include it under +# the same distribution terms that you use for the rest of that program. + +# This file is maintained in Automake, please report +# bugs to or send patches to +# . + +case "$1" in + '') + echo "$0: No files given. Try \`$0 --help' for more information." 1>&2 + exit 1 + ;; + --basedir) + basedir=$2 + shift 2 + ;; + -h|--h*) + cat <<\EOF +Usage: ylwrap [--help|--version] INPUT [OUTPUT DESIRED]... -- PROGRAM [ARGS]... + +Wrapper for lex/yacc invocations, renaming files as desired. + + INPUT is the input file + OUTPUT is one file PROG generates + DESIRED is the file we actually want instead of OUTPUT + PROGRAM is program to run + ARGS are passed to PROG + +Any number of OUTPUT,DESIRED pairs may be used. + +Report bugs to . +EOF + exit $? + ;; + -v|--v*) + echo "ylwrap $scriptversion" + exit $? + ;; +esac + + +# The input. +input="$1" +shift +case "$input" in + [\\/]* | ?:[\\/]*) + # Absolute path; do nothing. + ;; + *) + # Relative path. Make it absolute. + input="`pwd`/$input" + ;; +esac + +pairlist= +while test "$#" -ne 0; do + if test "$1" = "--"; then + shift + break + fi + pairlist="$pairlist $1" + shift +done + +# The program to run. +prog="$1" +shift +# Make any relative path in $prog absolute. +case "$prog" in + [\\/]* | ?:[\\/]*) ;; + *[\\/]*) prog="`pwd`/$prog" ;; +esac + +# FIXME: add hostname here for parallel makes that run commands on +# other machines. But that might take us over the 14-char limit. +dirname=ylwrap$$ +do_exit="cd '`pwd`' && rm -rf $dirname > /dev/null 2>&1;"' (exit $ret); exit $ret' +trap "ret=129; $do_exit" 1 +trap "ret=130; $do_exit" 2 +trap "ret=141; $do_exit" 13 +trap "ret=143; $do_exit" 15 +mkdir $dirname || exit 1 + +cd $dirname + +case $# in + 0) "$prog" "$input" ;; + *) "$prog" "$@" "$input" ;; +esac +ret=$? + +if test $ret -eq 0; then + set X $pairlist + shift + first=yes + # Since DOS filename conventions don't allow two dots, + # the DOS version of Bison writes out y_tab.c instead of y.tab.c + # and y_tab.h instead of y.tab.h. Test to see if this is the case. + y_tab_nodot="no" + if test -f y_tab.c || test -f y_tab.h; then + y_tab_nodot="yes" + fi + + # The directory holding the input. + input_dir=`echo "$input" | sed -e 's,\([\\/]\)[^\\/]*$,\1,'` + # Quote $INPUT_DIR so we can use it in a regexp. + # FIXME: really we should care about more than `.' and `\'. + input_rx=`echo "$input_dir" | sed 's,\\\\,\\\\\\\\,g;s,\\.,\\\\.,g'` + + while test "$#" -ne 0; do + from="$1" + # Handle y_tab.c and y_tab.h output by DOS + if test $y_tab_nodot = "yes"; then + if test $from = "y.tab.c"; then + from="y_tab.c" + else + if test $from = "y.tab.h"; then + from="y_tab.h" + fi + fi + fi + if test -f "$from"; then + # If $2 is an absolute path name, then just use that, + # otherwise prepend `../'. + case "$2" in + [\\/]* | ?:[\\/]*) target="$2";; + *) target="../$2";; + esac + + # We do not want to overwrite a header file if it hasn't + # changed. This avoid useless recompilations. However the + # parser itself (the first file) should always be updated, + # because it is the destination of the .y.c rule in the + # Makefile. Divert the output of all other files to a temporary + # file so we can compare them to existing versions. + if test $first = no; then + realtarget="$target" + target="tmp-`echo $target | sed s/.*[\\/]//g`" + fi + # Edit out `#line' or `#' directives. + # + # We don't want the resulting debug information to point at + # an absolute srcdir; it is better for it to just mention the + # .y file with no path. + # + # We want to use the real output file name, not yy.lex.c for + # instance. + # + # We want the include guards to be adjusted too. + FROM=`echo "$from" | sed \ + -e 'y/abcdefghijklmnopqrstuvwxyz/ABCDEFGHIJKLMNOPQRSTUVWXYZ/'\ + -e 's/[^ABCDEFGHIJKLMNOPQRSTUVWXYZ]/_/g'` + TARGET=`echo "$2" | sed \ + -e 'y/abcdefghijklmnopqrstuvwxyz/ABCDEFGHIJKLMNOPQRSTUVWXYZ/'\ + -e 's/[^ABCDEFGHIJKLMNOPQRSTUVWXYZ]/_/g'` + + sed -e "/^#/!b" -e "s,$input_rx,," -e "s,$from,$2," \ + -e "s,$FROM,$TARGET," "$from" >"$target" || ret=$? + + # Check whether header files must be updated. + if test $first = no; then + if test -f "$realtarget" && cmp -s "$realtarget" "$target"; then + echo "$2" is unchanged + rm -f "$target" + else + echo updating "$2" + mv -f "$target" "$realtarget" + fi + fi + else + # A missing file is only an error for the first file. This + # is a blatant hack to let us support using "yacc -d". If -d + # is not specified, we don't want an error when the header + # file is "missing". + if test $first = yes; then + ret=1 + fi + fi + shift + shift + first=no + done +else + ret=$? +fi + +# Remove the directory. +cd .. +rm -rf $dirname + +exit $ret + +# Local Variables: +# mode: shell-script +# sh-indentation: 2 +# eval: (add-hook 'write-file-hooks 'time-stamp) +# time-stamp-start: "scriptversion=" +# time-stamp-format: "%:y-%02m-%02d.%02H" +# time-stamp-time-zone: "UTC" +# time-stamp-end: "; # UTC" +# End: Index: config.h.in =================================================================== --- config.h.in (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ config.h.in (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -1,3 +1,3 @@ -/* config.h.in. Generated from configure.in by autoheader. */ +/* config.h.in. Generated from configure.ac by autoheader. */ /* Location of cfa command. */ @@ -13,12 +13,36 @@ #undef CFA_PREFIX -/* Path/name of cpp preprocessor. */ -#undef CPP_PATH +/* Define to one of `_getb67', `GETB67', `getb67' for Cray-2 and Cray-YMP + systems. This function is required for `alloca.c' support on those systems. + */ +#undef CRAY_STACKSEG_END + +/* Define to 1 if using `alloca.c'. */ +#undef C_ALLOCA /* Path/name of C compiler. */ #undef GCC_PATH +/* Define to 1 if you have `alloca', as a function or macro. */ +#undef HAVE_ALLOCA + +/* Define to 1 if you have and it should be used (not on Ultrix). + */ +#undef HAVE_ALLOCA_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_FENV_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_FLOAT_H + /* Define to 1 if you have the header file. */ #undef HAVE_INTTYPES_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_LIBINTL_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_LIMITS_H /* Define to 1 if you have the header file. */ @@ -28,4 +52,16 @@ #undef HAVE_MEMORY_H +/* Define to 1 if you have the `memset' function. */ +#undef HAVE_MEMSET + +/* Define to 1 if you have the `putenv' function. */ +#undef HAVE_PUTENV + +/* Define to 1 if stdbool.h conforms to C99. */ +#undef HAVE_STDBOOL_H + +/* Define to 1 if you have the header file. */ +#undef HAVE_STDDEF_H + /* Define to 1 if you have the header file. */ #undef HAVE_STDINT_H @@ -34,4 +70,7 @@ #undef HAVE_STDLIB_H +/* Define to 1 if you have the `strchr' function. */ +#undef HAVE_STRCHR + /* Define to 1 if you have the header file. */ #undef HAVE_STRINGS_H @@ -39,4 +78,7 @@ /* Define to 1 if you have the header file. */ #undef HAVE_STRING_H + +/* Define to 1 if you have the `strtol' function. */ +#undef HAVE_STRTOL /* Define to 1 if you have the header file. */ @@ -48,4 +90,10 @@ /* Define to 1 if you have the header file. */ #undef HAVE_UNISTD_H + +/* Define to 1 if the system has the type `_Bool'. */ +#undef HAVE__BOOL + +/* Define to 1 if your C compiler doesn't accept -c and -o together. */ +#undef NO_MINUS_C_MINUS_O /* Name of package */ @@ -70,9 +118,14 @@ #undef PACKAGE_VERSION +/* If using the C implementation of alloca, define if you know the + direction of stack growth for your system; otherwise it will be + automatically deduced at runtime. + STACK_DIRECTION > 0 => grows toward higher addresses + STACK_DIRECTION < 0 => grows toward lower addresses + STACK_DIRECTION = 0 => direction of growth unknown */ +#undef STACK_DIRECTION + /* Define to 1 if you have the ANSI C header files. */ #undef STDC_HEADERS - -/* Define to 1 if your declares `struct tm'. */ -#undef TM_IN_SYS_TIME /* Version number of package */ @@ -83,6 +136,13 @@ #undef YYTEXT_POINTER -/* Define to empty if `const' does not conform to ANSI C. */ -#undef const +/* Define for Solaris 2.5.1 so the uint32_t typedef from , + , or is not used. If the typedef were allowed, the + #define below would cause a syntax error. */ +#undef _UINT32_T + +/* Define for Solaris 2.5.1 so the uint8_t typedef from , + , or is not used. If the typedef were allowed, the + #define below would cause a syntax error. */ +#undef _UINT8_T /* Define to `__inline__' or `__inline' if that's what the C compiler @@ -91,2 +151,43 @@ #undef inline #endif + +/* Define to the type of a signed integer type of width exactly 16 bits if + such a type exists and the standard includes do not define it. */ +#undef int16_t + +/* Define to the type of a signed integer type of width exactly 32 bits if + such a type exists and the standard includes do not define it. */ +#undef int32_t + +/* Define to the type of a signed integer type of width exactly 8 bits if such + a type exists and the standard includes do not define it. */ +#undef int8_t + +/* Define to the equivalent of the C99 'restrict' keyword, or to + nothing if this is not supported. Do not define if restrict is + supported directly. */ +#undef restrict +/* Work around a bug in Sun C++: it does not support _Restrict or + __restrict__, even though the corresponding Sun C compiler ends up with + "#define restrict _Restrict" or "#define restrict __restrict__" in the + previous line. Perhaps some future version of Sun C++ will work with + restrict; if so, hopefully it defines __RESTRICT like Sun C does. */ +#if defined __SUNPRO_CC && !defined __RESTRICT +# define _Restrict +# define __restrict__ +#endif + +/* Define to `unsigned int' if does not define. */ +#undef size_t + +/* Define to the type of an unsigned integer type of width exactly 16 bits if + such a type exists and the standard includes do not define it. */ +#undef uint16_t + +/* Define to the type of an unsigned integer type of width exactly 32 bits if + such a type exists and the standard includes do not define it. */ +#undef uint32_t + +/* Define to the type of an unsigned integer type of width exactly 8 bits if + such a type exists and the standard includes do not define it. */ +#undef uint8_t Index: configure =================================================================== --- configure (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ configure (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -1,5 +1,5 @@ #! /bin/sh # Guess values for system-dependent variables and create Makefiles. -# Generated by GNU Autoconf 2.68 for cfa-cc 1.0. +# Generated by GNU Autoconf 2.68 for cfa-cc 1.0.0. # # Report bugs to . @@ -561,6 +561,6 @@ PACKAGE_NAME='cfa-cc' PACKAGE_TARNAME='cfa-cc' -PACKAGE_VERSION='1.0' -PACKAGE_STRING='cfa-cc 1.0' +PACKAGE_VERSION='1.0.0' +PACKAGE_STRING='cfa-cc 1.0.0' PACKAGE_BUGREPORT='cforall@plg.uwaterloo.ca' PACKAGE_URL='' @@ -607,18 +607,14 @@ LTLIBOBJS LIBOBJS -CFA_LIBDIR -CFA_BINDIR -CFA_INCDIR -CFA_PREFIX -CPP_PATH -BACKEND_CC -GCC_PATH -preludedir +ALLOCA EGREP GREP CPP +RANLIB LEXLIB LEX_OUTPUT_ROOT LEX +YFLAGS +YACC am__fastdepCC_FALSE am__fastdepCC_TRUE @@ -644,6 +640,13 @@ CXXFLAGS CXX -YFLAGS -YACC +CFA_LIBDIR +CFA_BINDIR +CFA_INCDIR +CFA_PREFIX +BACKEND_CC +GCC_PATH +MAINT +MAINTAINER_MODE_FALSE +MAINTAINER_MODE_TRUE am__untar am__tar @@ -710,13 +713,11 @@ ac_user_opts=' enable_option_checking +enable_maintainer_mode +with_backend_compiler enable_dependency_tracking -with_preludedir -with_backend_compiler ' ac_precious_vars='build_alias host_alias target_alias -YACC -YFLAGS CXX CXXFLAGS @@ -727,4 +728,6 @@ CC CFLAGS +YACC +YFLAGS CPP' @@ -1270,5 +1273,5 @@ # This message is too long to be a string in the A/UX 3.1 sh. cat <<_ACEOF -\`configure' configures cfa-cc 1.0 to adapt to many kinds of systems. +\`configure' configures cfa-cc 1.0.0 to adapt to many kinds of systems. Usage: $0 [OPTION]... [VAR=VALUE]... @@ -1336,5 +1339,5 @@ if test -n "$ac_init_help"; then case $ac_init_help in - short | recursive ) echo "Configuration of cfa-cc 1.0:";; + short | recursive ) echo "Configuration of cfa-cc 1.0.0:";; esac cat <<\_ACEOF @@ -1344,4 +1347,6 @@ --disable-FEATURE do not include FEATURE (same as --enable-FEATURE=no) --enable-FEATURE[=ARG] include FEATURE [ARG=yes] + --disable-maintainer-mode disable make rules and dependencies not useful + (and sometimes confusing) to the casual installer --disable-dependency-tracking speeds up one-time build --enable-dependency-tracking do not reject slow dependency extractors @@ -1350,14 +1355,7 @@ --with-PACKAGE[=ARG] use PACKAGE [ARG=yes] --without-PACKAGE do not use PACKAGE (same as --with-PACKAGE=no) - --with-preludedir=DIR DIR that contains prelude.cf and other necessary files --with-backend-compiler=PROGRAM PROGRAM that performs the final code compilation (must be gcc-compatible) Some influential environment variables: - YACC The `Yet Another Compiler Compiler' implementation to use. - Defaults to the first program found out of: `bison -y', `byacc', - `yacc'. - YFLAGS The list of arguments that will be passed by default to $YACC. - This script will default YFLAGS to the empty string to avoid a - default value of `-d' given by some make applications. CXX C++ compiler command CXXFLAGS C++ compiler flags @@ -1369,4 +1367,10 @@ CC C compiler command CFLAGS C compiler flags + YACC The `Yet Another Compiler Compiler' implementation to use. + Defaults to the first program found out of: `bison -y', `byacc', + `yacc'. + YFLAGS The list of arguments that will be passed by default to $YACC. + This script will default YFLAGS to the empty string to avoid a + default value of `-d' given by some make applications. CPP C preprocessor @@ -1437,5 +1441,5 @@ if $ac_init_version; then cat <<\_ACEOF -cfa-cc configure 1.0 +cfa-cc configure 1.0.0 generated by GNU Autoconf 2.68 @@ -1573,4 +1577,58 @@ } # ac_fn_c_try_link +# ac_fn_c_check_type LINENO TYPE VAR INCLUDES +# ------------------------------------------- +# Tests whether TYPE exists after having included INCLUDES, setting cache +# variable VAR accordingly. +ac_fn_c_check_type () +{ + as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack + { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 +$as_echo_n "checking for $2... " >&6; } +if eval \${$3+:} false; then : + $as_echo_n "(cached) " >&6 +else + eval "$3=no" + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +$4 +int +main () +{ +if (sizeof ($2)) + return 0; + ; + return 0; +} +_ACEOF +if ac_fn_c_try_compile "$LINENO"; then : + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +$4 +int +main () +{ +if (sizeof (($2))) + return 0; + ; + return 0; +} +_ACEOF +if ac_fn_c_try_compile "$LINENO"; then : + +else + eval "$3=yes" +fi +rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext +fi +rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext +fi +eval ac_res=\$$3 + { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 +$as_echo "$ac_res" >&6; } + eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno + +} # ac_fn_c_check_type + # ac_fn_c_try_cpp LINENO # ---------------------- @@ -1609,4 +1667,144 @@ } # ac_fn_c_try_cpp + +# ac_fn_c_try_run LINENO +# ---------------------- +# Try to link conftest.$ac_ext, and return whether this succeeded. Assumes +# that executables *can* be run. +ac_fn_c_try_run () +{ + as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack + if { { ac_try="$ac_link" +case "(($ac_try" in + *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; + *) ac_try_echo=$ac_try;; +esac +eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" +$as_echo "$ac_try_echo"; } >&5 + (eval "$ac_link") 2>&5 + ac_status=$? + $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 + test $ac_status = 0; } && { ac_try='./conftest$ac_exeext' + { { case "(($ac_try" in + *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; + *) ac_try_echo=$ac_try;; +esac +eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" +$as_echo "$ac_try_echo"; } >&5 + (eval "$ac_try") 2>&5 + ac_status=$? + $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 + test $ac_status = 0; }; }; then : + ac_retval=0 +else + $as_echo "$as_me: program exited with status $ac_status" >&5 + $as_echo "$as_me: failed program was:" >&5 +sed 's/^/| /' conftest.$ac_ext >&5 + + ac_retval=$ac_status +fi + rm -rf conftest.dSYM conftest_ipa8_conftest.oo + eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno + as_fn_set_status $ac_retval + +} # ac_fn_c_try_run + +# ac_fn_c_check_header_compile LINENO HEADER VAR INCLUDES +# ------------------------------------------------------- +# Tests whether HEADER exists and can be compiled using the include files in +# INCLUDES, setting the cache variable VAR accordingly. +ac_fn_c_check_header_compile () +{ + as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack + { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 +$as_echo_n "checking for $2... " >&6; } +if eval \${$3+:} false; then : + $as_echo_n "(cached) " >&6 +else + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +$4 +#include <$2> +_ACEOF +if ac_fn_c_try_compile "$LINENO"; then : + eval "$3=yes" +else + eval "$3=no" +fi +rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext +fi +eval ac_res=\$$3 + { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 +$as_echo "$ac_res" >&6; } + eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno + +} # ac_fn_c_check_header_compile + +# ac_fn_c_check_func LINENO FUNC VAR +# ---------------------------------- +# Tests whether FUNC exists, setting the cache variable VAR accordingly +ac_fn_c_check_func () +{ + as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack + { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 +$as_echo_n "checking for $2... " >&6; } +if eval \${$3+:} false; then : + $as_echo_n "(cached) " >&6 +else + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +/* Define $2 to an innocuous variant, in case declares $2. + For example, HP-UX 11i declares gettimeofday. */ +#define $2 innocuous_$2 + +/* System header to define __stub macros and hopefully few prototypes, + which can conflict with char $2 (); below. + Prefer to if __STDC__ is defined, since + exists even on freestanding compilers. */ + +#ifdef __STDC__ +# include +#else +# include +#endif + +#undef $2 + +/* Override any GCC internal prototype to avoid an error. + Use char because int might match the return type of a GCC + builtin and then its argument prototype would still apply. */ +#ifdef __cplusplus +extern "C" +#endif +char $2 (); +/* The GNU C library defines this for functions which it implements + to always fail with ENOSYS. Some functions are actually named + something starting with __ and the normal name is an alias. */ +#if defined __stub_$2 || defined __stub___$2 +choke me +#endif + +int +main () +{ +return $2 (); + ; + return 0; +} +_ACEOF +if ac_fn_c_try_link "$LINENO"; then : + eval "$3=yes" +else + eval "$3=no" +fi +rm -f core conftest.err conftest.$ac_objext \ + conftest$ac_exeext conftest.$ac_ext +fi +eval ac_res=\$$3 + { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 +$as_echo "$ac_res" >&6; } + eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno + +} # ac_fn_c_check_func # ac_fn_c_check_header_mongrel LINENO HEADER VAR INCLUDES @@ -1701,69 +1899,70 @@ } # ac_fn_c_check_header_mongrel -# ac_fn_c_try_run LINENO -# ---------------------- -# Try to link conftest.$ac_ext, and return whether this succeeded. Assumes -# that executables *can* be run. -ac_fn_c_try_run () +# ac_fn_c_find_intX_t LINENO BITS VAR +# ----------------------------------- +# Finds a signed integer type with width BITS, setting cache variable VAR +# accordingly. +ac_fn_c_find_intX_t () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack - if { { ac_try="$ac_link" -case "(($ac_try" in - *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; - *) ac_try_echo=$ac_try;; -esac -eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" -$as_echo "$ac_try_echo"; } >&5 - (eval "$ac_link") 2>&5 - ac_status=$? - $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 - test $ac_status = 0; } && { ac_try='./conftest$ac_exeext' - { { case "(($ac_try" in - *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; - *) ac_try_echo=$ac_try;; -esac -eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" -$as_echo "$ac_try_echo"; } >&5 - (eval "$ac_try") 2>&5 - ac_status=$? - $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 - test $ac_status = 0; }; }; then : - ac_retval=0 -else - $as_echo "$as_me: program exited with status $ac_status" >&5 - $as_echo "$as_me: failed program was:" >&5 -sed 's/^/| /' conftest.$ac_ext >&5 - - ac_retval=$ac_status -fi - rm -rf conftest.dSYM conftest_ipa8_conftest.oo - eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno - as_fn_set_status $ac_retval - -} # ac_fn_c_try_run - -# ac_fn_c_check_header_compile LINENO HEADER VAR INCLUDES -# ------------------------------------------------------- -# Tests whether HEADER exists and can be compiled using the include files in -# INCLUDES, setting the cache variable VAR accordingly. -ac_fn_c_check_header_compile () -{ - as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack - { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 -$as_echo_n "checking for $2... " >&6; } + { $as_echo "$as_me:${as_lineno-$LINENO}: checking for int$2_t" >&5 +$as_echo_n "checking for int$2_t... " >&6; } if eval \${$3+:} false; then : $as_echo_n "(cached) " >&6 else + eval "$3=no" + # Order is important - never check a type that is potentially smaller + # than half of the expected target width. + for ac_type in int$2_t 'int' 'long int' \ + 'long long int' 'short int' 'signed char'; do + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +$ac_includes_default + enum { N = $2 / 2 - 1 }; +int +main () +{ +static int test_array [1 - 2 * !(0 < ($ac_type) ((((($ac_type) 1 << N) << N) - 1) * 2 + 1))]; +test_array [0] = 0 + + ; + return 0; +} +_ACEOF +if ac_fn_c_try_compile "$LINENO"; then : cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ -$4 -#include <$2> +$ac_includes_default + enum { N = $2 / 2 - 1 }; +int +main () +{ +static int test_array [1 - 2 * !(($ac_type) ((((($ac_type) 1 << N) << N) - 1) * 2 + 1) + < ($ac_type) ((((($ac_type) 1 << N) << N) - 1) * 2 + 2))]; +test_array [0] = 0 + + ; + return 0; +} _ACEOF if ac_fn_c_try_compile "$LINENO"; then : - eval "$3=yes" -else - eval "$3=no" + +else + case $ac_type in #( + int$2_t) : + eval "$3=yes" ;; #( + *) : + eval "$3=\$ac_type" ;; +esac fi rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext +fi +rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext + if eval test \"x\$"$3"\" = x"no"; then : + +else + break +fi + done fi eval ac_res=\$$3 @@ -1772,10 +1971,63 @@ eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno -} # ac_fn_c_check_header_compile +} # ac_fn_c_find_intX_t + +# ac_fn_c_find_uintX_t LINENO BITS VAR +# ------------------------------------ +# Finds an unsigned integer type with width BITS, setting cache variable VAR +# accordingly. +ac_fn_c_find_uintX_t () +{ + as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack + { $as_echo "$as_me:${as_lineno-$LINENO}: checking for uint$2_t" >&5 +$as_echo_n "checking for uint$2_t... " >&6; } +if eval \${$3+:} false; then : + $as_echo_n "(cached) " >&6 +else + eval "$3=no" + # Order is important - never check a type that is potentially smaller + # than half of the expected target width. + for ac_type in uint$2_t 'unsigned int' 'unsigned long int' \ + 'unsigned long long int' 'unsigned short int' 'unsigned char'; do + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +$ac_includes_default +int +main () +{ +static int test_array [1 - 2 * !((($ac_type) -1 >> ($2 / 2 - 1)) >> ($2 / 2 - 1) == 3)]; +test_array [0] = 0 + + ; + return 0; +} +_ACEOF +if ac_fn_c_try_compile "$LINENO"; then : + case $ac_type in #( + uint$2_t) : + eval "$3=yes" ;; #( + *) : + eval "$3=\$ac_type" ;; +esac +fi +rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext + if eval test \"x\$"$3"\" = x"no"; then : + +else + break +fi + done +fi +eval ac_res=\$$3 + { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 +$as_echo "$ac_res" >&6; } + eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno + +} # ac_fn_c_find_uintX_t cat >config.log <<_ACEOF This file contains any messages produced by compilers while running configure, to aid debugging if configure makes a mistake. -It was created by cfa-cc $as_me 1.0, which was +It was created by cfa-cc $as_me 1.0.0, which was generated by GNU Autoconf 2.68. Invocation command line was @@ -2125,10 +2377,6 @@ - - -am__api_version='1.11' - ac_aux_dir= -for ac_dir in "$srcdir" "$srcdir/.." "$srcdir/../.."; do +for ac_dir in automake "$srcdir"/automake; do if test -f "$ac_dir/install-sh"; then ac_aux_dir=$ac_dir @@ -2146,5 +2394,5 @@ done if test -z "$ac_aux_dir"; then - as_fn_error $? "cannot find install-sh, install.sh, or shtool in \"$srcdir\" \"$srcdir/..\" \"$srcdir/../..\"" "$LINENO" 5 + as_fn_error $? "cannot find install-sh, install.sh, or shtool in automake \"$srcdir\"/automake" "$LINENO" 5 fi @@ -2157,4 +2405,10 @@ ac_configure="$SHELL $ac_aux_dir/configure" # Please don't use this var. + + +ac_config_headers="$ac_config_headers config.h" + + +am__api_version='1.11' # Find a good install program. We prefer a C program (faster), @@ -2594,5 +2848,5 @@ # Define the identity of the package. PACKAGE='cfa-cc' - VERSION='1.0' + VERSION='1.0.0' @@ -2633,21 +2887,59 @@ - # do not follow GNU standard -ac_config_headers="$ac_config_headers config.h" - - -for ac_prog in 'bison -y' byacc -do - # Extract the first word of "$ac_prog", so it can be a program name with args. -set dummy $ac_prog; ac_word=$2 + + +{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether to enable maintainer-specific portions of Makefiles" >&5 +$as_echo_n "checking whether to enable maintainer-specific portions of Makefiles... " >&6; } + # Check whether --enable-maintainer-mode was given. +if test "${enable_maintainer_mode+set}" = set; then : + enableval=$enable_maintainer_mode; USE_MAINTAINER_MODE=$enableval +else + USE_MAINTAINER_MODE=yes +fi + + { $as_echo "$as_me:${as_lineno-$LINENO}: result: $USE_MAINTAINER_MODE" >&5 +$as_echo "$USE_MAINTAINER_MODE" >&6; } + if test $USE_MAINTAINER_MODE = yes; then + MAINTAINER_MODE_TRUE= + MAINTAINER_MODE_FALSE='#' +else + MAINTAINER_MODE_TRUE='#' + MAINTAINER_MODE_FALSE= +fi + + MAINT=$MAINTAINER_MODE_TRUE + + # may require auto* software to be installed + +# Installation paths + + +# Check whether --with-backend-compiler was given. +if test "${with_backend_compiler+set}" = set; then : + withval=$with_backend_compiler; backcompiler=$withval +else + backcompiler="" +fi + + if test x$backcompiler != x; then + cat >>confdefs.h <<_ACEOF +#define GCC_PATH "${backcompiler}" +_ACEOF + + BACKEND_CC=${backcompiler} + else + # Extract the first word of "gcc", so it can be a program name with args. +set dummy gcc; ac_word=$2 { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 $as_echo_n "checking for $ac_word... " >&6; } -if ${ac_cv_prog_YACC+:} false; then : +if ${ac_cv_path_GCC_PATH+:} false; then : $as_echo_n "(cached) " >&6 else - if test -n "$YACC"; then - ac_cv_prog_YACC="$YACC" # Let the user override the test. -else -as_save_IFS=$IFS; IFS=$PATH_SEPARATOR + case $GCC_PATH in + [\\/]* | ?:[\\/]*) + ac_cv_path_GCC_PATH="$GCC_PATH" # Let the user override the test with a path. + ;; + *) + as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do @@ -2656,5 +2948,5 @@ for ac_exec_ext in '' $ac_executable_extensions; do if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then - ac_cv_prog_YACC="$ac_prog" + ac_cv_path_GCC_PATH="$as_dir/$ac_word$ac_exec_ext" $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5 break 2 @@ -2664,10 +2956,12 @@ IFS=$as_save_IFS -fi -fi -YACC=$ac_cv_prog_YACC -if test -n "$YACC"; then - { $as_echo "$as_me:${as_lineno-$LINENO}: result: $YACC" >&5 -$as_echo "$YACC" >&6; } + test -z "$ac_cv_path_GCC_PATH" && ac_cv_path_GCC_PATH="N/A" + ;; +esac +fi +GCC_PATH=$ac_cv_path_GCC_PATH +if test -n "$GCC_PATH"; then + { $as_echo "$as_me:${as_lineno-$LINENO}: result: $GCC_PATH" >&5 +$as_echo "$GCC_PATH" >&6; } else { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 @@ -2676,8 +2970,70 @@ - test -n "$YACC" && break -done -test -n "$YACC" || YACC="yacc" - + if test "$GCC_PATH" = "N/A"; then + as_fn_error $? "some version of gcc is needed. Get it at ftp://ftp.gnu.org" "$LINENO" 5 + exit 1 + fi + +cat >>confdefs.h <<_ACEOF +#define GCC_PATH "${GCC_PATH}" +_ACEOF + + BACKEND_CC=${GCC_PATH} + fi + + +if test "x$prefix" = "xNONE"; then + cfa_prefix=${ac_default_prefix} +else + cfa_prefix=${prefix} +fi + +cat >>confdefs.h <<_ACEOF +#define CFA_PREFIX "${cfa_prefix}" +_ACEOF + +CFA_PREFIX=${cfa_prefix} + + +if test "$includedir" = '${prefix}/include'; then + cfa_incdir="${cfa_prefix}/include" +else + cfa_incdir=${$includedir} +fi + +cat >>confdefs.h <<_ACEOF +#define CFA_INCDIR "${cfa_incdir}" +_ACEOF + +CFA_INCDIR=${cfa_incdir} + + +if test "$bindir" = '${exec_prefix}/bin'; then + cfa_bindir="${cfa_prefix}/bin" +else + cfa_bindir=${bindir} +fi + +cat >>confdefs.h <<_ACEOF +#define CFA_BINDIR "${cfa_bindir}" +_ACEOF + +CFA_BINDIR=${cfa_bindir} + + +if test "$libdir" = '${exec_prefix}/lib'; then + cfa_libdir=${cfa_prefix}/lib +else + cfa_libdir=${libdir} +fi + +cat >>confdefs.h <<_ACEOF +#define CFA_LIBDIR "${cfa_libdir}" +_ACEOF + +CFA_LIBDIR=${cfa_libdir} + + +# Checks for programs. ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' @@ -4045,5 +4401,176 @@ fi - # ??? + +if test "x$CC" != xcc; then + { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether $CC and cc understand -c and -o together" >&5 +$as_echo_n "checking whether $CC and cc understand -c and -o together... " >&6; } +else + { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether cc understands -c and -o together" >&5 +$as_echo_n "checking whether cc understands -c and -o together... " >&6; } +fi +set dummy $CC; ac_cc=`$as_echo "$2" | + sed 's/[^a-zA-Z0-9_]/_/g;s/^[0-9]/_/'` +if eval \${ac_cv_prog_cc_${ac_cc}_c_o+:} false; then : + $as_echo_n "(cached) " >&6 +else + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ + +int +main () +{ + + ; + return 0; +} +_ACEOF +# Make sure it works both with $CC and with simple cc. +# We do the test twice because some compilers refuse to overwrite an +# existing .o file with -o, though they will create one. +ac_try='$CC -c conftest.$ac_ext -o conftest2.$ac_objext >&5' +rm -f conftest2.* +if { { case "(($ac_try" in + *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; + *) ac_try_echo=$ac_try;; +esac +eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" +$as_echo "$ac_try_echo"; } >&5 + (eval "$ac_try") 2>&5 + ac_status=$? + $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 + test $ac_status = 0; } && + test -f conftest2.$ac_objext && { { case "(($ac_try" in + *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; + *) ac_try_echo=$ac_try;; +esac +eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" +$as_echo "$ac_try_echo"; } >&5 + (eval "$ac_try") 2>&5 + ac_status=$? + $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 + test $ac_status = 0; }; +then + eval ac_cv_prog_cc_${ac_cc}_c_o=yes + if test "x$CC" != xcc; then + # Test first that cc exists at all. + if { ac_try='cc -c conftest.$ac_ext >&5' + { { case "(($ac_try" in + *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; + *) ac_try_echo=$ac_try;; +esac +eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" +$as_echo "$ac_try_echo"; } >&5 + (eval "$ac_try") 2>&5 + ac_status=$? + $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 + test $ac_status = 0; }; }; then + ac_try='cc -c conftest.$ac_ext -o conftest2.$ac_objext >&5' + rm -f conftest2.* + if { { case "(($ac_try" in + *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; + *) ac_try_echo=$ac_try;; +esac +eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" +$as_echo "$ac_try_echo"; } >&5 + (eval "$ac_try") 2>&5 + ac_status=$? + $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 + test $ac_status = 0; } && + test -f conftest2.$ac_objext && { { case "(($ac_try" in + *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; + *) ac_try_echo=$ac_try;; +esac +eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" +$as_echo "$ac_try_echo"; } >&5 + (eval "$ac_try") 2>&5 + ac_status=$? + $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 + test $ac_status = 0; }; + then + # cc works too. + : + else + # cc exists but doesn't like -o. + eval ac_cv_prog_cc_${ac_cc}_c_o=no + fi + fi + fi +else + eval ac_cv_prog_cc_${ac_cc}_c_o=no +fi +rm -f core conftest* + +fi +if eval test \$ac_cv_prog_cc_${ac_cc}_c_o = yes; then + { $as_echo "$as_me:${as_lineno-$LINENO}: result: yes" >&5 +$as_echo "yes" >&6; } +else + { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 +$as_echo "no" >&6; } + +$as_echo "#define NO_MINUS_C_MINUS_O 1" >>confdefs.h + +fi + +# FIXME: we rely on the cache variable name because +# there is no other way. +set dummy $CC +am_cc=`echo $2 | sed 's/[^a-zA-Z0-9_]/_/g;s/^[0-9]/_/'` +eval am_t=\$ac_cv_prog_cc_${am_cc}_c_o +if test "$am_t" != yes; then + # Losing compiler, so override with the script. + # FIXME: It is wrong to rewrite CC. + # But if we don't then we get into trouble of one sort or another. + # A longer-term fix would be to have automake use am__CC in this case, + # and then we could set am__CC="\$(top_srcdir)/compile \$(CC)" + CC="$am_aux_dir/compile $CC" +fi + + # deprecated +# These are often not installed and people miss seeing the "no", so stop the configure. +for ac_prog in 'bison -y' byacc +do + # Extract the first word of "$ac_prog", so it can be a program name with args. +set dummy $ac_prog; ac_word=$2 +{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +$as_echo_n "checking for $ac_word... " >&6; } +if ${ac_cv_prog_YACC+:} false; then : + $as_echo_n "(cached) " >&6 +else + if test -n "$YACC"; then + ac_cv_prog_YACC="$YACC" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + test -z "$as_dir" && as_dir=. + for ac_exec_ext in '' $ac_executable_extensions; do + if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then + ac_cv_prog_YACC="$ac_prog" + $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi +fi +YACC=$ac_cv_prog_YACC +if test -n "$YACC"; then + { $as_echo "$as_me:${as_lineno-$LINENO}: result: $YACC" >&5 +$as_echo "$YACC" >&6; } +else + { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 +$as_echo "no" >&6; } +fi + + + test -n "$YACC" && break +done +test -n "$YACC" || YACC="yacc" + +if test "${YACC}" = "yacc" ; then echo "Error: bison required." ; exit 1 ; fi for ac_prog in flex lex @@ -4205,7 +4732,6 @@ fi -if test "$LEX" = :; then - LEX=${am_missing_run}flex -fi +if test "${LEX}" = "lex" ; then echo "Error: flex required." ; exit 1 ; fi + { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether ${MAKE-make} sets \$(MAKE)" >&5 $as_echo_n "checking whether ${MAKE-make} sets \$(MAKE)... " >&6; } @@ -4239,7 +4765,100 @@ fi - - - +if test -n "$ac_tool_prefix"; then + # Extract the first word of "${ac_tool_prefix}ranlib", so it can be a program name with args. +set dummy ${ac_tool_prefix}ranlib; ac_word=$2 +{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +$as_echo_n "checking for $ac_word... " >&6; } +if ${ac_cv_prog_RANLIB+:} false; then : + $as_echo_n "(cached) " >&6 +else + if test -n "$RANLIB"; then + ac_cv_prog_RANLIB="$RANLIB" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + test -z "$as_dir" && as_dir=. + for ac_exec_ext in '' $ac_executable_extensions; do + if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then + ac_cv_prog_RANLIB="${ac_tool_prefix}ranlib" + $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi +fi +RANLIB=$ac_cv_prog_RANLIB +if test -n "$RANLIB"; then + { $as_echo "$as_me:${as_lineno-$LINENO}: result: $RANLIB" >&5 +$as_echo "$RANLIB" >&6; } +else + { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 +$as_echo "no" >&6; } +fi + + +fi +if test -z "$ac_cv_prog_RANLIB"; then + ac_ct_RANLIB=$RANLIB + # Extract the first word of "ranlib", so it can be a program name with args. +set dummy ranlib; ac_word=$2 +{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 +$as_echo_n "checking for $ac_word... " >&6; } +if ${ac_cv_prog_ac_ct_RANLIB+:} false; then : + $as_echo_n "(cached) " >&6 +else + if test -n "$ac_ct_RANLIB"; then + ac_cv_prog_ac_ct_RANLIB="$ac_ct_RANLIB" # Let the user override the test. +else +as_save_IFS=$IFS; IFS=$PATH_SEPARATOR +for as_dir in $PATH +do + IFS=$as_save_IFS + test -z "$as_dir" && as_dir=. + for ac_exec_ext in '' $ac_executable_extensions; do + if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then + ac_cv_prog_ac_ct_RANLIB="ranlib" + $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5 + break 2 + fi +done + done +IFS=$as_save_IFS + +fi +fi +ac_ct_RANLIB=$ac_cv_prog_ac_ct_RANLIB +if test -n "$ac_ct_RANLIB"; then + { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_RANLIB" >&5 +$as_echo "$ac_ct_RANLIB" >&6; } +else + { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 +$as_echo "no" >&6; } +fi + + if test "x$ac_ct_RANLIB" = x; then + RANLIB=":" + else + case $cross_compiling:$ac_tool_warned in +yes:) +{ $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 +$as_echo "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} +ac_tool_warned=yes ;; +esac + RANLIB=$ac_ct_RANLIB + fi +else + RANLIB="$ac_cv_prog_RANLIB" +fi + + +# Checks for libraries. + +# Checks for header files. ac_ext=c ac_cpp='$CPP $CPPFLAGS' @@ -4639,5 +5258,205 @@ -for ac_header in malloc.h unistd.h +ac_fn_c_check_type "$LINENO" "size_t" "ac_cv_type_size_t" "$ac_includes_default" +if test "x$ac_cv_type_size_t" = xyes; then : + +else + +cat >>confdefs.h <<_ACEOF +#define size_t unsigned int +_ACEOF + +fi + +# The Ultrix 4.2 mips builtin alloca declared by alloca.h only works +# for constant arguments. Useless! +{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for working alloca.h" >&5 +$as_echo_n "checking for working alloca.h... " >&6; } +if ${ac_cv_working_alloca_h+:} false; then : + $as_echo_n "(cached) " >&6 +else + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +#include +int +main () +{ +char *p = (char *) alloca (2 * sizeof (int)); + if (p) return 0; + ; + return 0; +} +_ACEOF +if ac_fn_c_try_link "$LINENO"; then : + ac_cv_working_alloca_h=yes +else + ac_cv_working_alloca_h=no +fi +rm -f core conftest.err conftest.$ac_objext \ + conftest$ac_exeext conftest.$ac_ext +fi +{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_working_alloca_h" >&5 +$as_echo "$ac_cv_working_alloca_h" >&6; } +if test $ac_cv_working_alloca_h = yes; then + +$as_echo "#define HAVE_ALLOCA_H 1" >>confdefs.h + +fi + +{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for alloca" >&5 +$as_echo_n "checking for alloca... " >&6; } +if ${ac_cv_func_alloca_works+:} false; then : + $as_echo_n "(cached) " >&6 +else + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +#ifdef __GNUC__ +# define alloca __builtin_alloca +#else +# ifdef _MSC_VER +# include +# define alloca _alloca +# else +# ifdef HAVE_ALLOCA_H +# include +# else +# ifdef _AIX + #pragma alloca +# else +# ifndef alloca /* predefined by HP cc +Olibcalls */ +void *alloca (size_t); +# endif +# endif +# endif +# endif +#endif + +int +main () +{ +char *p = (char *) alloca (1); + if (p) return 0; + ; + return 0; +} +_ACEOF +if ac_fn_c_try_link "$LINENO"; then : + ac_cv_func_alloca_works=yes +else + ac_cv_func_alloca_works=no +fi +rm -f core conftest.err conftest.$ac_objext \ + conftest$ac_exeext conftest.$ac_ext +fi +{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_func_alloca_works" >&5 +$as_echo "$ac_cv_func_alloca_works" >&6; } + +if test $ac_cv_func_alloca_works = yes; then + +$as_echo "#define HAVE_ALLOCA 1" >>confdefs.h + +else + # The SVR3 libPW and SVR4 libucb both contain incompatible functions +# that cause trouble. Some versions do not even contain alloca or +# contain a buggy version. If you still want to use their alloca, +# use ar to extract alloca.o from them instead of compiling alloca.c. + +ALLOCA=\${LIBOBJDIR}alloca.$ac_objext + +$as_echo "#define C_ALLOCA 1" >>confdefs.h + + +{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether \`alloca.c' needs Cray hooks" >&5 +$as_echo_n "checking whether \`alloca.c' needs Cray hooks... " >&6; } +if ${ac_cv_os_cray+:} false; then : + $as_echo_n "(cached) " >&6 +else + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +#if defined CRAY && ! defined CRAY2 +webecray +#else +wenotbecray +#endif + +_ACEOF +if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | + $EGREP "webecray" >/dev/null 2>&1; then : + ac_cv_os_cray=yes +else + ac_cv_os_cray=no +fi +rm -f conftest* + +fi +{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_os_cray" >&5 +$as_echo "$ac_cv_os_cray" >&6; } +if test $ac_cv_os_cray = yes; then + for ac_func in _getb67 GETB67 getb67; do + as_ac_var=`$as_echo "ac_cv_func_$ac_func" | $as_tr_sh` +ac_fn_c_check_func "$LINENO" "$ac_func" "$as_ac_var" +if eval test \"x\$"$as_ac_var"\" = x"yes"; then : + +cat >>confdefs.h <<_ACEOF +#define CRAY_STACKSEG_END $ac_func +_ACEOF + + break +fi + + done +fi + +{ $as_echo "$as_me:${as_lineno-$LINENO}: checking stack direction for C alloca" >&5 +$as_echo_n "checking stack direction for C alloca... " >&6; } +if ${ac_cv_c_stack_direction+:} false; then : + $as_echo_n "(cached) " >&6 +else + if test "$cross_compiling" = yes; then : + ac_cv_c_stack_direction=0 +else + cat confdefs.h - <<_ACEOF >conftest.$ac_ext +/* end confdefs.h. */ +$ac_includes_default +int +find_stack_direction () +{ + static char *addr = 0; + auto char dummy; + if (addr == 0) + { + addr = &dummy; + return find_stack_direction (); + } + else + return (&dummy > addr) ? 1 : -1; +} + +int +main () +{ + return find_stack_direction () < 0; +} +_ACEOF +if ac_fn_c_try_run "$LINENO"; then : + ac_cv_c_stack_direction=1 +else + ac_cv_c_stack_direction=-1 +fi +rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ + conftest.$ac_objext conftest.beam conftest.$ac_ext +fi + +fi +{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_c_stack_direction" >&5 +$as_echo "$ac_cv_c_stack_direction" >&6; } +cat >>confdefs.h <<_ACEOF +#define STACK_DIRECTION $ac_cv_c_stack_direction +_ACEOF + + +fi + +for ac_header in fenv.h float.h inttypes.h libintl.h limits.h malloc.h stddef.h stdlib.h string.h unistd.h do : as_ac_Header=`$as_echo "ac_cv_header_$ac_header" | $as_tr_sh` @@ -4653,64 +5472,67 @@ -{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for an ANSI C-conforming const" >&5 -$as_echo_n "checking for an ANSI C-conforming const... " >&6; } -if ${ac_cv_c_const+:} false; then : +# Checks for typedefs, structures, and compiler characteristics. +{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for stdbool.h that conforms to C99" >&5 +$as_echo_n "checking for stdbool.h that conforms to C99... " >&6; } +if ${ac_cv_header_stdbool_h+:} false; then : $as_echo_n "(cached) " >&6 else cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ + +#include +#ifndef bool + "error: bool is not defined" +#endif +#ifndef false + "error: false is not defined" +#endif +#if false + "error: false is not 0" +#endif +#ifndef true + "error: true is not defined" +#endif +#if true != 1 + "error: true is not 1" +#endif +#ifndef __bool_true_false_are_defined + "error: __bool_true_false_are_defined is not defined" +#endif + + struct s { _Bool s: 1; _Bool t; } s; + + char a[true == 1 ? 1 : -1]; + char b[false == 0 ? 1 : -1]; + char c[__bool_true_false_are_defined == 1 ? 1 : -1]; + char d[(bool) 0.5 == true ? 1 : -1]; + /* See body of main program for 'e'. */ + char f[(_Bool) 0.0 == false ? 1 : -1]; + char g[true]; + char h[sizeof (_Bool)]; + char i[sizeof s.t]; + enum { j = false, k = true, l = false * true, m = true * 256 }; + /* The following fails for + HP aC++/ANSI C B3910B A.05.55 [Dec 04 2003]. */ + _Bool n[m]; + char o[sizeof n == m * sizeof n[0] ? 1 : -1]; + char p[-1 - (_Bool) 0 < 0 && -1 - (bool) 0 < 0 ? 1 : -1]; + /* Catch a bug in an HP-UX C compiler. See + http://gcc.gnu.org/ml/gcc-patches/2003-12/msg02303.html + http://lists.gnu.org/archive/html/bug-coreutils/2005-11/msg00161.html + */ + _Bool q = true; + _Bool *pq = &q; int main () { -/* FIXME: Include the comments suggested by Paul. */ -#ifndef __cplusplus - /* Ultrix mips cc rejects this. */ - typedef int charset[2]; - const charset cs; - /* SunOS 4.1.1 cc rejects this. */ - char const *const *pcpcc; - char **ppc; - /* NEC SVR4.0.2 mips cc rejects this. */ - struct point {int x, y;}; - static struct point const zero = {0,0}; - /* AIX XL C 1.02.0.0 rejects this. - It does not let you subtract one const X* pointer from another in - an arm of an if-expression whose if-part is not a constant - expression */ - const char *g = "string"; - pcpcc = &g + (g ? g-g : 0); - /* HPUX 7.0 cc rejects these. */ - ++pcpcc; - ppc = (char**) pcpcc; - pcpcc = (char const *const *) ppc; - { /* SCO 3.2v4 cc rejects this. */ - char *t; - char const *s = 0 ? (char *) 0 : (char const *) 0; - - *t++ = 0; - if (s) return 0; - } - { /* Someone thinks the Sun supposedly-ANSI compiler will reject this. */ - int x[] = {25, 17}; - const int *foo = &x[0]; - ++foo; - } - { /* Sun SC1.0 ANSI compiler rejects this -- but not the above. */ - typedef const int *iptr; - iptr p = 0; - ++p; - } - { /* AIX XL C 1.02.0.0 rejects this saying - "k.c", line 2.27: 1506-025 (S) Operand must be a modifiable lvalue. */ - struct s { int j; const int *ap[3]; }; - struct s *b; b->j = 5; - } - { /* ULTRIX-32 V3.1 (Rev 9) vcc rejects this */ - const int foo = 10; - if (!foo) return 0; - } - return !cs[0] && !zero.x; -#endif + + bool e = &s; + *pq |= q; + *pq |= ! q; + /* Refer to every declared value, to avoid compiler optimizations. */ + return (!a + !b + !c + !d + !e + !f + !g + !h + !i + !!j + !k + !!l + + !m + !n + !o + !p + !q + !pq); ; @@ -4719,15 +5541,25 @@ _ACEOF if ac_fn_c_try_compile "$LINENO"; then : - ac_cv_c_const=yes -else - ac_cv_c_const=no + ac_cv_header_stdbool_h=yes +else + ac_cv_header_stdbool_h=no fi rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext fi -{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_c_const" >&5 -$as_echo "$ac_cv_c_const" >&6; } -if test $ac_cv_c_const = no; then - -$as_echo "#define const /**/" >>confdefs.h +{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_header_stdbool_h" >&5 +$as_echo "$ac_cv_header_stdbool_h" >&6; } +ac_fn_c_check_type "$LINENO" "_Bool" "ac_cv_type__Bool" "$ac_includes_default" +if test "x$ac_cv_type__Bool" = xyes; then : + +cat >>confdefs.h <<_ACEOF +#define HAVE__BOOL 1 +_ACEOF + + +fi + +if test $ac_cv_header_stdbool_h = yes; then + +$as_echo "#define HAVE_STDBOOL_H 1" >>confdefs.h fi @@ -4775,20 +5607,58 @@ esac -{ $as_echo "$as_me:${as_lineno-$LINENO}: checking whether struct tm is in sys/time.h or time.h" >&5 -$as_echo_n "checking whether struct tm is in sys/time.h or time.h... " >&6; } -if ${ac_cv_struct_tm+:} false; then : +ac_fn_c_find_intX_t "$LINENO" "16" "ac_cv_c_int16_t" +case $ac_cv_c_int16_t in #( + no|yes) ;; #( + *) + +cat >>confdefs.h <<_ACEOF +#define int16_t $ac_cv_c_int16_t +_ACEOF +;; +esac + +ac_fn_c_find_intX_t "$LINENO" "32" "ac_cv_c_int32_t" +case $ac_cv_c_int32_t in #( + no|yes) ;; #( + *) + +cat >>confdefs.h <<_ACEOF +#define int32_t $ac_cv_c_int32_t +_ACEOF +;; +esac + +ac_fn_c_find_intX_t "$LINENO" "8" "ac_cv_c_int8_t" +case $ac_cv_c_int8_t in #( + no|yes) ;; #( + *) + +cat >>confdefs.h <<_ACEOF +#define int8_t $ac_cv_c_int8_t +_ACEOF +;; +esac + +{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for C/C++ restrict keyword" >&5 +$as_echo_n "checking for C/C++ restrict keyword... " >&6; } +if ${ac_cv_c_restrict+:} false; then : $as_echo_n "(cached) " >&6 else - cat confdefs.h - <<_ACEOF >conftest.$ac_ext + ac_cv_c_restrict=no + # The order here caters to the fact that C++ does not require restrict. + for ac_kw in __restrict __restrict__ _Restrict restrict; do + cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ -#include -#include - +typedef int * int_ptr; + int foo (int_ptr $ac_kw ip) { + return ip[0]; + } int main () { -struct tm tm; - int *p = &tm.tm_sec; - return !p; +int s[1]; + int * $ac_kw t = s; + t[0] = 0; + return foo(t) ; return 0; @@ -4796,209 +5666,92 @@ _ACEOF if ac_fn_c_try_compile "$LINENO"; then : - ac_cv_struct_tm=time.h -else - ac_cv_struct_tm=sys/time.h + ac_cv_c_restrict=$ac_kw fi rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext -fi -{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_struct_tm" >&5 -$as_echo "$ac_cv_struct_tm" >&6; } -if test $ac_cv_struct_tm = sys/time.h; then - -$as_echo "#define TM_IN_SYS_TIME 1" >>confdefs.h - -fi - - -test "${prefix}" != "NONE" || prefix=$ac_default_prefix - -preludedir=${prefix}/share/cfa - -# Check whether --with-preludedir was given. -if test "${with_preludedir+set}" = set; then : - withval=$with_preludedir; preludedir=$withval -fi - - - - -# Check whether --with-backend-compiler was given. -if test "${with_backend_compiler+set}" = set; then : - withval=$with_backend_compiler; backcompiler=$withval -else - backcompiler="" -fi - - if test x$backcompiler != x; then - cat >>confdefs.h <<_ACEOF -#define GCC_PATH "${backcompiler}" -_ACEOF - - BACKEND_CC=${backcompiler} - else - # Extract the first word of "gcc", so it can be a program name with args. -set dummy gcc; ac_word=$2 -{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 -$as_echo_n "checking for $ac_word... " >&6; } -if ${ac_cv_path_GCC_PATH+:} false; then : - $as_echo_n "(cached) " >&6 -else - case $GCC_PATH in - [\\/]* | ?:[\\/]*) - ac_cv_path_GCC_PATH="$GCC_PATH" # Let the user override the test with a path. - ;; + test "$ac_cv_c_restrict" != no && break + done + +fi +{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_c_restrict" >&5 +$as_echo "$ac_cv_c_restrict" >&6; } + + case $ac_cv_c_restrict in + restrict) ;; + no) $as_echo "#define restrict /**/" >>confdefs.h + ;; + *) cat >>confdefs.h <<_ACEOF +#define restrict $ac_cv_c_restrict +_ACEOF + ;; + esac + +ac_fn_c_check_type "$LINENO" "size_t" "ac_cv_type_size_t" "$ac_includes_default" +if test "x$ac_cv_type_size_t" = xyes; then : + +else + +cat >>confdefs.h <<_ACEOF +#define size_t unsigned int +_ACEOF + +fi + +ac_fn_c_find_uintX_t "$LINENO" "16" "ac_cv_c_uint16_t" +case $ac_cv_c_uint16_t in #( + no|yes) ;; #( *) - as_save_IFS=$IFS; IFS=$PATH_SEPARATOR -for as_dir in $PATH -do - IFS=$as_save_IFS - test -z "$as_dir" && as_dir=. - for ac_exec_ext in '' $ac_executable_extensions; do - if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then - ac_cv_path_GCC_PATH="$as_dir/$ac_word$ac_exec_ext" - $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5 - break 2 - fi + + +cat >>confdefs.h <<_ACEOF +#define uint16_t $ac_cv_c_uint16_t +_ACEOF +;; + esac + +ac_fn_c_find_uintX_t "$LINENO" "32" "ac_cv_c_uint32_t" +case $ac_cv_c_uint32_t in #( + no|yes) ;; #( + *) + +$as_echo "#define _UINT32_T 1" >>confdefs.h + + +cat >>confdefs.h <<_ACEOF +#define uint32_t $ac_cv_c_uint32_t +_ACEOF +;; + esac + +ac_fn_c_find_uintX_t "$LINENO" "8" "ac_cv_c_uint8_t" +case $ac_cv_c_uint8_t in #( + no|yes) ;; #( + *) + +$as_echo "#define _UINT8_T 1" >>confdefs.h + + +cat >>confdefs.h <<_ACEOF +#define uint8_t $ac_cv_c_uint8_t +_ACEOF +;; + esac + + +# Checks for library functions. +for ac_func in memset putenv strchr strtol +do : + as_ac_var=`$as_echo "ac_cv_func_$ac_func" | $as_tr_sh` +ac_fn_c_check_func "$LINENO" "$ac_func" "$as_ac_var" +if eval test \"x\$"$as_ac_var"\" = x"yes"; then : + cat >>confdefs.h <<_ACEOF +#define `$as_echo "HAVE_$ac_func" | $as_tr_cpp` 1 +_ACEOF + +fi done - done -IFS=$as_save_IFS - - test -z "$ac_cv_path_GCC_PATH" && ac_cv_path_GCC_PATH="N/A" - ;; -esac -fi -GCC_PATH=$ac_cv_path_GCC_PATH -if test -n "$GCC_PATH"; then - { $as_echo "$as_me:${as_lineno-$LINENO}: result: $GCC_PATH" >&5 -$as_echo "$GCC_PATH" >&6; } -else - { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 -$as_echo "no" >&6; } -fi - - - if test "$GCC_PATH" = "N/A"; then - as_fn_error $? "some version of gcc is needed. Get it at ftp://ftp.gnu.org" "$LINENO" 5 - exit 1 - fi - -cat >>confdefs.h <<_ACEOF -#define GCC_PATH "${GCC_PATH}" -_ACEOF - - BACKEND_CC=${GCC_PATH} - fi - - -# Extract the first word of "cpp", so it can be a program name with args. -set dummy cpp; ac_word=$2 -{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 -$as_echo_n "checking for $ac_word... " >&6; } -if ${ac_cv_path_CPP_PATH+:} false; then : - $as_echo_n "(cached) " >&6 -else - case $CPP_PATH in - [\\/]* | ?:[\\/]*) - ac_cv_path_CPP_PATH="$CPP_PATH" # Let the user override the test with a path. - ;; - *) - as_save_IFS=$IFS; IFS=$PATH_SEPARATOR -for as_dir in $PATH -do - IFS=$as_save_IFS - test -z "$as_dir" && as_dir=. - for ac_exec_ext in '' $ac_executable_extensions; do - if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then - ac_cv_path_CPP_PATH="$as_dir/$ac_word$ac_exec_ext" - $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5 - break 2 - fi -done - done -IFS=$as_save_IFS - - test -z "$ac_cv_path_CPP_PATH" && ac_cv_path_CPP_PATH="N/A" - ;; -esac -fi -CPP_PATH=$ac_cv_path_CPP_PATH -if test -n "$CPP_PATH"; then - { $as_echo "$as_me:${as_lineno-$LINENO}: result: $CPP_PATH" >&5 -$as_echo "$CPP_PATH" >&6; } -else - { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 -$as_echo "no" >&6; } -fi - - -if test "$CPP_PATH" = "N/A"; then - as_fn_error $? "cpp not found" "$LINENO" 5 - exit 1 -fi - -cat >>confdefs.h <<_ACEOF -#define CPP_PATH "${CPP_PATH}" -_ACEOF - - -# Purify instrumenting - -CFA_PREFIX= -if test "x$prefix" = "xNONE"; then - cfa_prefix=${ac_default_prefix} -else - cfa_prefix=${prefix} -fi - -cat >>confdefs.h <<_ACEOF -#define CFA_PREFIX "${cfa_prefix}" -_ACEOF - -CFA_PREFIX=${cfa_prefix} - - -CFA_INCDIR= -if test "$includedir" = '${prefix}/include'; then - cfa_incdir="${cfa_prefix}/include" -else - cfa_incdir=${$includedir} -fi - -cat >>confdefs.h <<_ACEOF -#define CFA_INCDIR "${cfa_incdir}" -_ACEOF - -CFA_INCDIR=${cfa_incdir} - - -CFA_BINDIR= -if test "$bindir" = '${exec_prefix}/bin'; then - cfa_bindir="${cfa_prefix}/bin" -else - cfa_bindir=${bindir} -fi - -cat >>confdefs.h <<_ACEOF -#define CFA_BINDIR "${cfa_bindir}" -_ACEOF - -CFA_BINDIR=${cfa_bindir} - - -CFA_LIBDIR= -if test "$libdir" = '${exec_prefix}/lib'; then - cfa_libdir=${cfa_prefix}/lib -else - cfa_libdir=${libdir} -fi - -cat >>confdefs.h <<_ACEOF -#define CFA_LIBDIR "${cfa_libdir}" -_ACEOF - -CFA_LIBDIR=${cfa_libdir} - - -ac_config_files="$ac_config_files Makefile src/Makefile driver/Makefile libcfa/Makefile src/examples/Makefile" + + +ac_config_files="$ac_config_files Makefile src/driver/Makefile src/Makefile src/examples/Makefile src/libcfa/Makefile" + cat >confcache <<\_ACEOF @@ -5119,4 +5872,8 @@ fi +if test -z "${MAINTAINER_MODE_TRUE}" && test -z "${MAINTAINER_MODE_FALSE}"; then + as_fn_error $? "conditional \"MAINTAINER_MODE\" was never defined. +Usually this means the macro was only invoked conditionally." "$LINENO" 5 +fi if test -z "${AMDEP_TRUE}" && test -z "${AMDEP_FALSE}"; then as_fn_error $? "conditional \"AMDEP\" was never defined. @@ -5540,5 +6297,5 @@ # values after options handling. ac_log=" -This file was extended by cfa-cc $as_me 1.0, which was +This file was extended by cfa-cc $as_me 1.0.0, which was generated by GNU Autoconf 2.68. Invocation command line was @@ -5606,5 +6363,5 @@ ac_cs_config="`$as_echo "$ac_configure_args" | sed 's/^ //; s/[\\""\`\$]/\\\\&/g'`" ac_cs_version="\\ -cfa-cc config.status 1.0 +cfa-cc config.status 1.0.0 configured by $0, generated by GNU Autoconf 2.68, with options \\"\$ac_cs_config\\" @@ -5738,8 +6495,8 @@ "depfiles") CONFIG_COMMANDS="$CONFIG_COMMANDS depfiles" ;; "Makefile") CONFIG_FILES="$CONFIG_FILES Makefile" ;; + "src/driver/Makefile") CONFIG_FILES="$CONFIG_FILES src/driver/Makefile" ;; "src/Makefile") CONFIG_FILES="$CONFIG_FILES src/Makefile" ;; - "driver/Makefile") CONFIG_FILES="$CONFIG_FILES driver/Makefile" ;; - "libcfa/Makefile") CONFIG_FILES="$CONFIG_FILES libcfa/Makefile" ;; "src/examples/Makefile") CONFIG_FILES="$CONFIG_FILES src/examples/Makefile" ;; + "src/libcfa/Makefile") CONFIG_FILES="$CONFIG_FILES src/libcfa/Makefile" ;; *) as_fn_error $? "invalid argument: \`$ac_config_target'" "$LINENO" 5;; @@ -6471,5 +7228,5 @@ - -{ $as_echo "$as_me:${as_lineno-$LINENO}: result: Cforall configuraton completed. Type \"make install\"." >&5 -$as_echo "Cforall configuraton completed. Type \"make install\"." >&6; } +# Final text +{ $as_echo "$as_me:${as_lineno-$LINENO}: result: Cforall configuraton completed. Type \"make -j 8 install\"." >&5 +$as_echo "Cforall configuraton completed. Type \"make -j 8 install\"." >&6; } Index: configure.ac =================================================================== --- configure.ac (revision 937e51d79693364ccc3aec416b5db0894464e624) +++ configure.ac (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -0,0 +1,109 @@ +# -*- Autoconf -*- +# Process this file with autoconf to produce a configure script. + +AC_PREREQ([2.68]) +AC_INIT([cfa-cc],[1.0.0],[cforall@plg.uwaterloo.ca]) +AC_CONFIG_AUX_DIR([automake]) +AC_CONFIG_SRCDIR([src/main.cc]) +AC_CONFIG_HEADERS([config.h]) + +AM_INIT_AUTOMAKE +AM_MAINTAINER_MODE(enable) # may require auto* software to be installed + +# Installation paths + +AC_ARG_WITH(backend-compiler, + [ --with-backend-compiler=PROGRAM PROGRAM that performs the final code compilation (must be gcc-compatible) ], + backcompiler=$withval, backcompiler="") + if test x$backcompiler != x; then + AC_DEFINE_UNQUOTED(GCC_PATH, "${backcompiler}") + BACKEND_CC=${backcompiler} + else + AC_PATH_PROG(GCC_PATH, gcc, N/A) + if test "$GCC_PATH" = "N/A"; then + AC_MSG_ERROR(some version of gcc is needed. Get it at ftp://ftp.gnu.org) + exit 1 + fi + AC_DEFINE_UNQUOTED(GCC_PATH, "${GCC_PATH}", [Path/name of C compiler.]) + BACKEND_CC=${GCC_PATH} + fi +AC_SUBST(BACKEND_CC) + +if test "x$prefix" = "xNONE"; then + cfa_prefix=${ac_default_prefix} +else + cfa_prefix=${prefix} +fi +AC_DEFINE_UNQUOTED(CFA_PREFIX, "${cfa_prefix}", [Location of cfa files.]) +AC_SUBST(CFA_PREFIX, ${cfa_prefix}) + +if test "$includedir" = '${prefix}/include'; then + cfa_incdir="${cfa_prefix}/include" +else + cfa_incdir=${$includedir} +fi +AC_DEFINE_UNQUOTED(CFA_INCDIR, "${cfa_incdir}", [Location of include files.]) +AC_SUBST(CFA_INCDIR, ${cfa_incdir}) + +if test "$bindir" = '${exec_prefix}/bin'; then + cfa_bindir="${cfa_prefix}/bin" +else + cfa_bindir=${bindir} +fi +AC_DEFINE_UNQUOTED(CFA_BINDIR, "${cfa_bindir}", [Location of cfa command.]) +AC_SUBST(CFA_BINDIR, ${cfa_bindir}) + +if test "$libdir" = '${exec_prefix}/lib'; then + cfa_libdir=${cfa_prefix}/lib +else + cfa_libdir=${libdir} +fi +AC_DEFINE_UNQUOTED(CFA_LIBDIR, "${cfa_libdir}", [Location of cc1 and cfa-cpp commands.]) +AC_SUBST(CFA_LIBDIR, ${cfa_libdir}) + +# Checks for programs. +AC_PROG_CXX +AC_PROG_CC +AM_PROG_CC_C_O # deprecated +# These are often not installed and people miss seeing the "no", so stop the configure. +AC_PROG_YACC +if test "${YACC}" = "yacc" ; then echo "Error: bison required." ; exit 1 ; fi +AC_PROG_LEX +if test "${LEX}" = "lex" ; then echo "Error: flex required." ; exit 1 ; fi +AC_PROG_INSTALL +AC_PROG_MAKE_SET +AC_PROG_RANLIB + +# Checks for libraries. + +# Checks for header files. +AC_FUNC_ALLOCA +AC_CHECK_HEADERS([fenv.h float.h inttypes.h libintl.h limits.h malloc.h stddef.h stdlib.h string.h unistd.h]) + +# Checks for typedefs, structures, and compiler characteristics. +AC_HEADER_STDBOOL +AC_C_INLINE +AC_TYPE_INT16_T +AC_TYPE_INT32_T +AC_TYPE_INT8_T +AC_C_RESTRICT +AC_TYPE_SIZE_T +AC_TYPE_UINT16_T +AC_TYPE_UINT32_T +AC_TYPE_UINT8_T + +# Checks for library functions. +AC_CHECK_FUNCS([memset putenv strchr strtol]) + +AC_CONFIG_FILES([ + Makefile + src/driver/Makefile + src/Makefile + src/examples/Makefile + src/libcfa/Makefile + ]) + +AC_OUTPUT + +# Final text +AC_MSG_RESULT(Cforall configuraton completed. Type "make -j 8 install".) Index: nfigure.in =================================================================== --- configure.in (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ (revision ) @@ -1,107 +1,0 @@ -AC_INIT(cfa-cc, 1.0, cforall@plg.uwaterloo.ca) -AC_CONFIG_SRCDIR([src/main.cc]) - -AM_INIT_AUTOMAKE([foreign]) # do not follow GNU standard -AM_CONFIG_HEADER(config.h) - -dnl This comes from `autoscan' -dnl Checks for programs. -AC_PROG_YACC -AC_PROG_CXX -AC_PROG_CC # ??? -AM_PROG_LEX -AC_PROG_MAKE_SET -AC_PROG_INSTALL - -dnl Checks for header libraries. - -dnl Checks for header files. -AC_CHECK_HEADERS([malloc.h unistd.h]) - -dnl Checks for typedefs, structures, and compiler characteristics. -AC_C_CONST -AC_C_INLINE -AC_STRUCT_TM - -test "${prefix}" != "NONE" || prefix=$ac_default_prefix - -preludedir=${prefix}/share/cfa -AC_ARG_WITH(preludedir, - [ --with-preludedir=DIR DIR that contains prelude.cf and other necessary files ], - preludedir=$withval ) -AC_SUBST(preludedir) - -AC_ARG_WITH(backend-compiler, - [ --with-backend-compiler=PROGRAM PROGRAM that performs the final code compilation (must be gcc-compatible) ], - backcompiler=$withval, backcompiler="") - if test x$backcompiler != x; then - AC_DEFINE_UNQUOTED(GCC_PATH, "${backcompiler}") - BACKEND_CC=${backcompiler} - else - AC_PATH_PROG(GCC_PATH, gcc, N/A) - if test "$GCC_PATH" = "N/A"; then - AC_MSG_ERROR(some version of gcc is needed. Get it at ftp://ftp.gnu.org) - exit 1 - fi - AC_DEFINE_UNQUOTED(GCC_PATH, "${GCC_PATH}", [Path/name of C compiler.]) - BACKEND_CC=${GCC_PATH} - fi -AC_SUBST(BACKEND_CC) - -AC_PATH_PROG(CPP_PATH, cpp, N/A) -if test "$CPP_PATH" = "N/A"; then - AC_MSG_ERROR(cpp not found) - exit 1 -fi -AC_DEFINE_UNQUOTED(CPP_PATH, "${CPP_PATH}", [Path/name of cpp preprocessor.]) - -# Purify instrumenting -dnl AC_ARG_WITH(enablepurify, -dnl [ --with-purify Enable Purify ], - -dnl Installation paths -CFA_PREFIX= -if test "x$prefix" = "xNONE"; then - cfa_prefix=${ac_default_prefix} -else - cfa_prefix=${prefix} -fi -AC_DEFINE_UNQUOTED(CFA_PREFIX, "${cfa_prefix}", [Location of cfa files.]) -CFA_PREFIX=${cfa_prefix} -AC_SUBST(CFA_PREFIX) - -CFA_INCDIR= -if test "$includedir" = '${prefix}/include'; then - cfa_incdir="${cfa_prefix}/include" -else - cfa_incdir=${$includedir} -fi -AC_DEFINE_UNQUOTED(CFA_INCDIR, "${cfa_incdir}", [Location of include files.]) -CFA_INCDIR=${cfa_incdir} -AC_SUBST(CFA_INCDIR) - -CFA_BINDIR= -if test "$bindir" = '${exec_prefix}/bin'; then - cfa_bindir="${cfa_prefix}/bin" -else - cfa_bindir=${bindir} -fi -AC_DEFINE_UNQUOTED(CFA_BINDIR, "${cfa_bindir}", [Location of cfa command.]) -CFA_BINDIR=${cfa_bindir} -AC_SUBST(CFA_BINDIR) - -CFA_LIBDIR= -if test "$libdir" = '${exec_prefix}/lib'; then - cfa_libdir=${cfa_prefix}/lib -else - cfa_libdir=${libdir} -fi -AC_DEFINE_UNQUOTED(CFA_LIBDIR, "${cfa_libdir}", [Location of cc1 and cfa-cpp commands.]) -CFA_LIBDIR=${cfa_libdir} -AC_SUBST(CFA_LIBDIR) - -AC_OUTPUT([ Makefile src/Makefile driver/Makefile libcfa/Makefile src/examples/Makefile ]) - -dnl Final text - -AC_MSG_RESULT(Cforall configuraton completed. Type "make install".) Index: iver/Makefile.in =================================================================== --- driver/Makefile.in (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ (revision ) @@ -1,41 +1,0 @@ -######################### -*- Mode: Makefile-Gmake -*- ########################$ -## -## Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo -## -## The contents of this file are covered under the licence agreement in the -## file "LICENCE" distributed with Cforall. -## -## Makefile.in -- -## -## Author : Peter A. Buhr -## Created On : Sat May 16 07:50:15 2015 -## Last Modified By : Peter A. Buhr -## Last Modified On : Sat May 16 08:34:55 2015 -## Update Count : 4 -############################################################################### - -CXX=@CXX@ -CXXFLAGS=-g -Wall -I.. #-Wno-unused -CP=@CPP@ -INSTALL=@INSTALL@ - -SRCS:=cfa.cc cc1.cc -OBJECTS:=${SRCS:.cc=.o} -DEPS:=${SRCS:.cc=.d} - -all: cfa cc1 - -cfa: cfa.o - ${CXX} $< -o $@ - -cc1 : cc1.o - ${CXX} $< -o $@ - -install: cfa cc1 - ${INSTALL} -d @CFA_BINDIR@ - ${INSTALL} -d @CFA_LIBDIR@ - ${INSTALL} cc1 @CFA_LIBDIR@ - ${INSTALL} cfa @CFA_BINDIR@ - -clean: - rm -f cfa cc1 ${OBJECTS} ${DEPS} core Index: iver/cc1.cc =================================================================== --- driver/cc1.cc (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ (revision ) @@ -1,491 +1,0 @@ -// -// Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo -// -// The contents of this file are covered under the licence agreement in the -// file "LICENCE" distributed with Cforall. -// -// cc1.cc -- -// -// Author : Peter A. Buhr -// Created On : Fri Aug 26 14:23:51 2005 -// Last Modified By : Peter A. Buhr -// Last Modified On : Sat May 16 07:42:14 2015 -// Update Count : 49 -// - -#include -using std::cerr; -using std::endl; -#include -using std::string; -#include // stderr, stdout, perror, fprintf -#include // getenv, exit, mkstemp -#include // execvp, fork, unlink -#include // wait - -#include "config.h" // configure info - - -//#define __DEBUG_H__ - - -string compiler_name( GCC_PATH ); // path/name of C compiler - -string D__GCC_BPREFIX__( "-D__GCC_BPREFIX__=" ); -string D__CFA_FLAGPREFIX__( "-D__CFA_FLAG__=" ); - -char tmpname[] = P_tmpdir "/CFAXXXXXX"; -int tmpfilefd = -1; - - -bool prefix( string arg, string pre ) { - return arg.substr( 0, pre.size() ) == pre; -} // prefix - - -void checkEnv( const char *args[], int &nargs ) { - char *value; - - value = getenv( "__COMPILER__" ); - if ( value != NULL ) { - compiler_name = value; -#ifdef __DEBUG_H__ - cerr << "env arg:\"" << compiler_name << "\"" << endl; -#endif // __DEBUG_H__ - } // if - - value = getenv( "__GCC_MACHINE__" ); - if ( value != NULL ) { - args[nargs] = ( *new string( value ) ).c_str(); // pass the argument along -#ifdef __DEBUG_H__ - cerr << "env arg:\"" << args[nargs] << "\"" << endl; -#endif // __DEBUG_H__ - nargs += 1; - } // if - - value = getenv( "__GCC_VERSION__" ); - if ( value != NULL ) { - args[nargs] = ( *new string( value ) ).c_str(); // pass the argument along -#ifdef __DEBUG_H__ - cerr << "env arg:\"" << args[nargs] << "\"" << endl; -#endif // __DEBUG_H__ - nargs += 1; - } // if -} // checkEnv - - -void rmtmpfile() { - if ( unlink( tmpname ) == -1 ) { // remove tmpname - perror ( "CFA Translator error: cpp failed" ); - exit( EXIT_FAILURE ); - } // if - tmpfilefd = -1; // mark closed -} // rmtmpfile - - -void sigTermHandler( int signal ) { - if ( tmpfilefd != -1 ) { // RACE, file created ? - rmtmpfile(); // remove - exit( EXIT_FAILURE ); // terminate - } // if -} // sigTermHandler - - -void Stage1( const int argc, const char * const argv[] ) { - int code; - int i; - - string arg; - string bprefix; - - const char *cpp_in = NULL; - const char *cpp_out = NULL; - - bool CFA_flag = false; - bool cpp_flag = false; - const char *o_name = NULL; - - const char *args[argc + 100]; // leave space for 100 additional cpp command line values - int nargs = 1; // number of arguments in args list; 0 => command name - const char *uargs[20]; // leave space for 20 additional cfa-cpp command line values - int nuargs = 1; // 0 => command name - - signal( SIGINT, sigTermHandler ); - signal( SIGTERM, sigTermHandler ); - - // process all the arguments - - checkEnv( args, nargs ); // arguments passed via environment variables - - for ( i = 1; i < argc; i += 1 ) { -#ifdef __DEBUG_H__ - cerr << "argv[" << i << "]:\"" << argv[i] << "\"" << endl; -#endif // __DEBUG_H__ - arg = argv[i]; -#ifdef __DEBUG_H__ - cerr << "arg:\"" << arg << "\"" << endl; -#endif // __DEBUG_H__ - if ( prefix( arg, "-" ) ) { - // strip g++ flags that are inappropriate or cause duplicates in subsequent passes - - if ( arg == "-quiet" ) { - } else if ( arg == "-imultilib" || arg == "-imultiarch" ) { - i += 1; // and the argument - } else if ( prefix( arg, "-A" ) ) { - } else if ( prefix( arg, "-D__GNU" ) ) { - //******** - // GCC 5.6.0 SEPARATED THE -D FROM THE ARGUMENT! - //******** - } else if ( arg == "-D" && prefix( argv[i + 1], "__GNU" ) ) { - i += 1; // and the argument - - // strip flags controlling cpp step - - } else if ( arg == "-D__CPP__" ) { - cpp_flag = true; - } else if ( arg == "-D" && string( argv[i + 1] ) == "__CPP__" ) { - i += 1; // and the argument - cpp_flag = true; - } else if ( arg == "-D__CFA__" ) { - CFA_flag = true; - } else if ( arg == "-D" && string( argv[i + 1] ) == "__CFA__" ) { - i += 1; // and the argument - CFA_flag = true; - } else if ( prefix( arg, D__CFA_FLAGPREFIX__ ) ) { - uargs[nuargs] = ( *new string( arg.substr( D__CFA_FLAGPREFIX__.size() ) ) ).c_str(); - nuargs += 1; - } else if ( arg == "-D" && prefix( argv[i + 1], D__CFA_FLAGPREFIX__.substr(2) ) ) { - uargs[nuargs] = ( *new string( string( argv[i + 1] ).substr( D__CFA_FLAGPREFIX__.size() - 2 ) ) ).c_str(); - nuargs += 1; - i += 1; // and the argument - } else if ( prefix( arg, D__GCC_BPREFIX__ ) ) { - bprefix = arg.substr( D__GCC_BPREFIX__.size() ); - } else if ( arg == "-D" && prefix( argv[i + 1], D__GCC_BPREFIX__.substr(2) ) ) { - bprefix = string( argv[i + 1] ).substr( D__GCC_BPREFIX__.size() - 2 ); - i += 1; // and the argument - - // all other flags - - } else if ( arg == "-o" ) { - i += 1; - o_name = argv[i]; - } else { - args[nargs] = argv[i]; // pass the flag along - nargs += 1; - // CPP flags with an argument - if ( arg == "-D" || arg == "-I" || arg == "-MF" || arg == "-MT" || arg == "-MQ" || - arg == "-include" || arg == "-imacros" || arg == "-idirafter" || arg == "-iprefix" || - arg == "-iwithprefix" || arg == "-iwithprefixbefore" || arg == "-isystem" || arg == "-isysroot" ) { - i += 1; - args[nargs] = argv[i]; // pass the argument along - nargs += 1; -#ifdef __DEBUG_H__ - cerr << "argv[" << i << "]:\"" << argv[i] << "\"" << endl; -#endif // __DEBUG_H__ - } else if ( arg == "-MD" || arg == "-MMD" ) { - args[nargs] = "-MF"; // insert before file - nargs += 1; - i += 1; - args[nargs] = argv[i]; // pass the argument along - nargs += 1; -#ifdef __DEBUG_H__ - cerr << "argv[" << i << "]:\"" << argv[i] << "\"" << endl; -#endif // __DEBUG_H__ - } // if - } // if - } else { // obtain input and possibly output files - if ( cpp_in == NULL ) { - cpp_in = argv[i]; -#ifdef __DEBUG_H__ - cerr << "cpp_in:\"" << cpp_in << "\"" << endl; -#endif // __DEBUG_H__ - } else if ( cpp_out == NULL ) { - cpp_out = argv[i]; -#ifdef __DEBUG_H__ - cerr << "cpp_out:\"" << cpp_out << "\""<< endl; -#endif // __DEBUG_H__ - } else { - cerr << "Usage: " << argv[0] << " input-file [output-file] [options]" << endl; - exit( EXIT_FAILURE ); - } // if - } // if - } // for - -#ifdef __DEBUG_H__ - cerr << "args:"; - for ( i = 1; i < nargs; i += 1 ) { - cerr << " " << args[i]; - } // for - if ( cpp_in != NULL ) cerr << " " << cpp_in; - if ( cpp_out != NULL ) cerr << " " << cpp_out; - cerr << endl; -#endif // __DEBUG_H__ - - if ( cpp_in == NULL ) { - cerr << "Usage: " << argv[0] << " input-file [output-file] [options]" << endl; - exit( EXIT_FAILURE ); - } // if - - if ( cpp_flag ) { - // The -E flag is specified on the cfa command so only run the preprocessor and output is written to standard - // output or -o. The call to cfa has a -E so it does not have to be added to the argument list. - - args[0] = compiler_name.c_str(); - args[nargs] = cpp_in; - nargs += 1; - if ( o_name != NULL ) { // location for output - args[nargs] = "-o"; - nargs += 1; - args[nargs] = o_name; - nargs += 1; - } // if - args[nargs] = NULL; // terminate argument list - -#ifdef __DEBUG_H__ - cerr << "nargs: " << nargs << endl; - for ( i = 0; args[i] != NULL; i += 1 ) { - cerr << args[i] << " "; - } // for - cerr << endl; -#endif // __DEBUG_H__ - - execvp( args[0], (char *const *)args ); // should not return - perror( "CFA Translator error: cpp level, execvp" ); - exit( EXIT_FAILURE ); - } // if - - // Create a temporary file to store output of the C preprocessor. - - tmpfilefd = mkstemp( tmpname ); - if ( tmpfilefd == -1 ) { - perror( "CFA Translator error: cpp level, mkstemp" ); - exit( EXIT_FAILURE ); - } // if - -#ifdef __DEBUG_H__ - cerr << "tmpname:" << tmpname << " tmpfilefd:" << tmpfilefd << endl; -#endif // __DEBUG_H__ - - // Run the C preprocessor and save the output in tmpfile. - - if ( fork() == 0 ) { // child process ? - // -o xxx.ii cannot be used to write the output file from cpp because no output file is created if cpp detects - // an error (e.g., cannot find include file). Whereas, output is always generated, even when there is an error, - // when cpp writes to stdout. Hence, stdout is redirected into the temporary file. - if ( freopen( tmpname, "w", stdout ) == NULL ) { // redirect stdout to tmpname - perror( "CFA Translator error: cpp level, freopen" ); - exit( EXIT_FAILURE ); - } // if - - args[0] = compiler_name.c_str(); - args[nargs] = cpp_in; // input to cpp - nargs += 1; - args[nargs] = NULL; // terminate argument list - -#ifdef __DEBUG_H__ - cerr << "cpp nargs: " << nargs << endl; - for ( i = 0; args[i] != NULL; i += 1 ) { - cerr << args[i] << " "; - } // for - cerr << endl; -#endif // __DEBUG_H__ - - execvp( args[0], (char *const *)args ); // should not return - perror( "CFA Translator error: cpp level, execvp" ); - exit( EXIT_FAILURE ); - } // if - - wait( &code ); // wait for child to finish - -#ifdef __DEBUG_H__ - cerr << "return code from cpp:" << WEXITSTATUS(code) << endl; -#endif // __DEBUG_H__ - - if ( WIFSIGNALED(code) != 0 ) { // child failed ? - rmtmpfile(); // remove tmpname - cerr << "CFA Translator error: cpp failed with signal " << WTERMSIG(code) << endl; - exit( EXIT_FAILURE ); - } // if - - if ( WEXITSTATUS(code) != 0 ) { // child error ? - rmtmpfile(); // remove tmpname - exit( WEXITSTATUS( code ) ); // do not continue - } // if - - // If -CFA flag specified, run the cfa-cpp preprocessor on the temporary file, and output is written to standard - // output. Otherwise, run the cfa-cpp preprocessor on the temporary file and save the result into the output file. - - if ( fork() == 0 ) { // child runs CFA - uargs[0] = ( *new string( bprefix + "/cfa-cpp" ) ).c_str(); - - uargs[nuargs] = "-p"; - nuargs += 1; - - uargs[nuargs] = tmpname; - nuargs += 1; - if ( o_name != NULL ) { - uargs[nuargs] = o_name; - nuargs += 1; - } else if ( ! CFA_flag ) { // run cfa-cpp ? - uargs[nuargs] = cpp_out; - nuargs += 1; - } // if - uargs[nuargs] = NULL; // terminate argument list - -#ifdef __DEBUG_H__ - cerr << "cfa-cpp nuargs: " << o_name << " " << CFA_flag << " " << nuargs << endl; - for ( i = 0; uargs[i] != NULL; i += 1 ) { - cerr << uargs[i] << " "; - } // for - cerr << endl; -#endif // __DEBUG_H__ - - execvp( uargs[0], (char * const *)uargs ); // should not return - perror( "CFA Translator error: cpp level, execvp" ); - exit( EXIT_FAILURE ); - } // if - - wait( &code ); // wait for child to finish - -#ifdef __DEBUG_H__ - cerr << "return code from cfa-cpp:" << WEXITSTATUS(code) << endl; -#endif // __DEBUG_H__ - - // Must unlink here because file must exist across execvp. - rmtmpfile(); // remove tmpname - - if ( WIFSIGNALED(code) ) { // child failed ? - cerr << "CFA Translator error: cfa-cpp failed with signal " << WTERMSIG(code) << endl; - exit( EXIT_FAILURE ); - } // if - - exit( WEXITSTATUS(code) ); -} // Stage1 - - -void Stage2( const int argc, const char * const * argv ) { - int i; - - string arg; - - const char *cpp_in = NULL; - - const char *args[argc + 100]; // leave space for 100 additional cfa command line values - int nargs = 1; // number of arguments in args list; 0 => command name - - // process all the arguments - - checkEnv( args, nargs ); // arguments passed via environment variables - - for ( i = 1; i < argc; i += 1 ) { -#ifdef __DEBUG_H__ - cerr << "argv[" << i << "]:\"" << argv[i] << "\"" << endl; -#endif // __DEBUG_H__ - arg = argv[i]; -#ifdef __DEBUG_H__ - cerr << "arg:\"" << arg << "\"" << endl; -#endif // __DEBUG_H__ - if ( prefix( arg, "-" ) ) { - // strip inappropriate flags - - if ( arg == "-quiet" || arg == "-version" || arg == "-fpreprocessed" || - // Currently CFA does not suppose precompiled .h files. - prefix( arg, "--output-pch" ) ) { - - // strip inappropriate flags with an argument - - } else if ( arg == "-auxbase" || arg == "-auxbase-strip" || arg == "-dumpbase" ) { - i += 1; -#ifdef __DEBUG_H__ - cerr << "arg:\"" << argv[i] << "\"" << endl; -#endif // __DEBUG_H__ - - // all other flags - - } else { - args[nargs] = argv[i]; // pass the flag along - nargs += 1; - if ( arg == "-o" ) { - i += 1; - args[nargs] = argv[i]; // pass the argument along - nargs += 1; -#ifdef __DEBUG_H__ - cerr << "arg:\"" << argv[i] << "\"" << endl; -#endif // __DEBUG_H__ - } // if - } // if - } else { // obtain input and possibly output files - if ( cpp_in == NULL ) { - cpp_in = argv[i]; -#ifdef __DEBUG_H__ - cerr << "cpp_in:\"" << cpp_in << "\"" << endl; -#endif // __DEBUG_H__ - } else { - cerr << "Usage: " << argv[0] << " input-file [output-file] [options]" << endl; - exit( EXIT_FAILURE ); - } // if - } // if - } // for - -#ifdef __DEBUG_H__ - cerr << "args:"; - for ( i = 1; i < nargs; i += 1 ) { - cerr << " " << args[i]; - } // for - cerr << endl; - if ( cpp_in != NULL ) cerr << " " << cpp_in; -#endif // __DEBUG_H__ - - args[0] = compiler_name.c_str(); - args[nargs] = "-S"; // only compile and put assembler output in specified file - nargs += 1; - args[nargs] = cpp_in; - nargs += 1; - args[nargs] = NULL; // terminate argument list - -#ifdef __DEBUG_H__ - cerr << "stage2 nargs: " << nargs << endl; - for ( i = 0; args[i] != NULL; i += 1 ) { - cerr << args[i] << " "; - } // for - cerr << endl; -#endif // __DEBUG_H__ - - execvp( args[0], (char * const *)args ); // should not return - perror( "CFA Translator error: cpp level, execvp" ); - exit( EXIT_FAILURE ); // tell gcc not to go any further -} // Stage2 - - -int main( const int argc, const char * const argv[], const char * const env[] ) { -#ifdef __DEBUG_H__ - for ( int i = 0; env[i] != NULL; i += 1 ) { - cerr << env[i] << endl; - } // for -#endif // __DEBUG_H__ - - string arg = argv[1]; - - // Currently, stage 1 starts with flag -E and stage 2 with flag -fpreprocessed. - - if ( arg == "-E" ) { -#ifdef __DEBUG_H__ - cerr << "Stage1" << endl; -#endif // __DEBUG_H__ - Stage1( argc, argv ); - } else if ( arg == "-fpreprocessed" ) { -#ifdef __DEBUG_H__ - cerr << "Stage2" << endl; -#endif // __DEBUG_H__ - Stage2( argc, argv ); - } else { - cerr << "Usage: " << argv[0] << " input-file [output-file] [options]" << endl; - exit( EXIT_FAILURE ); - } // if -} // main - -// Local Variables: // -// tab-width: 4 // -// mode: c++ // -// compile-command: "make install" // -// End: // Index: iver/cfa.cc =================================================================== --- driver/cfa.cc (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ (revision ) @@ -1,361 +1,0 @@ -// -// Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo -// -// The contents of this file are covered under the licence agreement in the -// file "LICENCE" distributed with Cforall. -// -// cfa.cc -- -// -// Author : Peter A. Buhr -// Created On : Tue Aug 20 13:44:49 2002 -// Last Modified By : Peter A. Buhr -// Last Modified On : Sat May 16 07:47:05 2015 -// Update Count : 111 -// - -#include -#include // perror -#include // putenv, exit -#include // execvp -#include // STL version - -#include "config.h" // configure info - -using std::cerr; -using std::endl; -using std::string; - - -//#define __DEBUG_H__ - - -bool prefix( string arg, string pre ) { - return arg.substr( 0, pre.size() ) == pre; -} // prefix - - -void shuffle( const char *args[], int S, int E, int N ) { - // S & E index 1 passed the end so adjust with -1 -#ifdef __DEBUG_H__ - cerr << "shuffle:" << S << " " << E << " " << N << endl; -#endif // __DEBUG_H__ - for ( int j = E-1 + N; j > S-1 + N; j -=1 ) { -#ifdef __DEBUG_H__ - cerr << "\t" << j << " " << j-N << endl; -#endif // __DEBUG_H__ - args[j] = args[j-N]; - } // for -} // shuffle - - -int main( int argc, char *argv[] ) { - string Version( VERSION ); // current version number from CONFIG - string Major( "0" ), Minor( "0" ), Patch( "0" ); // default version numbers - int posn1 = Version.find( "." ); // find the divider between major and minor version numbers - if ( posn1 == -1 ) { // not there ? - Major = Version; - } else { - Major = Version.substr( 0, posn1 ); - int posn2 = Version.find( ".", posn1 + 1 ); // find the divider between minor and patch numbers - if ( posn2 == -1 ) { // not there ? - Minor = Version.substr( posn1 ); - } else { - Minor = Version.substr( posn1 + 1, posn2 - posn1 - 1 ); - Patch = Version.substr( posn2 + 1 ); - } // if - } // if - - string installincdir( CFA_INCDIR ); // fixed location of cc1 and cfa-cpp commands - string installlibdir( CFA_LIBDIR ); // fixed location of include files - - string heading; // banner printed at start of cfa compilation - string arg; // current command-line argument during command-line parsing - string Bprefix; // path where gcc looks for compiler command steps - string langstd; // language standard - - string compiler_path( GCC_PATH ); // path/name of C compiler - string compiler_name; // name of C compiler - - bool nonoptarg = false; // indicates non-option argument specified - bool link = true; // linking as well as compiling - bool verbose = false; // -v flag - bool quiet = false; // -quiet flag - bool debug = true; // -debug flag - bool help = false; // -help flag - bool CFA_flag = false; // -CFA flag - bool cpp_flag = false; // -E or -M flag, preprocessor only - bool debugging = false; // -g flag - - const char *args[argc + 100]; // cfa command line values, plus some space for additional flags - int sargs = 1; // starting location for arguments in args list - int nargs = sargs; // number of arguments in args list; 0 => command name - - const char *libs[argc + 20]; // non-user libraries must come separately, plus some added libraries and flags - int nlibs = 0; - -#ifdef __DEBUG_H__ - cerr << "CFA:" << endl; -#endif // __DEBUG_H__ - - // process command-line arguments - - for ( int i = 1; i < argc; i += 1 ) { -#ifdef __DEBUG_H__ - cerr << "argv[" << i << "]:\"" << argv[i] << "\"" << endl; -#endif // __DEBUG_H__ - arg = argv[i]; // convert to string value -#ifdef __DEBUG_H__ - cerr << "arg:\"" << arg << "\"" << endl; -#endif // __DEBUG_H__ - if ( prefix( arg, "-" ) ) { - // pass through arguments - - if ( arg == "-Xlinker" || arg == "-o" ) { - args[nargs] = argv[i]; // pass the argument along - nargs += 1; - i += 1; - if ( i == argc ) continue; // next argument available ? - args[nargs] = argv[i]; // pass the argument along - nargs += 1; - } else if ( arg == "-XCFA" ) { // CFA pass through - i += 1; - args[nargs] = ( *new string( string("-D__CFA_FLAG__=") + argv[i] ) ).c_str(); - nargs += 1; - - // CFA specific arguments - - } else if ( arg == "-CFA" ) { - CFA_flag = true; // strip the -CFA flag - link = false; - args[nargs] = "-E"; // replace the argument with -E - nargs += 1; - } else if ( arg == "-debug" ) { - debug = true; // strip the debug flag - } else if ( arg == "-nodebug" ) { - debug = false; // strip the nodebug flag - } else if ( arg == "-quiet" ) { - quiet = true; // strip the quiet flag - } else if ( arg == "-noquiet" ) { - quiet = false; // strip the noquiet flag - } else if ( arg == "-help" ) { - help = true; // strip the help flag - } else if ( arg == "-nohelp" ) { - help = false; // strip the nohelp flag - } else if ( arg == "-compiler" ) { - // use the user specified compiler - i += 1; - if ( i == argc ) continue; // next argument available ? - compiler_path = argv[i]; - if ( putenv( (char *)( *new string( string( "__U_COMPILER__=" ) + argv[i]) ).c_str() ) != 0 ) { - cerr << argv[0] << " error, cannot set environment variable." << endl; - exit( EXIT_FAILURE ); - } // if - - // C++ specific arguments - - } else if ( arg == "-v" ) { - verbose = true; // verbosity required - args[nargs] = argv[i]; // pass the argument along - nargs += 1; - } else if ( arg == "-g" ) { - debugging = true; // symbolic debugging required - args[nargs] = argv[i]; // pass the argument along - nargs += 1; - } else if ( prefix( arg, "-B" ) ) { - Bprefix = arg.substr(2); // strip the -B flag - args[nargs] = ( *new string( string("-D__GCC_BPREFIX__=") + Bprefix ) ).c_str(); - nargs += 1; - } else if ( prefix( arg, "-b" ) ) { - if ( arg.length() == 2 ) { // separate argument ? - i += 1; - if ( i == argc ) continue; // next argument available ? - arg += argv[i]; // concatenate argument - } // if - // later versions of gcc require the -b option to appear at the start of the command line - shuffle( args, sargs, nargs, 1 ); // make room at front of argument list - args[sargs] = ( *new string( arg ) ).c_str(); // pass the argument along - if ( putenv( (char *)( *new string( string( "__GCC_MACHINE__=" ) + arg ) ).c_str() ) != 0 ) { - cerr << argv[0] << " error, cannot set environment variable." << endl; - exit( EXIT_FAILURE ); - } // if - sargs += 1; - nargs += 1; - } else if ( prefix( arg, "-V" ) ) { - if ( arg.length() == 2 ) { // separate argument ? - i += 1; - if ( i == argc ) continue; // next argument available ? - arg += argv[i]; // concatenate argument - } // if - // later versions of gcc require the -V option to appear at the start of the command line - shuffle( args, sargs, nargs, 1 ); // make room at front of argument list - args[sargs] = ( *new string( arg ) ).c_str(); // pass the argument along - if ( putenv( (char *)( *new string( string( "__GCC_VERSION__=" ) + arg ) ).c_str() ) != 0 ) { - cerr << argv[0] << " error, cannot set environment variable." << endl; - exit( EXIT_FAILURE ); - } // if - sargs += 1; - nargs += 1; - } else if ( arg == "-c" || arg == "-S" || arg == "-E" || arg == "-M" || arg == "-MM" ) { - args[nargs] = argv[i]; // pass the argument along - nargs += 1; - if ( arg == "-E" || arg == "-M" || arg == "-MM" ) { - cpp_flag = true; // cpp only - } // if - link = false; // no linkage required - } else if ( arg[1] == 'l' ) { - // if the user specifies a library, load it after user code - libs[nlibs] = argv[i]; - nlibs += 1; - } else { - // concatenate any other arguments - args[nargs] = argv[i]; - nargs += 1; - } // if - } else { - // concatenate other arguments - args[nargs] = argv[i]; - nargs += 1; - nonoptarg = true; - } // if - } // for - -#ifdef __DEBUG_H__ - cerr << "args:"; - for ( int i = 1; i < nargs; i += 1 ) { - cerr << " " << args[i]; - } // for - cerr << endl; -#endif // __DEBUG_H__ - - if ( cpp_flag && CFA_flag ) { - cerr << argv[0] << " error, cannot use -E and -CFA flags together." << endl; - exit( EXIT_FAILURE ); - } // if - - string d; - if ( debug ) { - d = "-d"; - } // if - - args[nargs] = "-I" CFA_INCDIR; - nargs += 1; - - if ( link ) { - // include the cfa library in case it's needed - args[nargs] = "-L" CFA_LIBDIR; - nargs += 1; - args[nargs] = "-lcfa"; - nargs += 1; - } // if - - // add the correct set of flags based on the type of compile this is - - args[nargs] = ( *new string( string("-D__CFA_MAJOR__=") + Major ) ).c_str(); - nargs += 1; - args[nargs] = ( *new string( string("-D__CFA_MINOR__=") + Minor ) ).c_str(); - nargs += 1; - - if ( cpp_flag ) { - args[nargs] = "-D__CPP__"; - nargs += 1; - } // if - - if ( CFA_flag ) { - args[nargs] = "-D__CFA__"; - nargs += 1; - } // if - - if ( debug ) { - heading += " (debug)"; - args[nargs] = "-D__CFA_DEBUG__"; - nargs += 1; - } else { - heading += " (no debug)"; - } // if - - if ( Bprefix.length() == 0 ) { - Bprefix = installlibdir; - args[nargs] = ( *new string( string("-D__GCC_BPREFIX__=") + Bprefix ) ).c_str(); - nargs += 1; - } // if - - // execute the compilation command - - args[0] = compiler_path.c_str(); // set compiler command for exec - // find actual name of the compiler independent of the path to it - int p = compiler_path.find_last_of( '/' ); // scan r -> l for first '/' - if ( p == -1 ) { - compiler_name = compiler_path; - } else { - compiler_name = *new string( compiler_path.substr( p + 1 ) ); - } // if - - if ( prefix( compiler_name, "gcc" ) ) { // allow suffix on gcc name - args[nargs] = "-no-integrated-cpp"; - nargs += 1; - args[nargs] = "-Wno-deprecated"; - nargs += 1; - args[nargs] = "-std=c99"; - nargs += 1; - args[nargs] = ( *new string( string("-B") + Bprefix + "/" ) ).c_str(); - nargs += 1; - } else { - cerr << argv[0] << " error, compiler " << compiler_name << " not supported." << endl; - exit( EXIT_FAILURE ); - } // if - - for ( int i = 0; i < nlibs; i += 1 ) { // copy non-user libraries after all user libraries - args[nargs] = libs[i]; - nargs += 1; - } // for - - args[nargs] = NULL; // terminate with NULL - -#ifdef __DEBUG_H__ - cerr << "nargs: " << nargs << endl; - cerr << "args:" << endl; - for ( int i = 0; args[i] != NULL; i += 1 ) { - cerr << " \"" << args[i] << "\"" << endl; - } // for -#endif // __DEBUG_H__ - - if ( ! quiet ) { - cerr << "CFA " << "Version " << Version << heading << endl; - - if ( help ) { - cerr << - "-debug\t\t\t: use cfa runtime with debug checking" << endl << - "-help\t\t\t: print this help message" << endl << - "-quiet\t\t\t: print no messages from the cfa command" << endl << - "-CFA\t\t\t: run the cpp preprocessor and the cfa-cpp translator" << endl << - "-XCFA -cfa-cpp-flag\t: pass next flag as-is to the cfa-cpp translator" << endl << - "...\t\t\t: any other " << compiler_name << " flags" << endl; - } // if - } // if - - if ( verbose ) { - if ( argc == 2 ) exit( EXIT_SUCCESS ); // if only the -v flag is specified, do not invoke gcc - - for ( int i = 0; args[i] != NULL; i += 1 ) { - cerr << args[i] << " "; - } // for - cerr << endl; - } // if - - if ( ! nonoptarg ) { - cerr << argv[0] << " error, no input files" << endl; - exit( EXIT_FAILURE ); - } // if - - // execute the command and return the result - - execvp( args[0], (char *const *)args ); // should not return - perror( "CFA Translator error: cfa level, execvp" ); - exit( EXIT_FAILURE ); -} // main - -// Local Variables: // -// tab-width: 4 // -// mode: c++ // -// compile-command: "make install" // -// End: // Index: stall-sh =================================================================== --- install-sh (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ (revision ) @@ -1,527 +1,0 @@ -#!/bin/sh -# install - install a program, script, or datafile - -scriptversion=2011-01-19.21; # UTC - -# This originates from X11R5 (mit/util/scripts/install.sh), which was -# later released in X11R6 (xc/config/util/install.sh) with the -# following copyright and license. -# -# Copyright (C) 1994 X Consortium -# -# Permission is hereby granted, free of charge, to any person obtaining a copy -# of this software and associated documentation files (the "Software"), to -# deal in the Software without restriction, including without limitation the -# rights to use, copy, modify, merge, publish, distribute, sublicense, and/or -# sell copies of the Software, and to permit persons to whom the Software is -# furnished to do so, subject to the following conditions: -# -# The above copyright notice and this permission notice shall be included in -# all copies or substantial portions of the Software. -# -# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR -# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, -# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE -# X CONSORTIUM BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN -# AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNEC- -# TION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. -# -# Except as contained in this notice, the name of the X Consortium shall not -# be used in advertising or otherwise to promote the sale, use or other deal- -# ings in this Software without prior written authorization from the X Consor- -# tium. -# -# -# FSF changes to this file are in the public domain. -# -# Calling this script install-sh is preferred over install.sh, to prevent -# `make' implicit rules from creating a file called install from it -# when there is no Makefile. -# -# This script is compatible with the BSD install script, but was written -# from scratch. - -nl=' -' -IFS=" "" $nl" - -# set DOITPROG to echo to test this script - -# Don't use :- since 4.3BSD and earlier shells don't like it. -doit=${DOITPROG-} -if test -z "$doit"; then - doit_exec=exec -else - doit_exec=$doit -fi - -# Put in absolute file names if you don't have them in your path; -# or use environment vars. - -chgrpprog=${CHGRPPROG-chgrp} -chmodprog=${CHMODPROG-chmod} -chownprog=${CHOWNPROG-chown} -cmpprog=${CMPPROG-cmp} -cpprog=${CPPROG-cp} -mkdirprog=${MKDIRPROG-mkdir} -mvprog=${MVPROG-mv} -rmprog=${RMPROG-rm} -stripprog=${STRIPPROG-strip} - -posix_glob='?' -initialize_posix_glob=' - test "$posix_glob" != "?" || { - if (set -f) 2>/dev/null; then - posix_glob= - else - posix_glob=: - fi - } -' - -posix_mkdir= - -# Desired mode of installed file. -mode=0755 - -chgrpcmd= -chmodcmd=$chmodprog -chowncmd= -mvcmd=$mvprog -rmcmd="$rmprog -f" -stripcmd= - -src= -dst= -dir_arg= -dst_arg= - -copy_on_change=false -no_target_directory= - -usage="\ -Usage: $0 [OPTION]... [-T] SRCFILE DSTFILE - or: $0 [OPTION]... SRCFILES... DIRECTORY - or: $0 [OPTION]... -t DIRECTORY SRCFILES... - or: $0 [OPTION]... -d DIRECTORIES... - -In the 1st form, copy SRCFILE to DSTFILE. -In the 2nd and 3rd, copy all SRCFILES to DIRECTORY. -In the 4th, create DIRECTORIES. - -Options: - --help display this help and exit. - --version display version info and exit. - - -c (ignored) - -C install only if different (preserve the last data modification time) - -d create directories instead of installing files. - -g GROUP $chgrpprog installed files to GROUP. - -m MODE $chmodprog installed files to MODE. - -o USER $chownprog installed files to USER. - -s $stripprog installed files. - -t DIRECTORY install into DIRECTORY. - -T report an error if DSTFILE is a directory. - -Environment variables override the default commands: - CHGRPPROG CHMODPROG CHOWNPROG CMPPROG CPPROG MKDIRPROG MVPROG - RMPROG STRIPPROG -" - -while test $# -ne 0; do - case $1 in - -c) ;; - - -C) copy_on_change=true;; - - -d) dir_arg=true;; - - -g) chgrpcmd="$chgrpprog $2" - shift;; - - --help) echo "$usage"; exit $?;; - - -m) mode=$2 - case $mode in - *' '* | *' '* | *' -'* | *'*'* | *'?'* | *'['*) - echo "$0: invalid mode: $mode" >&2 - exit 1;; - esac - shift;; - - -o) chowncmd="$chownprog $2" - shift;; - - -s) stripcmd=$stripprog;; - - -t) dst_arg=$2 - # Protect names problematic for `test' and other utilities. - case $dst_arg in - -* | [=\(\)!]) dst_arg=./$dst_arg;; - esac - shift;; - - -T) no_target_directory=true;; - - --version) echo "$0 $scriptversion"; exit $?;; - - --) shift - break;; - - -*) echo "$0: invalid option: $1" >&2 - exit 1;; - - *) break;; - esac - shift -done - -if test $# -ne 0 && test -z "$dir_arg$dst_arg"; then - # When -d is used, all remaining arguments are directories to create. - # When -t is used, the destination is already specified. - # Otherwise, the last argument is the destination. Remove it from $@. - for arg - do - if test -n "$dst_arg"; then - # $@ is not empty: it contains at least $arg. - set fnord "$@" "$dst_arg" - shift # fnord - fi - shift # arg - dst_arg=$arg - # Protect names problematic for `test' and other utilities. - case $dst_arg in - -* | [=\(\)!]) dst_arg=./$dst_arg;; - esac - done -fi - -if test $# -eq 0; then - if test -z "$dir_arg"; then - echo "$0: no input file specified." >&2 - exit 1 - fi - # It's OK to call `install-sh -d' without argument. - # This can happen when creating conditional directories. - exit 0 -fi - -if test -z "$dir_arg"; then - do_exit='(exit $ret); exit $ret' - trap "ret=129; $do_exit" 1 - trap "ret=130; $do_exit" 2 - trap "ret=141; $do_exit" 13 - trap "ret=143; $do_exit" 15 - - # Set umask so as not to create temps with too-generous modes. - # However, 'strip' requires both read and write access to temps. - case $mode in - # Optimize common cases. - *644) cp_umask=133;; - *755) cp_umask=22;; - - *[0-7]) - if test -z "$stripcmd"; then - u_plus_rw= - else - u_plus_rw='% 200' - fi - cp_umask=`expr '(' 777 - $mode % 1000 ')' $u_plus_rw`;; - *) - if test -z "$stripcmd"; then - u_plus_rw= - else - u_plus_rw=,u+rw - fi - cp_umask=$mode$u_plus_rw;; - esac -fi - -for src -do - # Protect names problematic for `test' and other utilities. - case $src in - -* | [=\(\)!]) src=./$src;; - esac - - if test -n "$dir_arg"; then - dst=$src - dstdir=$dst - test -d "$dstdir" - dstdir_status=$? - else - - # Waiting for this to be detected by the "$cpprog $src $dsttmp" command - # might cause directories to be created, which would be especially bad - # if $src (and thus $dsttmp) contains '*'. - if test ! -f "$src" && test ! -d "$src"; then - echo "$0: $src does not exist." >&2 - exit 1 - fi - - if test -z "$dst_arg"; then - echo "$0: no destination specified." >&2 - exit 1 - fi - dst=$dst_arg - - # If destination is a directory, append the input filename; won't work - # if double slashes aren't ignored. - if test -d "$dst"; then - if test -n "$no_target_directory"; then - echo "$0: $dst_arg: Is a directory" >&2 - exit 1 - fi - dstdir=$dst - dst=$dstdir/`basename "$src"` - dstdir_status=0 - else - # Prefer dirname, but fall back on a substitute if dirname fails. - dstdir=` - (dirname "$dst") 2>/dev/null || - expr X"$dst" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ - X"$dst" : 'X\(//\)[^/]' \| \ - X"$dst" : 'X\(//\)$' \| \ - X"$dst" : 'X\(/\)' \| . 2>/dev/null || - echo X"$dst" | - sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ - s//\1/ - q - } - /^X\(\/\/\)[^/].*/{ - s//\1/ - q - } - /^X\(\/\/\)$/{ - s//\1/ - q - } - /^X\(\/\).*/{ - s//\1/ - q - } - s/.*/./; q' - ` - - test -d "$dstdir" - dstdir_status=$? - fi - fi - - obsolete_mkdir_used=false - - if test $dstdir_status != 0; then - case $posix_mkdir in - '') - # Create intermediate dirs using mode 755 as modified by the umask. - # This is like FreeBSD 'install' as of 1997-10-28. - umask=`umask` - case $stripcmd.$umask in - # Optimize common cases. - *[2367][2367]) mkdir_umask=$umask;; - .*0[02][02] | .[02][02] | .[02]) mkdir_umask=22;; - - *[0-7]) - mkdir_umask=`expr $umask + 22 \ - - $umask % 100 % 40 + $umask % 20 \ - - $umask % 10 % 4 + $umask % 2 - `;; - *) mkdir_umask=$umask,go-w;; - esac - - # With -d, create the new directory with the user-specified mode. - # Otherwise, rely on $mkdir_umask. - if test -n "$dir_arg"; then - mkdir_mode=-m$mode - else - mkdir_mode= - fi - - posix_mkdir=false - case $umask in - *[123567][0-7][0-7]) - # POSIX mkdir -p sets u+wx bits regardless of umask, which - # is incompatible with FreeBSD 'install' when (umask & 300) != 0. - ;; - *) - tmpdir=${TMPDIR-/tmp}/ins$RANDOM-$$ - trap 'ret=$?; rmdir "$tmpdir/d" "$tmpdir" 2>/dev/null; exit $ret' 0 - - if (umask $mkdir_umask && - exec $mkdirprog $mkdir_mode -p -- "$tmpdir/d") >/dev/null 2>&1 - then - if test -z "$dir_arg" || { - # Check for POSIX incompatibilities with -m. - # HP-UX 11.23 and IRIX 6.5 mkdir -m -p sets group- or - # other-writeable bit of parent directory when it shouldn't. - # FreeBSD 6.1 mkdir -m -p sets mode of existing directory. - ls_ld_tmpdir=`ls -ld "$tmpdir"` - case $ls_ld_tmpdir in - d????-?r-*) different_mode=700;; - d????-?--*) different_mode=755;; - *) false;; - esac && - $mkdirprog -m$different_mode -p -- "$tmpdir" && { - ls_ld_tmpdir_1=`ls -ld "$tmpdir"` - test "$ls_ld_tmpdir" = "$ls_ld_tmpdir_1" - } - } - then posix_mkdir=: - fi - rmdir "$tmpdir/d" "$tmpdir" - else - # Remove any dirs left behind by ancient mkdir implementations. - rmdir ./$mkdir_mode ./-p ./-- 2>/dev/null - fi - trap '' 0;; - esac;; - esac - - if - $posix_mkdir && ( - umask $mkdir_umask && - $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir" - ) - then : - else - - # The umask is ridiculous, or mkdir does not conform to POSIX, - # or it failed possibly due to a race condition. Create the - # directory the slow way, step by step, checking for races as we go. - - case $dstdir in - /*) prefix='/';; - [-=\(\)!]*) prefix='./';; - *) prefix='';; - esac - - eval "$initialize_posix_glob" - - oIFS=$IFS - IFS=/ - $posix_glob set -f - set fnord $dstdir - shift - $posix_glob set +f - IFS=$oIFS - - prefixes= - - for d - do - test X"$d" = X && continue - - prefix=$prefix$d - if test -d "$prefix"; then - prefixes= - else - if $posix_mkdir; then - (umask=$mkdir_umask && - $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir") && break - # Don't fail if two instances are running concurrently. - test -d "$prefix" || exit 1 - else - case $prefix in - *\'*) qprefix=`echo "$prefix" | sed "s/'/'\\\\\\\\''/g"`;; - *) qprefix=$prefix;; - esac - prefixes="$prefixes '$qprefix'" - fi - fi - prefix=$prefix/ - done - - if test -n "$prefixes"; then - # Don't fail if two instances are running concurrently. - (umask $mkdir_umask && - eval "\$doit_exec \$mkdirprog $prefixes") || - test -d "$dstdir" || exit 1 - obsolete_mkdir_used=true - fi - fi - fi - - if test -n "$dir_arg"; then - { test -z "$chowncmd" || $doit $chowncmd "$dst"; } && - { test -z "$chgrpcmd" || $doit $chgrpcmd "$dst"; } && - { test "$obsolete_mkdir_used$chowncmd$chgrpcmd" = false || - test -z "$chmodcmd" || $doit $chmodcmd $mode "$dst"; } || exit 1 - else - - # Make a couple of temp file names in the proper directory. - dsttmp=$dstdir/_inst.$$_ - rmtmp=$dstdir/_rm.$$_ - - # Trap to clean up those temp files at exit. - trap 'ret=$?; rm -f "$dsttmp" "$rmtmp" && exit $ret' 0 - - # Copy the file name to the temp name. - (umask $cp_umask && $doit_exec $cpprog "$src" "$dsttmp") && - - # and set any options; do chmod last to preserve setuid bits. - # - # If any of these fail, we abort the whole thing. If we want to - # ignore errors from any of these, just make sure not to ignore - # errors from the above "$doit $cpprog $src $dsttmp" command. - # - { test -z "$chowncmd" || $doit $chowncmd "$dsttmp"; } && - { test -z "$chgrpcmd" || $doit $chgrpcmd "$dsttmp"; } && - { test -z "$stripcmd" || $doit $stripcmd "$dsttmp"; } && - { test -z "$chmodcmd" || $doit $chmodcmd $mode "$dsttmp"; } && - - # If -C, don't bother to copy if it wouldn't change the file. - if $copy_on_change && - old=`LC_ALL=C ls -dlL "$dst" 2>/dev/null` && - new=`LC_ALL=C ls -dlL "$dsttmp" 2>/dev/null` && - - eval "$initialize_posix_glob" && - $posix_glob set -f && - set X $old && old=:$2:$4:$5:$6 && - set X $new && new=:$2:$4:$5:$6 && - $posix_glob set +f && - - test "$old" = "$new" && - $cmpprog "$dst" "$dsttmp" >/dev/null 2>&1 - then - rm -f "$dsttmp" - else - # Rename the file to the real destination. - $doit $mvcmd -f "$dsttmp" "$dst" 2>/dev/null || - - # The rename failed, perhaps because mv can't rename something else - # to itself, or perhaps because mv is so ancient that it does not - # support -f. - { - # Now remove or move aside any old file at destination location. - # We try this two ways since rm can't unlink itself on some - # systems and the destination file might be busy for other - # reasons. In this case, the final cleanup might fail but the new - # file should still install successfully. - { - test ! -f "$dst" || - $doit $rmcmd -f "$dst" 2>/dev/null || - { $doit $mvcmd -f "$dst" "$rmtmp" 2>/dev/null && - { $doit $rmcmd -f "$rmtmp" 2>/dev/null; :; } - } || - { echo "$0: cannot unlink or rename $dst" >&2 - (exit 1); exit 1 - } - } && - - # Now rename the file to the real destination. - $doit $mvcmd "$dsttmp" "$dst" - } - fi || exit 1 - - trap '' 0 - fi -done - -# Local variables: -# eval: (add-hook 'write-file-hooks 'time-stamp) -# time-stamp-start: "scriptversion=" -# time-stamp-format: "%:y-%02m-%02d.%02H" -# time-stamp-time-zone: "UTC" -# time-stamp-end: "; # UTC" -# End: Index: bcfa/Makefile.in =================================================================== --- libcfa/Makefile.in (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ (revision ) @@ -1,55 +1,0 @@ -######################### -*- Mode: Makefile-Gmake -*- ######################## -## -## Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo -## -## The contents of this file are covered under the licence agreement in the -## file "LICENCE" distributed with Cforall. -## -## Makefile.in -- -## -## Author : Peter A. Buhr -## Created On : Sat May 16 08:05:18 2015 -## Last Modified By : Peter A. Buhr -## Last Modified On : Thu May 21 22:00:51 2015 -## Update Count : 3 -############################################################################### - -INSTALL=@INSTALL@ -BACKEND_CC := @BACKEND_CC@ -CFA_LIBDIR = @CFA_LIBDIR@ - -LIBRARIES := libcfa.a builtins.cf builtins.c - -all: ${LIBRARIES} - -install: all - ${INSTALL} -d @CFA_LIBDIR@ - ${INSTALL} prelude.cf @CFA_LIBDIR@ - ${INSTALL} libcfa.a @CFA_LIBDIR@ - -# make forward declarations for gcc builtins -builtins.c: Makefile builtins.def - @BACKEND_CC@ -E prototypes.c | awk -f prototypes.awk > $@ - -builtins.cf: builtins.c - @BACKEND_CC@ -E -P $^ | sed -e "/targetm/s/.*//" -e "/_Decimal/s/.*//" -e "s/void (const char \*)0();//" -e "s/\"//g" -e "s/\(__builtin_\) /\1/" > $@ - ${INSTALL} builtins.cf @CFA_LIBDIR@ - -libcfa-prelude.c: @CFA_LIBDIR@/cfa-cpp prelude.cf builtins.cf - sed -i -e "s#typedef.*ptrdiff_t.*#`@BACKEND_CC@ -E ptrdiff_t.c | grep 'typedef.*ptrdiff_t'`#" prelude.cf - @CFA_LIBDIR@/cfa-cpp -l prelude.cf $@ - rm -f prelude.c - -libcfa-prelude.o: libcfa-prelude.c - ${BACKEND_CC} -c -o $@ $< - -libcfa.a: libcfa-prelude.o - ar crs $@ $^ - -EXTRA_OUTPUT += libcfa-prelude.o libcfa-prelude.c - -# clean-up rule -clean: - rm -f ${LIBRARIES} ${EXTRA_OUTPUT} - -distclean: clean Index: bcfa/builtins.def =================================================================== --- libcfa/builtins.def (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ (revision ) @@ -1,874 +1,0 @@ -/* This file contains the definitions and documentation for the - builtins used in the GNU compiler. - Copyright (C) 2000-2014 Free Software Foundation, Inc. - -This file is part of GCC. - -GCC 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 3, or (at your option) any later -version. - -GCC 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 GCC; see the file COPYING3. If not see -. */ - -/* Before including this file, you should define a macro: - - DEF_BUILTIN (ENUM, NAME, CLASS, TYPE, LIBTYPE, BOTH_P, - FALLBACK_P, NONANSI_P, ATTRS, IMPLICIT, COND) - - This macro will be called once for each builtin function. The - ENUM will be of type `enum built_in_function', and will indicate - which builtin function is being processed. The NAME of the builtin - function (which will always start with `__builtin_') is a string - literal. The CLASS is of type `enum built_in_class' and indicates - what kind of builtin is being processed. - - Some builtins are actually two separate functions. For example, - for `strcmp' there are two builtin functions; `__builtin_strcmp' - and `strcmp' itself. Both behave identically. Other builtins - define only the `__builtin' variant. If BOTH_P is TRUE, then this - builtin has both variants; otherwise, it is has only the first - variant. - - TYPE indicates the type of the function. The symbols correspond to - enumerals from builtin-types.def. If BOTH_P is true, then LIBTYPE - is the type of the non-`__builtin_' variant. Otherwise, LIBTYPE - should be ignored. - - If FALLBACK_P is true then, if for some reason, the compiler cannot - expand the builtin function directly, it will call the - corresponding library function (which does not have the - `__builtin_' prefix. - - If NONANSI_P is true, then the non-`__builtin_' variant is not an - ANSI/ISO library function, and so we should pretend it does not - exist when compiling in ANSI conformant mode. - - ATTRs is an attribute list as defined in builtin-attrs.def that - describes the attributes of this builtin function. - - IMPLICIT specifies condition when the builtin can be produced by - compiler. For instance C90 reserves floorf function, but does not - define it's meaning. When user uses floorf we may assume that the - floorf has the meaning we expect, but we can't produce floorf by - simplifying floor((double)float) since the runtime need not implement - it. - - The builtins is registered only if COND is true. */ - -/* A GCC builtin (like __builtin_saveregs) is provided by the - compiler, but does not correspond to a function in the standard - library. */ -#undef DEF_GCC_BUILTIN -#define DEF_GCC_BUILTIN(ENUM, NAME, TYPE, ATTRS) \ - DEF_BUILTIN (ENUM, "__builtin_" NAME, BUILT_IN_NORMAL, TYPE, BT_LAST, \ - false, false, false, ATTRS, true, true) - -/* Like DEF_GCC_BUILTIN, except we don't prepend "__builtin_". */ -#undef DEF_SYNC_BUILTIN -#define DEF_SYNC_BUILTIN(ENUM, NAME, TYPE, ATTRS) \ - DEF_BUILTIN (ENUM, NAME, BUILT_IN_NORMAL, TYPE, BT_LAST, \ - false, false, false, ATTRS, true, true) - -/* A library builtin (like __builtin_strchr) is a builtin equivalent - of an ANSI/ISO standard library function. In addition to the - `__builtin' version, we will create an ordinary version (e.g, - `strchr') as well. If we cannot compute the answer using the - builtin function, we will fall back to the standard library - version. */ -#undef DEF_LIB_BUILTIN -#define DEF_LIB_BUILTIN(ENUM, NAME, TYPE, ATTRS) \ - DEF_BUILTIN (ENUM, "__builtin_" NAME, BUILT_IN_NORMAL, TYPE, TYPE, \ - true, true, false, ATTRS, true, true) - -/* Like DEF_LIB_BUILTIN, except that the function is not one that is - specified by ANSI/ISO C. So, when we're being fully conformant we - ignore the version of these builtins that does not begin with - __builtin. */ -#undef DEF_EXT_LIB_BUILTIN -#define DEF_EXT_LIB_BUILTIN(ENUM, NAME, TYPE, ATTRS) \ - DEF_BUILTIN (ENUM, "__builtin_" NAME, BUILT_IN_NORMAL, TYPE, TYPE, \ - true, true, true, ATTRS, false, true) - -/* Like DEF_LIB_BUILTIN, except that the function is only a part of - the standard in C94 or above. */ -#undef DEF_C94_BUILTIN -#define DEF_C94_BUILTIN(ENUM, NAME, TYPE, ATTRS) \ - DEF_BUILTIN (ENUM, "__builtin_" NAME, BUILT_IN_NORMAL, TYPE, TYPE, \ - true, true, !flag_isoc94, ATTRS, targetm.libc_has_function (function_c94), true) - -/* Like DEF_LIB_BUILTIN, except that the function is only a part of - the standard in C99 or above. */ -#undef DEF_C99_BUILTIN -#define DEF_C99_BUILTIN(ENUM, NAME, TYPE, ATTRS) \ - DEF_BUILTIN (ENUM, "__builtin_" NAME, BUILT_IN_NORMAL, TYPE, TYPE, \ - true, true, !flag_isoc99, ATTRS, targetm.libc_has_function (function_c99_misc), true) - -/* Like DEF_C99_BUILTIN, but for complex math functions. */ -#undef DEF_C99_COMPL_BUILTIN -#define DEF_C99_COMPL_BUILTIN(ENUM, NAME, TYPE, ATTRS) \ - DEF_BUILTIN (ENUM, "__builtin_" NAME, BUILT_IN_NORMAL, TYPE, TYPE, \ - true, true, !flag_isoc99, ATTRS, targetm.libc_has_function (function_c99_math_complex), true) - -/* Builtin that is specified by C99 and C90 reserve the name for future use. - We can still recognize the builtin in C90 mode but we can't produce it - implicitly. */ -#undef DEF_C99_C90RES_BUILTIN -#define DEF_C99_C90RES_BUILTIN(ENUM, NAME, TYPE, ATTRS) \ - DEF_BUILTIN (ENUM, "__builtin_" NAME, BUILT_IN_NORMAL, TYPE, TYPE, \ - true, true, !flag_isoc99, ATTRS, targetm.libc_has_function (function_c99_misc), true) - -/* Builtin that C99 reserve the name for future use. We can still recognize - the builtin in C99 mode but we can't produce it implicitly. */ -#undef DEF_EXT_C99RES_BUILTIN -#define DEF_EXT_C99RES_BUILTIN(ENUM, NAME, TYPE, ATTRS) \ - DEF_BUILTIN (ENUM, "__builtin_" NAME, BUILT_IN_NORMAL, TYPE, TYPE, \ - true, true, true, ATTRS, false, true) - -/* Allocate the enum and the name for a builtin, but do not actually - define it here at all. */ -#undef DEF_BUILTIN_STUB -#define DEF_BUILTIN_STUB(ENUM, NAME) \ - DEF_BUILTIN (ENUM, NAME, BUILT_IN_NORMAL, BT_LAST, BT_LAST, false, false, \ - false, ATTR_LAST, false, false) - -/* Builtin used by the implementation of GNU OpenMP. None of these are - actually implemented in the compiler; they're all in libgomp. */ -#undef DEF_GOMP_BUILTIN -#define DEF_GOMP_BUILTIN(ENUM, NAME, TYPE, ATTRS) \ - DEF_BUILTIN (ENUM, "__builtin_" NAME, BUILT_IN_NORMAL, TYPE, TYPE, \ - false, true, true, ATTRS, false, \ - (flag_openmp || flag_tree_parallelize_loops)) - -/* Builtin used by implementation of Cilk Plus. Most of these are decomposed - by the compiler but a few are implemented in libcilkrts. */ -#undef DEF_CILK_BUILTIN_STUB -#define DEF_CILK_BUILTIN_STUB(ENUM, NAME) \ - DEF_BUILTIN (ENUM, NAME, BUILT_IN_NORMAL, BT_LAST, BT_LAST, false, false, \ - false, ATTR_LAST, false, false) - -/* Builtin used by the implementation of GNU TM. These - functions are mapped to the actual implementation of the STM library. */ -#undef DEF_TM_BUILTIN -#define DEF_TM_BUILTIN(ENUM, NAME, TYPE, ATTRS) \ - DEF_BUILTIN (ENUM, "__builtin_" NAME, BUILT_IN_NORMAL, TYPE, TYPE, \ - true, true, true, ATTRS, false, flag_tm) - -/* Builtin used by the implementation of libsanitizer. These - functions are mapped to the actual implementation of the - libtsan library. */ -#undef DEF_SANITIZER_BUILTIN -#define DEF_SANITIZER_BUILTIN(ENUM, NAME, TYPE, ATTRS) \ - DEF_BUILTIN (ENUM, "__builtin_" NAME, BUILT_IN_NORMAL, TYPE, TYPE, \ - true, true, true, ATTRS, true, \ - (flag_sanitize & (SANITIZE_ADDRESS | SANITIZE_THREAD \ - | SANITIZE_UNDEFINED))) - -#undef DEF_CILKPLUS_BUILTIN -#define DEF_CILKPLUS_BUILTIN(ENUM, NAME, TYPE, ATTRS) \ - DEF_BUILTIN (ENUM, NAME, BUILT_IN_NORMAL, BT_FN_INT_VAR, BT_LAST, \ - false, false, false, ATTRS, false, flag_cilkplus) - -/* Define an attribute list for math functions that are normally - "impure" because some of them may write into global memory for - `errno'. If !flag_errno_math they are instead "const". */ -#undef ATTR_MATHFN_ERRNO -#define ATTR_MATHFN_ERRNO (flag_errno_math ? \ - ATTR_NOTHROW_LEAF_LIST : ATTR_CONST_NOTHROW_LEAF_LIST) - -/* Define an attribute list for math functions that are normally - "const" but if flag_rounding_math is set they are instead "pure". - This distinction accounts for the fact that some math functions - check the rounding mode which is akin to examining global - memory. */ -#undef ATTR_MATHFN_FPROUNDING -#define ATTR_MATHFN_FPROUNDING (flag_rounding_math ? \ - ATTR_PURE_NOTHROW_LEAF_LIST : ATTR_CONST_NOTHROW_LEAF_LIST) - -/* Define an attribute list for math functions that are normally - "impure" because some of them may write into global memory for - `errno'. If !flag_errno_math, we can possibly use "pure" or - "const" depending on whether we care about FP rounding. */ -#undef ATTR_MATHFN_FPROUNDING_ERRNO -#define ATTR_MATHFN_FPROUNDING_ERRNO (flag_errno_math ? \ - ATTR_NOTHROW_LEAF_LIST : ATTR_MATHFN_FPROUNDING) - -/* Define an attribute list for math functions that need to mind FP - rounding, but because they store into memory they are never "const" - or "pure". Use of this macro is mainly for documentation and - maintenance purposes. */ -#undef ATTR_MATHFN_FPROUNDING_STORE -#define ATTR_MATHFN_FPROUNDING_STORE ATTR_NOTHROW_LEAF_LIST - -/* Define an attribute list for leaf functions that do not throw - exceptions normally, but may throw exceptions when using - -fnon-call-exceptions. */ -#define ATTR_NOTHROWCALL_LEAF_LIST (flag_non_call_exceptions ? \ - ATTR_LEAF_LIST : ATTR_NOTHROW_LEAF_LIST) - -/* Make sure 0 is not a legitimate builtin. */ -DEF_BUILTIN_STUB(BUILT_IN_NONE, (const char *)0) - -/* Category: math builtins. */ -DEF_LIB_BUILTIN (BUILT_IN_ACOS, "acos", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_ACOSF, "acosf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_ACOSH, "acosh", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_ACOSHF, "acoshf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_ACOSHL, "acoshl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_ACOSL, "acosl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_LIB_BUILTIN (BUILT_IN_ASIN, "asin", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_ASINF, "asinf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_ASINH, "asinh", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_BUILTIN (BUILT_IN_ASINHF, "asinhf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_BUILTIN (BUILT_IN_ASINHL, "asinhl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_C90RES_BUILTIN (BUILT_IN_ASINL, "asinl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_LIB_BUILTIN (BUILT_IN_ATAN, "atan", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_LIB_BUILTIN (BUILT_IN_ATAN2, "atan2", BT_FN_DOUBLE_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_ATAN2F, "atan2f", BT_FN_FLOAT_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_ATAN2L, "atan2l", BT_FN_LONGDOUBLE_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_ATANF, "atanf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_BUILTIN (BUILT_IN_ATANH, "atanh", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_ATANHF, "atanhf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_ATANHL, "atanhl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_ATANL, "atanl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_BUILTIN (BUILT_IN_CBRT, "cbrt", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_BUILTIN (BUILT_IN_CBRTF, "cbrtf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_BUILTIN (BUILT_IN_CBRTL, "cbrtl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_LIB_BUILTIN (BUILT_IN_CEIL, "ceil", BT_FN_DOUBLE_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_C90RES_BUILTIN (BUILT_IN_CEILF, "ceilf", BT_FN_FLOAT_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_C90RES_BUILTIN (BUILT_IN_CEILL, "ceill", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_COPYSIGN, "copysign", BT_FN_DOUBLE_DOUBLE_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_COPYSIGNF, "copysignf", BT_FN_FLOAT_FLOAT_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_COPYSIGNL, "copysignl", BT_FN_LONGDOUBLE_LONGDOUBLE_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_COS, "cos", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_C90RES_BUILTIN (BUILT_IN_COSF, "cosf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_LIB_BUILTIN (BUILT_IN_COSH, "cosh", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_COSHF, "coshf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_COSHL, "coshl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_COSL, "cosl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_EXT_LIB_BUILTIN (BUILT_IN_DREM, "drem", BT_FN_DOUBLE_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_DREMF, "dremf", BT_FN_FLOAT_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_DREML, "dreml", BT_FN_LONGDOUBLE_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_ERF, "erf", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_BUILTIN (BUILT_IN_ERFC, "erfc", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_ERFCF, "erfcf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_ERFCL, "erfcl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_ERFF, "erff", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_BUILTIN (BUILT_IN_ERFL, "erfl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_LIB_BUILTIN (BUILT_IN_EXP, "exp", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_EXP10, "exp10", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_EXP10F, "exp10f", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_EXP10L, "exp10l", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_EXP2, "exp2", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_EXP2F, "exp2f", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_EXP2L, "exp2l", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_EXPF, "expf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_EXPL, "expl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_EXPM1, "expm1", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_EXPM1F, "expm1f", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_EXPM1L, "expm1l", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_LIB_BUILTIN (BUILT_IN_FABS, "fabs", BT_FN_DOUBLE_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_C90RES_BUILTIN (BUILT_IN_FABSF, "fabsf", BT_FN_FLOAT_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_C90RES_BUILTIN (BUILT_IN_FABSL, "fabsl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_FABSD32, "fabsd32", BT_FN_DFLOAT32_DFLOAT32, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_FABSD64, "fabsd64", BT_FN_DFLOAT64_DFLOAT64, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_FABSD128, "fabsd128", BT_FN_DFLOAT128_DFLOAT128, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_FDIM, "fdim", BT_FN_DOUBLE_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_FDIMF, "fdimf", BT_FN_FLOAT_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_FDIML, "fdiml", BT_FN_LONGDOUBLE_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_LIB_BUILTIN (BUILT_IN_FLOOR, "floor", BT_FN_DOUBLE_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_C90RES_BUILTIN (BUILT_IN_FLOORF, "floorf", BT_FN_FLOAT_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_C90RES_BUILTIN (BUILT_IN_FLOORL, "floorl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_FMA, "fma", BT_FN_DOUBLE_DOUBLE_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_BUILTIN (BUILT_IN_FMAF, "fmaf", BT_FN_FLOAT_FLOAT_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_BUILTIN (BUILT_IN_FMAL, "fmal", BT_FN_LONGDOUBLE_LONGDOUBLE_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_BUILTIN (BUILT_IN_FMAX, "fmax", BT_FN_DOUBLE_DOUBLE_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_FMAXF, "fmaxf", BT_FN_FLOAT_FLOAT_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_FMAXL, "fmaxl", BT_FN_LONGDOUBLE_LONGDOUBLE_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_FMIN, "fmin", BT_FN_DOUBLE_DOUBLE_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_FMINF, "fminf", BT_FN_FLOAT_FLOAT_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_FMINL, "fminl", BT_FN_LONGDOUBLE_LONGDOUBLE_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_FMOD, "fmod", BT_FN_DOUBLE_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_FMODF, "fmodf", BT_FN_FLOAT_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_FMODL, "fmodl", BT_FN_LONGDOUBLE_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_LIB_BUILTIN (BUILT_IN_FREXP, "frexp", BT_FN_DOUBLE_DOUBLE_INTPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_C99_C90RES_BUILTIN (BUILT_IN_FREXPF, "frexpf", BT_FN_FLOAT_FLOAT_INTPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_C99_C90RES_BUILTIN (BUILT_IN_FREXPL, "frexpl", BT_FN_LONGDOUBLE_LONGDOUBLE_INTPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_EXT_LIB_BUILTIN (BUILT_IN_GAMMA, "gamma", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_STORE) -DEF_EXT_LIB_BUILTIN (BUILT_IN_GAMMAF, "gammaf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_STORE) -DEF_EXT_LIB_BUILTIN (BUILT_IN_GAMMAL, "gammal", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_STORE) -DEF_EXT_LIB_BUILTIN (BUILT_IN_GAMMA_R, "gamma_r", BT_FN_DOUBLE_DOUBLE_INTPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_EXT_LIB_BUILTIN (BUILT_IN_GAMMAF_R, "gammaf_r", BT_FN_FLOAT_FLOAT_INTPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_EXT_LIB_BUILTIN (BUILT_IN_GAMMAL_R, "gammal_r", BT_FN_LONGDOUBLE_LONGDOUBLE_INTPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_GCC_BUILTIN (BUILT_IN_HUGE_VAL, "huge_val", BT_FN_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_HUGE_VALF, "huge_valf", BT_FN_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_HUGE_VALL, "huge_vall", BT_FN_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_HYPOT, "hypot", BT_FN_DOUBLE_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_HYPOTF, "hypotf", BT_FN_FLOAT_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_HYPOTL, "hypotl", BT_FN_LONGDOUBLE_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_GCC_BUILTIN (BUILT_IN_ICEIL, "iceil", BT_FN_INT_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_ICEILF, "iceilf", BT_FN_INT_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_ICEILL, "iceill", BT_FN_INT_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_IFLOOR, "ifloor", BT_FN_INT_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_IFLOORF, "ifloorf", BT_FN_INT_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_IFLOORL, "ifloorl", BT_FN_INT_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_ILOGB, "ilogb", BT_FN_INT_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_ILOGBF, "ilogbf", BT_FN_INT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_ILOGBL, "ilogbl", BT_FN_INT_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_GCC_BUILTIN (BUILT_IN_INF, "inf", BT_FN_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_INFF, "inff", BT_FN_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_INFL, "infl", BT_FN_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_INFD32, "infd32", BT_FN_DFLOAT32, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_INFD64, "infd64", BT_FN_DFLOAT64, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_INFD128, "infd128", BT_FN_DFLOAT128, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_IRINT, "irint", BT_FN_INT_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_GCC_BUILTIN (BUILT_IN_IRINTF, "irintf", BT_FN_INT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_GCC_BUILTIN (BUILT_IN_IRINTL, "irintl", BT_FN_INT_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_GCC_BUILTIN (BUILT_IN_IROUND, "iround", BT_FN_INT_DOUBLE, ATTR_MATHFN_ERRNO) -DEF_GCC_BUILTIN (BUILT_IN_IROUNDF, "iroundf", BT_FN_INT_FLOAT, ATTR_MATHFN_ERRNO) -DEF_GCC_BUILTIN (BUILT_IN_IROUNDL, "iroundl", BT_FN_INT_LONGDOUBLE, ATTR_MATHFN_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_J0, "j0", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_J0F, "j0f", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_J0L, "j0l", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_J1, "j1", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_J1F, "j1f", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_J1L, "j1l", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_JN, "jn", BT_FN_DOUBLE_INT_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_JNF, "jnf", BT_FN_FLOAT_INT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_JNL, "jnl", BT_FN_LONGDOUBLE_INT_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_GCC_BUILTIN (BUILT_IN_LCEIL, "lceil", BT_FN_LONG_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_LCEILF, "lceilf", BT_FN_LONG_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_LCEILL, "lceill", BT_FN_LONG_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_LDEXP, "ldexp", BT_FN_DOUBLE_DOUBLE_INT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_LDEXPF, "ldexpf", BT_FN_FLOAT_FLOAT_INT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_LDEXPL, "ldexpl", BT_FN_LONGDOUBLE_LONGDOUBLE_INT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_GCC_BUILTIN (BUILT_IN_LFLOOR, "lfloor", BT_FN_LONG_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_LFLOORF, "lfloorf", BT_FN_LONG_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_LFLOORL, "lfloorl", BT_FN_LONG_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_LGAMMA, "lgamma", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_STORE) -DEF_C99_BUILTIN (BUILT_IN_LGAMMAF, "lgammaf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_STORE) -DEF_C99_BUILTIN (BUILT_IN_LGAMMAL, "lgammal", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_STORE) -DEF_EXT_LIB_BUILTIN (BUILT_IN_LGAMMA_R, "lgamma_r", BT_FN_DOUBLE_DOUBLE_INTPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_EXT_LIB_BUILTIN (BUILT_IN_LGAMMAF_R, "lgammaf_r", BT_FN_FLOAT_FLOAT_INTPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_EXT_LIB_BUILTIN (BUILT_IN_LGAMMAL_R, "lgammal_r", BT_FN_LONGDOUBLE_LONGDOUBLE_INTPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_GCC_BUILTIN (BUILT_IN_LLCEIL, "llceil", BT_FN_LONGLONG_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_LLCEILF, "llceilf", BT_FN_LONGLONG_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_LLCEILL, "llceill", BT_FN_LONGLONG_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_LLFLOOR, "llfloor", BT_FN_LONGLONG_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_LLFLOORF, "llfloorf", BT_FN_LONGLONG_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_LLFLOORL, "llfloorl", BT_FN_LONGLONG_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_LLRINT, "llrint", BT_FN_LONGLONG_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LLRINTF, "llrintf", BT_FN_LONGLONG_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LLRINTL, "llrintl", BT_FN_LONGLONG_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LLROUND, "llround", BT_FN_LONGLONG_DOUBLE, ATTR_MATHFN_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LLROUNDF, "llroundf", BT_FN_LONGLONG_FLOAT, ATTR_MATHFN_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LLROUNDL, "llroundl", BT_FN_LONGLONG_LONGDOUBLE, ATTR_MATHFN_ERRNO) -DEF_LIB_BUILTIN (BUILT_IN_LOG, "log", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_LIB_BUILTIN (BUILT_IN_LOG10, "log10", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_LOG10F, "log10f", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_LOG10L, "log10l", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LOG1P, "log1p", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LOG1PF, "log1pf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LOG1PL, "log1pl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LOG2, "log2", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LOG2F, "log2f", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LOG2L, "log2l", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LOGB, "logb", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LOGBF, "logbf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LOGBL, "logbl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_LOGF, "logf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_LOGL, "logl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LRINT, "lrint", BT_FN_LONG_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LRINTF, "lrintf", BT_FN_LONG_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LRINTL, "lrintl", BT_FN_LONG_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LROUND, "lround", BT_FN_LONG_DOUBLE, ATTR_MATHFN_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LROUNDF, "lroundf", BT_FN_LONG_FLOAT, ATTR_MATHFN_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_LROUNDL, "lroundl", BT_FN_LONG_LONGDOUBLE, ATTR_MATHFN_ERRNO) -DEF_LIB_BUILTIN (BUILT_IN_MODF, "modf", BT_FN_DOUBLE_DOUBLE_DOUBLEPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_C99_C90RES_BUILTIN (BUILT_IN_MODFF, "modff", BT_FN_FLOAT_FLOAT_FLOATPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_C99_C90RES_BUILTIN (BUILT_IN_MODFL, "modfl", BT_FN_LONGDOUBLE_LONGDOUBLE_LONGDOUBLEPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_C99_BUILTIN (BUILT_IN_NAN, "nan", BT_FN_DOUBLE_CONST_STRING, ATTR_CONST_NOTHROW_NONNULL) -DEF_C99_BUILTIN (BUILT_IN_NANF, "nanf", BT_FN_FLOAT_CONST_STRING, ATTR_CONST_NOTHROW_NONNULL) -DEF_C99_BUILTIN (BUILT_IN_NANL, "nanl", BT_FN_LONGDOUBLE_CONST_STRING, ATTR_CONST_NOTHROW_NONNULL) -DEF_GCC_BUILTIN (BUILT_IN_NAND32, "nand32", BT_FN_DFLOAT32_CONST_STRING, ATTR_CONST_NOTHROW_NONNULL) -DEF_GCC_BUILTIN (BUILT_IN_NAND64, "nand64", BT_FN_DFLOAT64_CONST_STRING, ATTR_CONST_NOTHROW_NONNULL) -DEF_GCC_BUILTIN (BUILT_IN_NAND128, "nand128", BT_FN_DFLOAT128_CONST_STRING, ATTR_CONST_NOTHROW_NONNULL) -DEF_GCC_BUILTIN (BUILT_IN_NANS, "nans", BT_FN_DOUBLE_CONST_STRING, ATTR_CONST_NOTHROW_NONNULL) -DEF_GCC_BUILTIN (BUILT_IN_NANSF, "nansf", BT_FN_FLOAT_CONST_STRING, ATTR_CONST_NOTHROW_NONNULL) -DEF_GCC_BUILTIN (BUILT_IN_NANSL, "nansl", BT_FN_LONGDOUBLE_CONST_STRING, ATTR_CONST_NOTHROW_NONNULL) -DEF_C99_BUILTIN (BUILT_IN_NEARBYINT, "nearbyint", BT_FN_DOUBLE_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_NEARBYINTF, "nearbyintf", BT_FN_FLOAT_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_NEARBYINTL, "nearbyintl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_NEXTAFTER, "nextafter", BT_FN_DOUBLE_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_NEXTAFTERF, "nextafterf", BT_FN_FLOAT_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_NEXTAFTERL, "nextafterl", BT_FN_LONGDOUBLE_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_NEXTTOWARD, "nexttoward", BT_FN_DOUBLE_DOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_NEXTTOWARDF, "nexttowardf", BT_FN_FLOAT_FLOAT_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_NEXTTOWARDL, "nexttowardl", BT_FN_LONGDOUBLE_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_LIB_BUILTIN (BUILT_IN_POW, "pow", BT_FN_DOUBLE_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_POW10, "pow10", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_POW10F, "pow10f", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_POW10L, "pow10l", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_POWF, "powf", BT_FN_FLOAT_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_GCC_BUILTIN (BUILT_IN_POWI, "powi", BT_FN_DOUBLE_DOUBLE_INT, ATTR_MATHFN_FPROUNDING) -DEF_GCC_BUILTIN (BUILT_IN_POWIF, "powif", BT_FN_FLOAT_FLOAT_INT, ATTR_MATHFN_FPROUNDING) -DEF_GCC_BUILTIN (BUILT_IN_POWIL, "powil", BT_FN_LONGDOUBLE_LONGDOUBLE_INT, ATTR_MATHFN_FPROUNDING) -DEF_C99_C90RES_BUILTIN (BUILT_IN_POWL, "powl", BT_FN_LONGDOUBLE_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_REMAINDER, "remainder", BT_FN_DOUBLE_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_REMAINDERF, "remainderf", BT_FN_FLOAT_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_REMAINDERL, "remainderl", BT_FN_LONGDOUBLE_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_REMQUO, "remquo", BT_FN_DOUBLE_DOUBLE_DOUBLE_INTPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_C99_BUILTIN (BUILT_IN_REMQUOF, "remquof", BT_FN_FLOAT_FLOAT_FLOAT_INTPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_C99_BUILTIN (BUILT_IN_REMQUOL, "remquol", BT_FN_LONGDOUBLE_LONGDOUBLE_LONGDOUBLE_INTPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_C99_BUILTIN (BUILT_IN_RINT, "rint", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_RINTF, "rintf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_RINTL, "rintl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_ROUND, "round", BT_FN_DOUBLE_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_ROUNDF, "roundf", BT_FN_FLOAT_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_ROUNDL, "roundl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SCALB, "scalb", BT_FN_DOUBLE_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SCALBF, "scalbf", BT_FN_FLOAT_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SCALBL, "scalbl", BT_FN_LONGDOUBLE_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_SCALBLN, "scalbln", BT_FN_DOUBLE_DOUBLE_LONG, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_SCALBLNF, "scalblnf", BT_FN_FLOAT_FLOAT_LONG, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_SCALBLNL, "scalblnl", BT_FN_LONGDOUBLE_LONGDOUBLE_LONG, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_SCALBN, "scalbn", BT_FN_DOUBLE_DOUBLE_INT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_SCALBNF, "scalbnf", BT_FN_FLOAT_FLOAT_INT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_SCALBNL, "scalbnl", BT_FN_LONGDOUBLE_LONGDOUBLE_INT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SIGNBIT, "signbit", BT_FN_INT_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SIGNBITF, "signbitf", BT_FN_INT_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SIGNBITL, "signbitl", BT_FN_INT_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SIGNBITD32, "signbitd32", BT_FN_INT_DFLOAT32, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SIGNBITD64, "signbitd64", BT_FN_INT_DFLOAT64, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SIGNBITD128, "signbitd128", BT_FN_INT_DFLOAT128, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SIGNIFICAND, "significand", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SIGNIFICANDF, "significandf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SIGNIFICANDL, "significandl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_LIB_BUILTIN (BUILT_IN_SIN, "sin", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SINCOS, "sincos", BT_FN_VOID_DOUBLE_DOUBLEPTR_DOUBLEPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SINCOSF, "sincosf", BT_FN_VOID_FLOAT_FLOATPTR_FLOATPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SINCOSL, "sincosl", BT_FN_VOID_LONGDOUBLE_LONGDOUBLEPTR_LONGDOUBLEPTR, ATTR_MATHFN_FPROUNDING_STORE) -DEF_C99_C90RES_BUILTIN (BUILT_IN_SINF, "sinf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_LIB_BUILTIN (BUILT_IN_SINH, "sinh", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_SINHF, "sinhf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_SINHL, "sinhl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_SINL, "sinl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_LIB_BUILTIN (BUILT_IN_SQRT, "sqrt", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_SQRTF, "sqrtf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_C90RES_BUILTIN (BUILT_IN_SQRTL, "sqrtl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_LIB_BUILTIN (BUILT_IN_TAN, "tan", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_C90RES_BUILTIN (BUILT_IN_TANF, "tanf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_LIB_BUILTIN (BUILT_IN_TANH, "tanh", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_C90RES_BUILTIN (BUILT_IN_TANHF, "tanhf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_C90RES_BUILTIN (BUILT_IN_TANHL, "tanhl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_C90RES_BUILTIN (BUILT_IN_TANL, "tanl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_BUILTIN (BUILT_IN_TGAMMA, "tgamma", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_TGAMMAF, "tgammaf", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_TGAMMAL, "tgammal", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_C99_BUILTIN (BUILT_IN_TRUNC, "trunc", BT_FN_DOUBLE_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_TRUNCF, "truncf", BT_FN_FLOAT_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_TRUNCL, "truncl", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_Y0, "y0", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_Y0F, "y0f", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_Y0L, "y0l", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_Y1, "y1", BT_FN_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_Y1F, "y1f", BT_FN_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_Y1L, "y1l", BT_FN_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_YN, "yn", BT_FN_DOUBLE_INT_DOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_YNF, "ynf", BT_FN_FLOAT_INT_FLOAT, ATTR_MATHFN_FPROUNDING_ERRNO) -DEF_EXT_LIB_BUILTIN (BUILT_IN_YNL, "ynl", BT_FN_LONGDOUBLE_INT_LONGDOUBLE, ATTR_MATHFN_FPROUNDING_ERRNO) - -/* Category: _Complex math builtins. */ -DEF_C99_COMPL_BUILTIN (BUILT_IN_CABS, "cabs", BT_FN_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CABSF, "cabsf", BT_FN_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CABSL, "cabsl", BT_FN_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CACOS, "cacos", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CACOSF, "cacosf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CACOSH, "cacosh", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CACOSHF, "cacoshf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CACOSHL, "cacoshl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CACOSL, "cacosl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CARG, "carg", BT_FN_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CARGF, "cargf", BT_FN_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CARGL, "cargl", BT_FN_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CASIN, "casin", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CASINF, "casinf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CASINH, "casinh", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CASINHF, "casinhf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CASINHL, "casinhl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CASINL, "casinl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CATAN, "catan", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CATANF, "catanf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CATANH, "catanh", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CATANHF, "catanhf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CATANHL, "catanhl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CATANL, "catanl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CCOS, "ccos", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CCOSF, "ccosf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CCOSH, "ccosh", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CCOSHF, "ccoshf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CCOSHL, "ccoshl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CCOSL, "ccosl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CEXP, "cexp", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CEXPF, "cexpf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CEXPL, "cexpl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_GCC_BUILTIN (BUILT_IN_CEXPI, "cexpi", BT_FN_COMPLEX_DOUBLE_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_GCC_BUILTIN (BUILT_IN_CEXPIF, "cexpif", BT_FN_COMPLEX_FLOAT_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_GCC_BUILTIN (BUILT_IN_CEXPIL, "cexpil", BT_FN_COMPLEX_LONGDOUBLE_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CIMAG, "cimag", BT_FN_DOUBLE_COMPLEX_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CIMAGF, "cimagf", BT_FN_FLOAT_COMPLEX_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CIMAGL, "cimagl", BT_FN_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CLOG, "clog", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CLOGF, "clogf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CLOGL, "clogl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_EXT_C99RES_BUILTIN (BUILT_IN_CLOG10, "clog10", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_EXT_C99RES_BUILTIN (BUILT_IN_CLOG10F, "clog10f", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_EXT_C99RES_BUILTIN (BUILT_IN_CLOG10L, "clog10l", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CONJ, "conj", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CONJF, "conjf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CONJL, "conjl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CPOW, "cpow", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CPOWF, "cpowf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CPOWL, "cpowl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CPROJ, "cproj", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CPROJF, "cprojf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CPROJL, "cprojl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CREAL, "creal", BT_FN_DOUBLE_COMPLEX_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CREALF, "crealf", BT_FN_FLOAT_COMPLEX_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CREALL, "creall", BT_FN_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CSIN, "csin", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CSINF, "csinf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CSINH, "csinh", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CSINHF, "csinhf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CSINHL, "csinhl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CSINL, "csinl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CSQRT, "csqrt", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CSQRTF, "csqrtf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CSQRTL, "csqrtl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CTAN, "ctan", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CTANF, "ctanf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CTANH, "ctanh", BT_FN_COMPLEX_DOUBLE_COMPLEX_DOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CTANHF, "ctanhf", BT_FN_COMPLEX_FLOAT_COMPLEX_FLOAT, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CTANHL, "ctanhl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) -DEF_C99_COMPL_BUILTIN (BUILT_IN_CTANL, "ctanl", BT_FN_COMPLEX_LONGDOUBLE_COMPLEX_LONGDOUBLE, ATTR_MATHFN_FPROUNDING) - -/* Category: string/memory builtins. */ -/* bcmp, bcopy and bzero have traditionally accepted NULL pointers - when the length parameter is zero, so don't apply attribute "nonnull". */ -DEF_EXT_LIB_BUILTIN (BUILT_IN_BCMP, "bcmp", BT_FN_INT_CONST_PTR_CONST_PTR_SIZE, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_BCOPY, "bcopy", BT_FN_VOID_CONST_PTR_PTR_SIZE, ATTR_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_BZERO, "bzero", BT_FN_VOID_PTR_SIZE, ATTR_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_INDEX, "index", BT_FN_STRING_CONST_STRING_INT, ATTR_PURE_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_MEMCHR, "memchr", BT_FN_PTR_CONST_PTR_INT_SIZE, ATTR_PURE_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_MEMCMP, "memcmp", BT_FN_INT_CONST_PTR_CONST_PTR_SIZE, ATTR_PURE_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_MEMCPY, "memcpy", BT_FN_PTR_PTR_CONST_PTR_SIZE, ATTR_RET1_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_MEMMOVE, "memmove", BT_FN_PTR_PTR_CONST_PTR_SIZE, ATTR_RET1_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_MEMPCPY, "mempcpy", BT_FN_PTR_PTR_CONST_PTR_SIZE, ATTR_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_MEMSET, "memset", BT_FN_PTR_PTR_INT_SIZE, ATTR_RET1_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_RINDEX, "rindex", BT_FN_STRING_CONST_STRING_INT, ATTR_PURE_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_STPCPY, "stpcpy", BT_FN_STRING_STRING_CONST_STRING, ATTR_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_STPNCPY, "stpncpy", BT_FN_STRING_STRING_CONST_STRING_SIZE, ATTR_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_STRCASECMP, "strcasecmp", BT_FN_INT_CONST_STRING_CONST_STRING, ATTR_PURE_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_STRCAT, "strcat", BT_FN_STRING_STRING_CONST_STRING, ATTR_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_STRCHR, "strchr", BT_FN_STRING_CONST_STRING_INT, ATTR_PURE_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_STRCMP, "strcmp", BT_FN_INT_CONST_STRING_CONST_STRING, ATTR_PURE_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_STRCPY, "strcpy", BT_FN_STRING_STRING_CONST_STRING, ATTR_RET1_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_STRCSPN, "strcspn", BT_FN_SIZE_CONST_STRING_CONST_STRING, ATTR_PURE_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_STRDUP, "strdup", BT_FN_STRING_CONST_STRING, ATTR_MALLOC_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_STRNDUP, "strndup", BT_FN_STRING_CONST_STRING_SIZE, ATTR_MALLOC_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_STRLEN, "strlen", BT_FN_SIZE_CONST_STRING, ATTR_PURE_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_STRNCASECMP, "strncasecmp", BT_FN_INT_CONST_STRING_CONST_STRING_SIZE, ATTR_PURE_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_STRNCAT, "strncat", BT_FN_STRING_STRING_CONST_STRING_SIZE, ATTR_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_STRNCMP, "strncmp", BT_FN_INT_CONST_STRING_CONST_STRING_SIZE, ATTR_PURE_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_STRNCPY, "strncpy", BT_FN_STRING_STRING_CONST_STRING_SIZE, ATTR_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_STRPBRK, "strpbrk", BT_FN_STRING_CONST_STRING_CONST_STRING, ATTR_PURE_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_STRRCHR, "strrchr", BT_FN_STRING_CONST_STRING_INT, ATTR_PURE_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_STRSPN, "strspn", BT_FN_SIZE_CONST_STRING_CONST_STRING, ATTR_PURE_NOTHROW_NONNULL_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_STRSTR, "strstr", BT_FN_STRING_CONST_STRING_CONST_STRING, ATTR_PURE_NOTHROW_NONNULL_LEAF) - -/* Category: stdio builtins. */ -DEF_LIB_BUILTIN (BUILT_IN_FPRINTF, "fprintf", BT_FN_INT_FILEPTR_CONST_STRING_VAR, ATTR_FORMAT_PRINTF_2_3) -DEF_EXT_LIB_BUILTIN (BUILT_IN_FPRINTF_UNLOCKED, "fprintf_unlocked", BT_FN_INT_FILEPTR_CONST_STRING_VAR, ATTR_FORMAT_PRINTF_2_3) -DEF_LIB_BUILTIN (BUILT_IN_PUTC, "putc", BT_FN_INT_INT_FILEPTR, ATTR_NONNULL_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_PUTC_UNLOCKED, "putc_unlocked", BT_FN_INT_INT_FILEPTR, ATTR_NONNULL_LIST) -DEF_LIB_BUILTIN (BUILT_IN_FPUTC, "fputc", BT_FN_INT_INT_FILEPTR, ATTR_NONNULL_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_FPUTC_UNLOCKED, "fputc_unlocked", BT_FN_INT_INT_FILEPTR, ATTR_NONNULL_LIST) -DEF_LIB_BUILTIN (BUILT_IN_FPUTS, "fputs", BT_FN_INT_CONST_STRING_FILEPTR, ATTR_NONNULL_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_FPUTS_UNLOCKED, "fputs_unlocked", BT_FN_INT_CONST_STRING_FILEPTR, ATTR_NONNULL_LIST) -DEF_LIB_BUILTIN (BUILT_IN_FSCANF, "fscanf", BT_FN_INT_FILEPTR_CONST_STRING_VAR, ATTR_FORMAT_SCANF_2_3) -DEF_LIB_BUILTIN (BUILT_IN_FWRITE, "fwrite", BT_FN_SIZE_CONST_PTR_SIZE_SIZE_FILEPTR, ATTR_NONNULL_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_FWRITE_UNLOCKED, "fwrite_unlocked", BT_FN_SIZE_CONST_PTR_SIZE_SIZE_FILEPTR, ATTR_NONNULL_LIST) -DEF_LIB_BUILTIN (BUILT_IN_PRINTF, "printf", BT_FN_INT_CONST_STRING_VAR, ATTR_FORMAT_PRINTF_1_2) -DEF_EXT_LIB_BUILTIN (BUILT_IN_PRINTF_UNLOCKED, "printf_unlocked", BT_FN_INT_CONST_STRING_VAR, ATTR_FORMAT_PRINTF_1_2) -DEF_LIB_BUILTIN (BUILT_IN_PUTCHAR, "putchar", BT_FN_INT_INT, ATTR_NULL) -DEF_EXT_LIB_BUILTIN (BUILT_IN_PUTCHAR_UNLOCKED, "putchar_unlocked", BT_FN_INT_INT, ATTR_NULL) -DEF_LIB_BUILTIN (BUILT_IN_PUTS, "puts", BT_FN_INT_CONST_STRING, ATTR_NONNULL_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_PUTS_UNLOCKED, "puts_unlocked", BT_FN_INT_CONST_STRING, ATTR_NONNULL_LIST) -DEF_LIB_BUILTIN (BUILT_IN_SCANF, "scanf", BT_FN_INT_CONST_STRING_VAR, ATTR_FORMAT_SCANF_1_2) -DEF_C99_BUILTIN (BUILT_IN_SNPRINTF, "snprintf", BT_FN_INT_STRING_SIZE_CONST_STRING_VAR, ATTR_FORMAT_PRINTF_NOTHROW_3_4) -DEF_LIB_BUILTIN (BUILT_IN_SPRINTF, "sprintf", BT_FN_INT_STRING_CONST_STRING_VAR, ATTR_FORMAT_PRINTF_NOTHROW_2_3) -DEF_LIB_BUILTIN (BUILT_IN_SSCANF, "sscanf", BT_FN_INT_CONST_STRING_CONST_STRING_VAR, ATTR_FORMAT_SCANF_NOTHROW_2_3) -DEF_LIB_BUILTIN (BUILT_IN_VFPRINTF, "vfprintf", BT_FN_INT_FILEPTR_CONST_STRING_VALIST_ARG, ATTR_FORMAT_PRINTF_2_0) -DEF_C99_BUILTIN (BUILT_IN_VFSCANF, "vfscanf", BT_FN_INT_FILEPTR_CONST_STRING_VALIST_ARG, ATTR_FORMAT_SCANF_2_0) -DEF_LIB_BUILTIN (BUILT_IN_VPRINTF, "vprintf", BT_FN_INT_CONST_STRING_VALIST_ARG, ATTR_FORMAT_PRINTF_1_0) -DEF_C99_BUILTIN (BUILT_IN_VSCANF, "vscanf", BT_FN_INT_CONST_STRING_VALIST_ARG, ATTR_FORMAT_SCANF_1_0) -DEF_C99_BUILTIN (BUILT_IN_VSNPRINTF, "vsnprintf", BT_FN_INT_STRING_SIZE_CONST_STRING_VALIST_ARG, ATTR_FORMAT_PRINTF_NOTHROW_3_0) -DEF_LIB_BUILTIN (BUILT_IN_VSPRINTF, "vsprintf", BT_FN_INT_STRING_CONST_STRING_VALIST_ARG, ATTR_FORMAT_PRINTF_NOTHROW_2_0) -DEF_C99_BUILTIN (BUILT_IN_VSSCANF, "vsscanf", BT_FN_INT_CONST_STRING_CONST_STRING_VALIST_ARG, ATTR_FORMAT_SCANF_NOTHROW_2_0) - -/* Category: ctype builtins. */ -DEF_LIB_BUILTIN (BUILT_IN_ISALNUM, "isalnum", BT_FN_INT_INT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_ISALPHA, "isalpha", BT_FN_INT_INT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_ISASCII, "isascii", BT_FN_INT_INT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_ISBLANK, "isblank", BT_FN_INT_INT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_ISCNTRL, "iscntrl", BT_FN_INT_INT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_ISDIGIT, "isdigit", BT_FN_INT_INT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_ISGRAPH, "isgraph", BT_FN_INT_INT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_ISLOWER, "islower", BT_FN_INT_INT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_ISPRINT, "isprint", BT_FN_INT_INT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_ISPUNCT, "ispunct", BT_FN_INT_INT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_ISSPACE, "isspace", BT_FN_INT_INT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_ISUPPER, "isupper", BT_FN_INT_INT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_ISXDIGIT, "isxdigit", BT_FN_INT_INT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_TOASCII, "toascii", BT_FN_INT_INT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_TOLOWER, "tolower", BT_FN_INT_INT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_TOUPPER, "toupper", BT_FN_INT_INT, ATTR_PURE_NOTHROW_LEAF_LIST) - -/* Category: wctype builtins. */ -DEF_C94_BUILTIN (BUILT_IN_ISWALNUM, "iswalnum", BT_FN_INT_WINT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_C94_BUILTIN (BUILT_IN_ISWALPHA, "iswalpha", BT_FN_INT_WINT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_ISWBLANK, "iswblank", BT_FN_INT_WINT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_C94_BUILTIN (BUILT_IN_ISWCNTRL, "iswcntrl", BT_FN_INT_WINT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_C94_BUILTIN (BUILT_IN_ISWDIGIT, "iswdigit", BT_FN_INT_WINT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_C94_BUILTIN (BUILT_IN_ISWGRAPH, "iswgraph", BT_FN_INT_WINT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_C94_BUILTIN (BUILT_IN_ISWLOWER, "iswlower", BT_FN_INT_WINT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_C94_BUILTIN (BUILT_IN_ISWPRINT, "iswprint", BT_FN_INT_WINT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_C94_BUILTIN (BUILT_IN_ISWPUNCT, "iswpunct", BT_FN_INT_WINT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_C94_BUILTIN (BUILT_IN_ISWSPACE, "iswspace", BT_FN_INT_WINT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_C94_BUILTIN (BUILT_IN_ISWUPPER, "iswupper", BT_FN_INT_WINT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_C94_BUILTIN (BUILT_IN_ISWXDIGIT, "iswxdigit", BT_FN_INT_WINT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_C94_BUILTIN (BUILT_IN_TOWLOWER, "towlower", BT_FN_WINT_WINT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_C94_BUILTIN (BUILT_IN_TOWUPPER, "towupper", BT_FN_WINT_WINT, ATTR_PURE_NOTHROW_LEAF_LIST) - -/* Category: miscellaneous builtins. */ -DEF_LIB_BUILTIN (BUILT_IN_ABORT, "abort", BT_FN_VOID, ATTR_NORETURN_NOTHROW_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_ABS, "abs", BT_FN_INT_INT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_AGGREGATE_INCOMING_ADDRESS, "aggregate_incoming_address", BT_FN_PTR_VAR, ATTR_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_ALLOCA, "alloca", BT_FN_PTR_SIZE, ATTR_MALLOC_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_APPLY, "apply", BT_FN_PTR_PTR_FN_VOID_VAR_PTR_SIZE, ATTR_NULL) -DEF_GCC_BUILTIN (BUILT_IN_APPLY_ARGS, "apply_args", BT_FN_PTR_VAR, ATTR_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_BSWAP16, "bswap16", BT_FN_UINT16_UINT16, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_BSWAP32, "bswap32", BT_FN_UINT32_UINT32, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_BSWAP64, "bswap64", BT_FN_UINT64_UINT64, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_CLEAR_CACHE, "__clear_cache", BT_FN_VOID_PTR_PTR, ATTR_NOTHROW_LEAF_LIST) -/* [trans-mem]: Adjust BUILT_IN_TM_CALLOC if BUILT_IN_CALLOC is changed. */ -DEF_LIB_BUILTIN (BUILT_IN_CALLOC, "calloc", BT_FN_PTR_SIZE_SIZE, ATTR_MALLOC_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_CLASSIFY_TYPE, "classify_type", BT_FN_INT_VAR, ATTR_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_CLZ, "clz", BT_FN_INT_UINT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_CLZIMAX, "clzimax", BT_FN_INT_UINTMAX, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_CLZL, "clzl", BT_FN_INT_ULONG, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_CLZLL, "clzll", BT_FN_INT_ULONGLONG, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_CONSTANT_P, "constant_p", BT_FN_INT_VAR, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_CTZ, "ctz", BT_FN_INT_UINT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_CTZIMAX, "ctzimax", BT_FN_INT_UINTMAX, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_CTZL, "ctzl", BT_FN_INT_ULONG, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_CTZLL, "ctzll", BT_FN_INT_ULONGLONG, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_CLRSB, "clrsb", BT_FN_INT_INT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_CLRSBIMAX, "clrsbimax", BT_FN_INT_INTMAX, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_CLRSBL, "clrsbl", BT_FN_INT_LONG, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_CLRSBLL, "clrsbll", BT_FN_INT_LONGLONG, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_DCGETTEXT, "dcgettext", BT_FN_STRING_CONST_STRING_CONST_STRING_INT, ATTR_FORMAT_ARG_2) -DEF_EXT_LIB_BUILTIN (BUILT_IN_DGETTEXT, "dgettext", BT_FN_STRING_CONST_STRING_CONST_STRING, ATTR_FORMAT_ARG_2) -DEF_GCC_BUILTIN (BUILT_IN_DWARF_CFA, "dwarf_cfa", BT_FN_PTR, ATTR_NULL) -DEF_GCC_BUILTIN (BUILT_IN_DWARF_SP_COLUMN, "dwarf_sp_column", BT_FN_UINT, ATTR_NULL) -DEF_GCC_BUILTIN (BUILT_IN_EH_RETURN, "eh_return", BT_FN_VOID_PTRMODE_PTR, ATTR_NORETURN_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_EH_RETURN_DATA_REGNO, "eh_return_data_regno", BT_FN_INT_INT, ATTR_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_EXECL, "execl", BT_FN_INT_CONST_STRING_CONST_STRING_VAR, ATTR_SENTINEL_NOTHROW_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_EXECLP, "execlp", BT_FN_INT_CONST_STRING_CONST_STRING_VAR, ATTR_SENTINEL_NOTHROW_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_EXECLE, "execle", BT_FN_INT_CONST_STRING_CONST_STRING_VAR, ATTR_NOTHROW_SENTINEL_1) -DEF_EXT_LIB_BUILTIN (BUILT_IN_EXECV, "execv", BT_FN_INT_CONST_STRING_PTR_CONST_STRING, ATTR_NOTHROW_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_EXECVP, "execvp", BT_FN_INT_CONST_STRING_PTR_CONST_STRING, ATTR_NOTHROW_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_EXECVE, "execve", BT_FN_INT_CONST_STRING_PTR_CONST_STRING_PTR_CONST_STRING, ATTR_NOTHROW_LIST) -DEF_LIB_BUILTIN (BUILT_IN_EXIT, "exit", BT_FN_VOID_INT, ATTR_NORETURN_NOTHROW_LIST) -DEF_GCC_BUILTIN (BUILT_IN_EXPECT, "expect", BT_FN_LONG_LONG_LONG, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_ASSUME_ALIGNED, "assume_aligned", BT_FN_PTR_CONST_PTR_SIZE_VAR, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_EXTEND_POINTER, "extend_pointer", BT_FN_UNWINDWORD_PTR, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_EXTRACT_RETURN_ADDR, "extract_return_addr", BT_FN_PTR_PTR, ATTR_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_FFS, "ffs", BT_FN_INT_INT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_FFSIMAX, "ffsimax", BT_FN_INT_INTMAX, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_FFSL, "ffsl", BT_FN_INT_LONG, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_FFSLL, "ffsll", BT_FN_INT_LONGLONG, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_FORK, "fork", BT_FN_PID, ATTR_NOTHROW_LIST) -DEF_GCC_BUILTIN (BUILT_IN_FRAME_ADDRESS, "frame_address", BT_FN_PTR_UINT, ATTR_NULL) -/* [trans-mem]: Adjust BUILT_IN_TM_FREE if BUILT_IN_FREE is changed. */ -DEF_LIB_BUILTIN (BUILT_IN_FREE, "free", BT_FN_VOID_PTR, ATTR_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_FROB_RETURN_ADDR, "frob_return_addr", BT_FN_PTR_PTR, ATTR_NULL) -DEF_EXT_LIB_BUILTIN (BUILT_IN_GETTEXT, "gettext", BT_FN_STRING_CONST_STRING, ATTR_FORMAT_ARG_1) -DEF_C99_BUILTIN (BUILT_IN_IMAXABS, "imaxabs", BT_FN_INTMAX_INTMAX, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_INIT_DWARF_REG_SIZES, "init_dwarf_reg_size_table", BT_FN_VOID_PTR, ATTR_NULL) -DEF_EXT_LIB_BUILTIN (BUILT_IN_FINITE, "finite", BT_FN_INT_DOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_FINITEF, "finitef", BT_FN_INT_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_FINITEL, "finitel", BT_FN_INT_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_FINITED32, "finited32", BT_FN_INT_DFLOAT32, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_FINITED64, "finited64", BT_FN_INT_DFLOAT64, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_FINITED128, "finited128", BT_FN_INT_DFLOAT128, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_FPCLASSIFY, "fpclassify", BT_FN_INT_INT_INT_INT_INT_INT_VAR, ATTR_CONST_NOTHROW_TYPEGENERIC_LEAF) -DEF_GCC_BUILTIN (BUILT_IN_ISFINITE, "isfinite", BT_FN_INT_VAR, ATTR_CONST_NOTHROW_TYPEGENERIC_LEAF) -DEF_GCC_BUILTIN (BUILT_IN_ISINF_SIGN, "isinf_sign", BT_FN_INT_VAR, ATTR_CONST_NOTHROW_TYPEGENERIC_LEAF) -DEF_C99_C90RES_BUILTIN (BUILT_IN_ISINF, "isinf", BT_FN_INT_VAR, ATTR_CONST_NOTHROW_TYPEGENERIC) -DEF_EXT_LIB_BUILTIN (BUILT_IN_ISINFF, "isinff", BT_FN_INT_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_ISINFL, "isinfl", BT_FN_INT_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_ISINFD32, "isinfd32", BT_FN_INT_DFLOAT32, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_ISINFD64, "isinfd64", BT_FN_INT_DFLOAT64, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_ISINFD128, "isinfd128", BT_FN_INT_DFLOAT128, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_C90RES_BUILTIN (BUILT_IN_ISNAN, "isnan", BT_FN_INT_VAR, ATTR_CONST_NOTHROW_TYPEGENERIC_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_ISNANF, "isnanf", BT_FN_INT_FLOAT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_ISNANL, "isnanl", BT_FN_INT_LONGDOUBLE, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_ISNAND32, "isnand32", BT_FN_INT_DFLOAT32, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_ISNAND64, "isnand64", BT_FN_INT_DFLOAT64, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_ISNAND128, "isnand128", BT_FN_INT_DFLOAT128, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_ISNORMAL, "isnormal", BT_FN_INT_VAR, ATTR_CONST_NOTHROW_TYPEGENERIC_LEAF) -DEF_GCC_BUILTIN (BUILT_IN_ISGREATER, "isgreater", BT_FN_INT_VAR, ATTR_CONST_NOTHROW_TYPEGENERIC_LEAF) -DEF_GCC_BUILTIN (BUILT_IN_ISGREATEREQUAL, "isgreaterequal", BT_FN_INT_VAR, ATTR_CONST_NOTHROW_TYPEGENERIC_LEAF) -DEF_GCC_BUILTIN (BUILT_IN_ISLESS, "isless", BT_FN_INT_VAR, ATTR_CONST_NOTHROW_TYPEGENERIC_LEAF) -DEF_GCC_BUILTIN (BUILT_IN_ISLESSEQUAL, "islessequal", BT_FN_INT_VAR, ATTR_CONST_NOTHROW_TYPEGENERIC_LEAF) -DEF_GCC_BUILTIN (BUILT_IN_ISLESSGREATER, "islessgreater", BT_FN_INT_VAR, ATTR_CONST_NOTHROW_TYPEGENERIC_LEAF) -DEF_GCC_BUILTIN (BUILT_IN_ISUNORDERED, "isunordered", BT_FN_INT_VAR, ATTR_CONST_NOTHROW_TYPEGENERIC_LEAF) -DEF_LIB_BUILTIN (BUILT_IN_LABS, "labs", BT_FN_LONG_LONG, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN_LLABS, "llabs", BT_FN_LONGLONG_LONGLONG, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_LONGJMP, "longjmp", BT_FN_VOID_PTR_INT, ATTR_NORETURN_NOTHROW_LIST) -/* [trans-mem]: Adjust BUILT_IN_TM_MALLOC if BUILT_IN_MALLOC is changed. */ -DEF_LIB_BUILTIN (BUILT_IN_MALLOC, "malloc", BT_FN_PTR_SIZE, ATTR_MALLOC_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_NEXT_ARG, "next_arg", BT_FN_PTR_VAR, ATTR_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_PARITY, "parity", BT_FN_INT_UINT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_PARITYIMAX, "parityimax", BT_FN_INT_UINTMAX, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_PARITYL, "parityl", BT_FN_INT_ULONG, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_PARITYLL, "parityll", BT_FN_INT_ULONGLONG, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_POPCOUNT, "popcount", BT_FN_INT_UINT, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_POPCOUNTIMAX, "popcountimax", BT_FN_INT_UINTMAX, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_POPCOUNTL, "popcountl", BT_FN_INT_ULONG, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_POPCOUNTLL, "popcountll", BT_FN_INT_ULONGLONG, ATTR_CONST_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_POSIX_MEMALIGN, "posix_memalign", BT_FN_INT_PTRPTR_SIZE_SIZE, ATTR_NOTHROW_NONNULL_LEAF) -DEF_GCC_BUILTIN (BUILT_IN_PREFETCH, "prefetch", BT_FN_VOID_CONST_PTR_VAR, ATTR_NOVOPS_LEAF_LIST) -DEF_LIB_BUILTIN (BUILT_IN_REALLOC, "realloc", BT_FN_PTR_PTR_SIZE, ATTR_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_RETURN, "return", BT_FN_VOID_PTR, ATTR_NORETURN_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_RETURN_ADDRESS, "return_address", BT_FN_PTR_UINT, ATTR_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_SAVEREGS, "saveregs", BT_FN_PTR_VAR, ATTR_NULL) -DEF_GCC_BUILTIN (BUILT_IN_SETJMP, "setjmp", BT_FN_INT_PTR, ATTR_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_STRFMON, "strfmon", BT_FN_SSIZE_STRING_SIZE_CONST_STRING_VAR, ATTR_FORMAT_STRFMON_NOTHROW_3_4) -DEF_LIB_BUILTIN (BUILT_IN_STRFTIME, "strftime", BT_FN_SIZE_STRING_SIZE_CONST_STRING_CONST_PTR, ATTR_FORMAT_STRFTIME_NOTHROW_3_0) -DEF_GCC_BUILTIN (BUILT_IN_TRAP, "trap", BT_FN_VOID, ATTR_NORETURN_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_UNREACHABLE, "unreachable", BT_FN_VOID, ATTR_CONST_NORETURN_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_UNWIND_INIT, "unwind_init", BT_FN_VOID, ATTR_NULL) -DEF_GCC_BUILTIN (BUILT_IN_UPDATE_SETJMP_BUF, "update_setjmp_buf", BT_FN_VOID_PTR_INT, ATTR_NULL) -DEF_GCC_BUILTIN (BUILT_IN_VA_COPY, "va_copy", BT_FN_VOID_VALIST_REF_VALIST_ARG, ATTR_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_VA_END, "va_end", BT_FN_VOID_VALIST_REF, ATTR_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_VA_START, "va_start", BT_FN_VOID_VALIST_REF_VAR, ATTR_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_VA_ARG_PACK, "va_arg_pack", BT_FN_INT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_VA_ARG_PACK_LEN, "va_arg_pack_len", BT_FN_INT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN__EXIT, "_exit", BT_FN_VOID_INT, ATTR_NORETURN_NOTHROW_LEAF_LIST) -DEF_C99_BUILTIN (BUILT_IN__EXIT2, "_Exit", BT_FN_VOID_INT, ATTR_NORETURN_NOTHROW_LEAF_LIST) - -/* Implementing nested functions. */ -DEF_BUILTIN_STUB (BUILT_IN_INIT_TRAMPOLINE, "__builtin_init_trampoline") -DEF_BUILTIN_STUB (BUILT_IN_INIT_HEAP_TRAMPOLINE, "__builtin_init_heap_trampoline") -DEF_BUILTIN_STUB (BUILT_IN_ADJUST_TRAMPOLINE, "__builtin_adjust_trampoline") -DEF_BUILTIN_STUB (BUILT_IN_NONLOCAL_GOTO, "__builtin_nonlocal_goto") - -/* Implementing __builtin_setjmp. */ -DEF_BUILTIN_STUB (BUILT_IN_SETJMP_SETUP, "__builtin_setjmp_setup") -DEF_BUILTIN_STUB (BUILT_IN_SETJMP_RECEIVER, "__builtin_setjmp_receiver") - -/* Implementing variable sized local variables. */ -DEF_BUILTIN_STUB (BUILT_IN_STACK_SAVE, "__builtin_stack_save") -DEF_BUILTIN_STUB (BUILT_IN_STACK_RESTORE, "__builtin_stack_restore") -DEF_BUILTIN_STUB (BUILT_IN_ALLOCA_WITH_ALIGN, "__builtin_alloca_with_align") - -/* Object size checking builtins. */ -DEF_GCC_BUILTIN (BUILT_IN_OBJECT_SIZE, "object_size", BT_FN_SIZE_CONST_PTR_INT, ATTR_PURE_NOTHROW_LEAF_LIST) -DEF_EXT_LIB_BUILTIN (BUILT_IN_MEMCPY_CHK, "__memcpy_chk", BT_FN_PTR_PTR_CONST_PTR_SIZE_SIZE, ATTR_RET1_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_MEMMOVE_CHK, "__memmove_chk", BT_FN_PTR_PTR_CONST_PTR_SIZE_SIZE, ATTR_RET1_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_MEMPCPY_CHK, "__mempcpy_chk", BT_FN_PTR_PTR_CONST_PTR_SIZE_SIZE, ATTR_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_MEMSET_CHK, "__memset_chk", BT_FN_PTR_PTR_INT_SIZE_SIZE, ATTR_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_STPCPY_CHK, "__stpcpy_chk", BT_FN_STRING_STRING_CONST_STRING_SIZE, ATTR_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_STPNCPY_CHK, "__stpncpy_chk", BT_FN_STRING_STRING_CONST_STRING_SIZE_SIZE, ATTR_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_STRCAT_CHK, "__strcat_chk", BT_FN_STRING_STRING_CONST_STRING_SIZE, ATTR_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_STRCPY_CHK, "__strcpy_chk", BT_FN_STRING_STRING_CONST_STRING_SIZE, ATTR_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_STRNCAT_CHK, "__strncat_chk", BT_FN_STRING_STRING_CONST_STRING_SIZE_SIZE, ATTR_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_STRNCPY_CHK, "__strncpy_chk", BT_FN_STRING_STRING_CONST_STRING_SIZE_SIZE, ATTR_NOTHROW_NONNULL_LEAF) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SNPRINTF_CHK, "__snprintf_chk", BT_FN_INT_STRING_SIZE_INT_SIZE_CONST_STRING_VAR, ATTR_FORMAT_PRINTF_NOTHROW_5_6) -DEF_EXT_LIB_BUILTIN (BUILT_IN_SPRINTF_CHK, "__sprintf_chk", BT_FN_INT_STRING_INT_SIZE_CONST_STRING_VAR, ATTR_FORMAT_PRINTF_NOTHROW_4_5) -DEF_EXT_LIB_BUILTIN (BUILT_IN_VSNPRINTF_CHK, "__vsnprintf_chk", BT_FN_INT_STRING_SIZE_INT_SIZE_CONST_STRING_VALIST_ARG, ATTR_FORMAT_PRINTF_NOTHROW_5_0) -DEF_EXT_LIB_BUILTIN (BUILT_IN_VSPRINTF_CHK, "__vsprintf_chk", BT_FN_INT_STRING_INT_SIZE_CONST_STRING_VALIST_ARG, ATTR_FORMAT_PRINTF_NOTHROW_4_0) -DEF_EXT_LIB_BUILTIN (BUILT_IN_FPRINTF_CHK, "__fprintf_chk", BT_FN_INT_FILEPTR_INT_CONST_STRING_VAR, ATTR_FORMAT_PRINTF_3_4) -DEF_EXT_LIB_BUILTIN (BUILT_IN_PRINTF_CHK, "__printf_chk", BT_FN_INT_INT_CONST_STRING_VAR, ATTR_FORMAT_PRINTF_2_3) -DEF_EXT_LIB_BUILTIN (BUILT_IN_VFPRINTF_CHK, "__vfprintf_chk", BT_FN_INT_FILEPTR_INT_CONST_STRING_VALIST_ARG, ATTR_FORMAT_PRINTF_3_0) -DEF_EXT_LIB_BUILTIN (BUILT_IN_VPRINTF_CHK, "__vprintf_chk", BT_FN_INT_INT_CONST_STRING_VALIST_ARG, ATTR_FORMAT_PRINTF_2_0) - -/* Profiling hooks. */ -DEF_BUILTIN (BUILT_IN_PROFILE_FUNC_ENTER, "__cyg_profile_func_enter", BUILT_IN_NORMAL, BT_FN_VOID_PTR_PTR, BT_LAST, - false, false, false, ATTR_NULL, true, true) -DEF_BUILTIN (BUILT_IN_PROFILE_FUNC_EXIT, "__cyg_profile_func_exit", BUILT_IN_NORMAL, BT_FN_VOID_PTR_PTR, BT_LAST, - false, false, false, ATTR_NULL, true, true) - -/* TLS thread pointer related builtins. */ -DEF_BUILTIN (BUILT_IN_THREAD_POINTER, "__builtin_thread_pointer", - BUILT_IN_NORMAL, BT_FN_PTR, BT_LAST, - false, false, true, ATTR_CONST_NOTHROW_LIST, true, - targetm.have_tls) - -DEF_BUILTIN (BUILT_IN_SET_THREAD_POINTER, "__builtin_set_thread_pointer", - BUILT_IN_NORMAL, BT_FN_VOID_PTR, BT_LAST, - false, false, true, ATTR_NOTHROW_LIST, true, - targetm.have_tls) - -/* TLS emulation. */ -DEF_BUILTIN (BUILT_IN_EMUTLS_GET_ADDRESS, targetm.emutls.get_address, - BUILT_IN_NORMAL, - BT_FN_PTR_PTR, BT_FN_PTR_PTR, - true, true, true, ATTR_CONST_NOTHROW_NONNULL_LEAF, false, - !targetm.have_tls) -DEF_BUILTIN (BUILT_IN_EMUTLS_REGISTER_COMMON, - targetm.emutls.register_common, BUILT_IN_NORMAL, - BT_FN_VOID_PTR_WORD_WORD_PTR, BT_FN_VOID_PTR_WORD_WORD_PTR, - true, true, true, ATTR_NOTHROW_LEAF_LIST, false, - !targetm.have_tls) - -/* Exception support. */ -DEF_BUILTIN_STUB (BUILT_IN_UNWIND_RESUME, "__builtin_unwind_resume") -DEF_BUILTIN_STUB (BUILT_IN_CXA_END_CLEANUP, "__builtin_cxa_end_cleanup") -DEF_BUILTIN_STUB (BUILT_IN_EH_POINTER, "__builtin_eh_pointer") -DEF_BUILTIN_STUB (BUILT_IN_EH_FILTER, "__builtin_eh_filter") -DEF_BUILTIN_STUB (BUILT_IN_EH_COPY_VALUES, "__builtin_eh_copy_values") - -/* __FILE__, __LINE__, __FUNCTION__ as builtins. */ -DEF_GCC_BUILTIN (BUILT_IN_FILE, "FILE", BT_FN_CONST_STRING, ATTR_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_FUNCTION, "FUNCTION", BT_FN_CONST_STRING, ATTR_NOTHROW_LEAF_LIST) -DEF_GCC_BUILTIN (BUILT_IN_LINE, "LINE", BT_FN_INT, ATTR_NOTHROW_LEAF_LIST) - -#if 0 -/* Synchronization Primitives. */ -#include "sync-builtins.def" - -/* OpenMP builtins. */ -#include "omp-builtins.def" - -/* Cilk keywords builtins. */ -#include "cilk-builtins.def" - -/* GTM builtins. */ -#include "gtm-builtins.def" - -/* Sanitizer builtins. */ -#include "sanitizer.def" - -/* Cilk Plus builtins. */ -#include "cilkplus.def" -#endif Index: bcfa/prelude.cf =================================================================== --- libcfa/prelude.cf (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ (revision ) @@ -1,615 +1,0 @@ -// -*- Mode: C -*- -// -// Copyright (C) Glen Ditchfield 1994, 1999 -// -// prelude.cf -- Standard Cforall Preample for C99 -// -// Author : Glen Ditchfield -// Created On : Sat Nov 29 07:23:41 2014 -// Last Modified By : Peter A. Buhr -// Last Modified On : Mon May 4 17:21:02 2015 -// Update Count : 70 -// - -// Following line added from stddef.h by build - -typedef long int ptrdiff_t; - -// Section numbers from: http://plg.uwaterloo.ca/~cforall/refrat.pdf - -// ------------------------------------------------------------ -// -// Section 4.1 Primary Expressions -// -// ------------------------------------------------------------ - -const int 0, 1; - -forall ( dtype DT ) const DT * const 0; -forall ( ftype FT ) FT * const 0; - -// ------------------------------------------------------------ -// -// Section 4.2 Postfix Operators -// -// ------------------------------------------------------------ - -_Bool ?++( _Bool * ), ?++( volatile _Bool * ); -_Bool ?--( _Bool * ), ?--( volatile _Bool * ); -unsigned char ?++( unsigned char * ), ?++( volatile unsigned char * ); -signed int ?++( signed int * ), ?++( volatile signed int * ); -signed int ?--( signed int * ), ?--( volatile signed int * ); -unsigned int ?++( unsigned int * ), ?++( volatile unsigned int * ); -unsigned int ?--( unsigned int * ), ?--( volatile unsigned int * ); -signed long int ?++( signed long int * ), ?++( volatile signed long int * ); -signed long int ?--( signed long int * ), ?--( volatile signed long int * ); -unsigned long int ?++( unsigned long int * ), ?++( volatile unsigned long int * ); -unsigned long int ?--( unsigned long int * ), ?--( volatile unsigned long int * ); -signed long long int ?++( signed long long int * ), ?++( volatile signed long long int * ); -signed long long int ?--( signed long long int * ), ?--( volatile signed long long int * ); -unsigned long long int ?++( unsigned long long int * ), ?++( volatile unsigned long long int * ); -unsigned long long int ?--( unsigned long long int * ), ?--( volatile unsigned long long int * ); -float ?++( float * ), ?++( volatile float * ); -float ?--( float * ), ?--( volatile float * ); -double ?++( double * ), ?++( volatile double * ); -double ?--( double * ), ?--( volatile double * ); -long double ?++( long double * ), ?++( volatile long double * ); -long double ?--( long double * ), ?--( volatile long double * ); -float _Complex ?++( float _Complex * ), ?++( volatile float _Complex * ); -float _Complex ?--( float _Complex * ), ?--( volatile float _Complex * ); -double _Complex ?++( double _Complex * ), ?++( volatile double _Complex * ); -double _Complex ?--( double _Complex * ), ?--( volatile double _Complex * ); -long double _Complex ?++( long double _Complex * ), ?++( volatile long double _Complex * ); -long double _Complex ?--( long double _Complex * ), ?--( volatile long double _Complex * ); - -forall( type T ) T * ?++( T ** ); -forall( type T ) const T * ?++( const T ** ); -forall( type T ) volatile T * ?++( volatile T ** ); -forall( type T ) const volatile T * ?++( const volatile T ** ); -forall( type T ) T * ?--( T ** ); -forall( type T ) const T * ?--( const T ** ); -forall( type T ) volatile T * ?--( volatile T ** ); -forall( type T ) const volatile T * ?--( const volatile T ** ); - -forall( type T ) lvalue T ?[?]( T *, ptrdiff_t ); -forall( type T ) const lvalue T ?[?]( const T *, ptrdiff_t ); -forall( type T ) volatile lvalue T ?[?]( volatile T *, ptrdiff_t ); -forall( type T ) const volatile lvalue T ?[?]( const volatile T *, ptrdiff_t ); -forall( type T ) lvalue T ?[?]( ptrdiff_t, T * ); -forall( type T ) const lvalue T ?[?]( ptrdiff_t, const T * ); -forall( type T ) volatile lvalue T ?[?]( ptrdiff_t, volatile T * ); -forall( type T ) const volatile lvalue T ?[?]( ptrdiff_t, const volatile T * ); - -// ------------------------------------------------------------ -// -// Section 4.3 Unary Operators -// -// ------------------------------------------------------------ - -_Bool ++?( _Bool * ), --?( _Bool * ); -signed int ++?( signed int * ), --?( signed int * ); -unsigned int ++?( unsigned int * ), --?( unsigned int * ); -signed long int ++?( signed long int * ), --?( signed long int * ); -unsigned long int ++?( unsigned long int * ), --?( unsigned long int * ); -signed long long int ++?( signed long long int * ), --?( signed long long int * ); -unsigned long long int ++?( unsigned long long int * ), --?( unsigned long long int * ); -float ++?( float * ), --?( float * ); -double ++?( double * ), --?( double * ); -long double ++?( long double * ), --?( long double * ); -float _Complex ++?( float _Complex * ), --?( float _Complex * ); -double _Complex ++?( double _Complex * ), --?( double _Complex * ); -long double _Complex ++?( long double _Complex * ), --?( long double _Complex * ); - -forall( type T ) T * ++?( T ** ); -forall( type T ) const T * ++?( const T ** ); -forall( type T ) volatile T * ++?( volatile T ** ); -forall( type T ) const volatile T * ++?( const volatile T ** ); -forall( type T ) T * --?( T ** ); -forall( type T ) const T * --?( const T ** ); -forall( type T ) volatile T * --?( volatile T ** ); -forall( type T ) const volatile T * --?( const volatile T ** ); - -forall( type T ) lvalue T *?( T * ); -forall( type T ) const lvalue T *?( const T * ); -forall( type T ) volatile lvalue T *?( volatile T * ); -forall( type T ) const volatile lvalue T *?( const volatile T * ); -forall( ftype FT ) lvalue FT *?( FT * ); - -_Bool +?( _Bool ), -?( _Bool ), ~?( _Bool ); -signed int +?( signed int ), -?( signed int ), ~?( signed int ); -unsigned int +?( unsigned int ), -?( unsigned int ), ~?( unsigned int ); -signed long int +?( signed long int ), -?( signed long int ), ~?( signed long int ); -unsigned long int +?( unsigned long int ), -?( unsigned long int ), ~?( unsigned long int ); -signed long long int +?( signed long long int ), -?( signed long long int ), ~?( signed long long int ); -unsigned long long int +?( unsigned long long int ), -?( unsigned long long int ), ~?( unsigned long long int ); -float +?( float ), -?( float ); -double +?( double ), -?( double ); -long double +?( long double ), -?( long double ); -float _Complex +?( float _Complex ), -?( float _Complex ); -double _Complex +?( double _Complex ), -?( double _Complex ); -long double _Complex +?( long double _Complex ), -?( long double _Complex ); - -signed int !?( signed int ), !?( unsigned int ), - !?( long int ), !?( unsigned long int ), - !?( long long int ), !?( unsigned long long int ), - !?( float ), !?( double ), !?( long double ), - !?( float _Complex ), !?( double _Complex ), !?( long double _Complex ); - -forall ( dtype DT ) int !?( const volatile DT * ); -forall ( ftype FT ) int !?( FT * ); - -// ------------------------------------------------------------ -// -// Section 4.5 Multiplicative Operators -// -// ------------------------------------------------------------ - -_Bool ?*?( _Bool, _Bool ), ?/?( _Bool, _Bool ), ?%?( _Bool, _Bool ); -signed int ?*?( signed int, signed int ), ?/?( signed int, signed int ), ?%?( signed int, signed int ); -unsigned int ?*?( unsigned int, unsigned int ), ?/?( unsigned int, unsigned int ), ?%?( unsigned int, unsigned int ); -signed long int ?*?( signed long int, signed long int ), ?/?( signed long int, signed long int ), ?%?( signed long int, signed long int ); -unsigned long int ?*?( unsigned long int, unsigned long int ), ?/?( unsigned long int, long unsigned ), ?%?( long unsigned, long unsigned ); -signed long long int ?*?( signed long long int, signed long long int ), ?/?( signed long long int, signed long long int ), ?%?( signed long long int, signed long long int ); -unsigned long long int ?*?( unsigned long long int, unsigned long long int ), ?/?( unsigned long long int, long long unsigned ), ?%?( long long unsigned, long long unsigned ); -float ?*?( float, float ), ?/?( float, float ); -double ?*?( double, double ), ?/?( double, double ); -long double ?*?( long double, long double ), ?/?( long double, long double ); -// gcc does not support _Imaginary -//float _Imaginary ?*?( float _Imaginary, float _Imaginary), ?/?( float _Imaginary, float _Imaginary ); -//double _Imaginary ?*?( double _Imaginary, double _Imaginary), ?/?( double _Imaginary, double _Imaginary ); -//long double _Imaginary ?*?( long double _Imaginary, long double _Imaginary), ?/?( long double _Imaginary, long double _Imaginary ); -float _Complex ?*?( float _Complex, float _Complex ), ?/?( float _Complex, float _Complex ); -double _Complex ?*?( double _Complex, double _Complex ), ?/?( double _Complex, double _Complex ); -long double _Complex ?*?( long double _Complex, long double _Complex ), ?/?( long double _Complex, long double _Complex ); - -// ------------------------------------------------------------ -// -// Section 4.6 Additive Operators -// -// ------------------------------------------------------------ - -_Bool ?+?( _Bool, _Bool ), ?-?( _Bool, _Bool ); -signed int ?+?( signed int, signed int ), ?-?( signed int, signed int ); -unsigned int ?+?( unsigned int, unsigned int ), ?-?( unsigned int, unsigned int ); -signed long int ?+?( signed long int, signed long int ), ?-?( signed long int, signed long int ); -unsigned long int ?+?( unsigned long int, unsigned long int ), ?-?( unsigned long int, long unsigned ); -signed long long int ?+?( signed long long int, long long int signed), ?-?( signed long long int, signed long long int ); -unsigned long long int ?+?( unsigned long long int, unsigned long long int ), ?-?( unsigned long long int, long long unsigned ); -float ?+?( float, float ), ?-?( float, float ); -double ?+?( double, double ), ?-?( double, double ); -long double ?+?( long double, long double ), ?-?( long double, long double ); -float _Complex ?+?( float _Complex, float _Complex ), ?-?( float _Complex, float _Complex ); -double _Complex ?+?( double _Complex, double _Complex ), ?-?( double _Complex, double _Complex ); -long double _Complex ?+?( long double _Complex, long double _Complex ), ?-?( long double _Complex, long double _Complex ); - -forall( type T ) T * ?+?( T *, ptrdiff_t ); -forall( type T ) T * ?+?( ptrdiff_t, T * ); -forall( type T ) const T * ?+?( const T *, ptrdiff_t ); -forall( type T ) const T * ?+?( ptrdiff_t, const T * ); -forall( type T ) volatile T * ?+?( volatile T *, ptrdiff_t ); -forall( type T ) volatile T * ?+?( ptrdiff_t, volatile T * ); -forall( type T ) const volatile T * ?+?( const volatile T *, ptrdiff_t ); -forall( type T ) const volatile T * ?+?( ptrdiff_t, const volatile T * ); -forall( type T ) T * ?-?( T *, ptrdiff_t ); -forall( type T ) const T * ?-?( const T *, ptrdiff_t ); -forall( type T ) volatile T * ?-?( volatile T *, ptrdiff_t ); -forall( type T ) const volatile T * ?-?( const volatile T *, ptrdiff_t ); -forall( type T ) ptrdiff_t ?-?( const volatile T *, const volatile T * ); - -// ------------------------------------------------------------ -// -// Section 4.7 Bitwise Shift Operators -// -// ------------------------------------------------------------ - -_Bool ?<>?( _Bool, _Bool ); -signed int ?<>?( signed int, signed int ); -unsigned int ?<>?( unsigned int, unsigned int ); -signed long int ?<>?( signed long int, signed long int ); -unsigned long int ?<>?( unsigned long int, unsigned long int ); - -// ------------------------------------------------------------ -// -// Section 4.8 Relational Operators -// -// ------------------------------------------------------------ - -signed int ??( _Bool, _Bool ), ?>=?( _Bool, _Bool ); -signed int ??( unsigned char, unsigned char ), ?>=?( unsigned char, unsigned char ); -signed int ??( signed int, signed int ), ?>=?( signed int, signed int ); -signed int ??( unsigned int, unsigned int ), ?>=?( unsigned int, unsigned int ); -signed int ??( signed long int, signed long int ), ?>=?( signed long int, signed long int ); -signed int ??( unsigned long int, unsigned long int ), ?>=?( unsigned long int, unsigned long int ); -signed int ??( float, float ), ?>=?( float, float ); -signed int ??( double, double ), ?>=?( double, double ); -signed int ??( long double, long double ), ?>=?( long double, long double ); - -forall( dtype DT ) signed int ??( const volatile DT *, const volatile DT * ); -forall( dtype DT ) signed int ?<=?( const volatile DT *, const volatile DT * ); -forall( dtype DT ) signed int ?>=?( const volatile DT *, const volatile DT * ); - -// ------------------------------------------------------------ -// -// Section 4.9 Equality Operators -// -// ------------------------------------------------------------ - -signed int ?==?( _Bool, _Bool ), ?!=?( _Bool, _Bool ); -signed int ?==?( signed int, signed int ), ?!=?( signed int, signed int ); -signed int ?==?( unsigned int, unsigned int ), ?!=?( unsigned int, unsigned int ); -signed int ?==?( signed long int, signed long int ), ?!=?( signed long int, signed long int ); -signed int ?==?( unsigned long int, unsigned long int ), ?!=?( unsigned long int, long unsigned ); -signed int ?==?( signed long long int, long long int signed), ?!=?( signed long long int, signed long long int ); -signed int ?==?( unsigned long long int, unsigned long long int ), ?!=?( unsigned long long int, long long unsigned ); -signed int ?==?( float, float ), ?!=?( float, float ); -signed int ?==?( double, double ), ?!=?( double, double ); -signed int ?==?( long double, long double ), ?!=?( long double, long double ); -signed int ?==?( float _Complex, float _Complex ), ?!=?( float _Complex, float _Complex ); -signed int ?==?( double _Complex, double _Complex ), ?!=?( double _Complex, double _Complex ); -signed int ?==?( long double _Complex, long double _Complex ), ?!=?( long double _Complex, long double _Complex ); - -forall( dtype DT ) signed int ?==?( DT *, DT * ); -forall( dtype DT ) signed int ?==?( const DT *, const DT * ); -forall( dtype DT ) signed int ?==?( volatile DT *, volatile DT * ); -forall( dtype DT ) signed int ?==?( const volatile DT *, const volatile DT * ); -forall( ftype FT ) signed int ?==?( FT *, FT * ); -forall( dtype DT ) signed int ?!=?( DT *, DT * ); -forall( dtype DT ) signed int ?!=?( const DT *, const DT * ); -forall( dtype DT ) signed int ?!=?( volatile DT *, volatile DT * ); -forall( dtype DT ) signed int ?!=?( const volatile DT *, const volatile DT * ); -forall( ftype FT ) signed int ?!=?( FT *, FT * ); - -forall( dtype DT ) signed int ?==?( const volatile DT *, const volatile void * ); -forall( dtype DT ) signed int ?==?( const volatile void *, const volatile DT * ); -forall( dtype DT ) signed int ?!=?( const volatile DT *, const volatile void * ); -forall( dtype DT ) signed int ?!=?( const volatile void *, const volatile DT * ); - -forall( dtype DT ) signed int ?==?( const volatile DT *, forall( dtype DT2 )const DT2 * ); -forall( dtype DT ) signed int ?==?( forall( dtype DT2 )const DT2 *, const volatile DT * ); -forall( ftype FT ) signed int ?==?( FT *, forall( ftype FT2 )FT2 * ); -forall( ftype FT ) signed int ?==?( forall( ftype FT2 )FT2 *, FT * ); -forall( dtype DT ) signed int ?!=?( const volatile DT *, forall( dtype DT2 )const DT2 * ); -forall( dtype DT ) signed int ?!=?( forall( dtype DT2 )const DT2 *, const volatile DT * ); -forall( ftype FT ) signed int ?!=?( FT *, forall( ftype FT2 )FT2 * ); -forall( ftype FT ) signed int ?!=?( forall( ftype FT2 )FT2 *, FT * ); - -// ------------------------------------------------------------ -// -// Section 4.10 Bitwise AND Operators -// -// ------------------------------------------------------------ - -_Bool ?&?( _Bool, _Bool ); -signed int ?&?( signed int, signed int ); -unsigned int ?&?( unsigned int, unsigned int ); -signed long int ?&?( signed long int, signed long int ); -unsigned long int ?&?( unsigned long int, unsigned long int ); - -// ------------------------------------------------------------ -// -// Section 4.11 Bitwise XOR Operators -// -// ------------------------------------------------------------ - -_Bool ?^?( _Bool, _Bool ); -signed int ?^?( signed int, signed int ); -unsigned int ?^?( unsigned int, unsigned int ); -signed long int ?^?( signed long int, signed long int ); -unsigned long int ?^?( unsigned long int, unsigned long int ); - -// ------------------------------------------------------------ -// -// Section 4.12 Bitwise OR Operators -// -// ------------------------------------------------------------ - -_Bool ?|?( _Bool, _Bool ); -signed int ?|?( signed int, signed int ); -unsigned int ?|?( unsigned int, unsigned int ); -signed long int ?|?( signed long int, signed long int ); -unsigned long int ?|?( unsigned long int, unsigned long int ); - -// ------------------------------------------------------------ -// -// Section 4.16 Assignment Operator -// -// ------------------------------------------------------------ - -forall( ftype FT ) FT * ?=?( FT **, FT * ); -forall( ftype FT ) FT * ?=?( FT * volatile *, FT * ); - -forall( dtype DT ) DT * ?=?( DT * *, DT * ); -forall( dtype DT ) DT * ?=?( DT * volatile *, DT * ); -forall( dtype DT ) const DT * ?=?( const DT * *, DT * ); -forall( dtype DT ) const DT * ?=?( const DT * volatile *, DT * ); -forall( dtype DT ) const DT * ?=?( const DT * *, const DT * ); -forall( dtype DT ) const DT * ?=?( const DT * volatile *, const DT * ); -forall( dtype DT ) volatile DT * ?=?( volatile DT * *, DT * ); -forall( dtype DT ) volatile DT * ?=?( volatile DT * volatile *, DT * ); -forall( dtype DT ) volatile DT * ?=?( volatile DT * *, volatile DT * ); -forall( dtype DT ) volatile DT * ?=?( volatile DT * volatile *, volatile DT * ); - -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * *, DT * ); -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * volatile *, DT * ); -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * *, const DT * ); -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * volatile *, const DT * ); -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * *, volatile DT * ); -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * volatile *, volatile DT * ); -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * *, const volatile DT * ); -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * volatile *, const volatile DT * ); - -forall( dtype DT ) DT * ?=?( DT * *, void * ); -forall( dtype DT ) DT * ?=?( DT * volatile *, void * ); -forall( dtype DT ) const DT * ?=?( const DT * *, void * ); -forall( dtype DT ) const DT * ?=?( const DT * volatile *, void * ); -forall( dtype DT ) const DT * ?=?( const DT * *, const void * ); -forall( dtype DT ) const DT * ?=?( const DT * volatile *, const void * ); -forall( dtype DT ) volatile DT * ?=?( volatile DT * *, void * ); -forall( dtype DT ) volatile DT * ?=?( volatile DT * volatile *, void * ); -forall( dtype DT ) volatile DT * ?=?( volatile DT * *, volatile void * ); -forall( dtype DT ) volatile DT * ?=?( volatile DT * volatile *, volatile void * ); - -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * *, void * ); -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * volatile *, void * ); -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * *, const void * ); -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * volatile *, const void * ); -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * *, volatile void * ); -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * volatile *, volatile void * ); -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * *, const volatile void * ); -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * volatile *, const volatile void * ); - -forall( dtype DT ) void * ?=?( void * *, DT * ); -forall( dtype DT ) void * ?=?( void * volatile *, DT * ); -forall( dtype DT ) const void * ?=?( const void * *, DT * ); -forall( dtype DT ) const void * ?=?( const void * volatile *, DT * ); -forall( dtype DT ) const void * ?=?( const void * *, const DT * ); -forall( dtype DT ) const void * ?=?( const void * volatile *, const DT * ); -forall( dtype DT ) volatile void * ?=?( volatile void * *, DT * ); -forall( dtype DT ) volatile void * ?=?( volatile void * volatile *, DT * ); -forall( dtype DT ) volatile void * ?=?( volatile void * *, volatile DT * ); -forall( dtype DT ) volatile void * ?=?( volatile void * volatile *, volatile DT * ); -forall( dtype DT ) const volatile void * ?=?( const volatile void * *, DT * ); -forall( dtype DT ) const volatile void * ?=?( const volatile void * volatile *, DT * ); -forall( dtype DT ) const volatile void * ?=?( const volatile void * *, const DT * ); -forall( dtype DT ) const volatile void * ?=?( const volatile void * volatile *, const DT * ); -forall( dtype DT ) const volatile void * ?=?( const volatile void * *, volatile DT * ); -forall( dtype DT ) const volatile void * ?=?( const volatile void * volatile *, volatile DT * ); -forall( dtype DT ) const volatile void * ?=?( const volatile void * *, const volatile DT * ); -forall( dtype DT ) const volatile void * ?=?( const volatile void * volatile *, const volatile DT * ); - -void * ?=?( void * *, void * ); -void * ?=?( void * volatile *, void * ); -const void * ?=?( const void * *, void * ); -const void * ?=?( const void * volatile *, void * ); -const void * ?=?( const void * *, const void * ); -const void * ?=?( const void * volatile *, const void * ); -volatile void * ?=?( volatile void * *, void * ); -volatile void * ?=?( volatile void * volatile *, void * ); -volatile void * ?=?( volatile void * *, volatile void * ); -volatile void * ?=?( volatile void * volatile *, volatile void * ); -const volatile void * ?=?( const volatile void * *, void * ); -const volatile void * ?=?( const volatile void * volatile *, void * ); -const volatile void * ?=?( const volatile void * *, const void * ); -const volatile void * ?=?( const volatile void * volatile *, const void * ); -const volatile void * ?=?( const volatile void * *, volatile void * ); -const volatile void * ?=?( const volatile void * volatile *, volatile void * ); -const volatile void * ?=?( const volatile void * *, const volatile void * ); -const volatile void * ?=?( const volatile void * volatile *, const volatile void * ); - -forall( dtype DT ) DT * ?=?( DT * *, forall( dtype DT2 ) const DT2 * ); -forall( dtype DT ) DT * ?=?( DT * volatile *, forall( dtype DT2 ) const DT2 * ); -forall( dtype DT ) const DT * ?=?( const DT * *, forall( dtype DT2 ) const DT2 * ); -forall( dtype DT ) const DT * ?=?( const DT * volatile *, forall( dtype DT2 ) const DT2 * ); -forall( dtype DT ) volatile DT * ?=?( volatile DT * *, forall( dtype DT2 ) const DT2 * ); -forall( dtype DT ) volatile DT * ?=?( volatile DT * volatile *, forall( dtype DT2 ) const DT2 * ); -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * *, forall( dtype DT2 ) const DT2 * ); -forall( dtype DT ) const volatile DT * ?=?( const volatile DT * volatile *, forall( dtype DT2 ) const DT2 * ); - -forall( ftype FT ) FT * ?=?( FT * *, forall( ftype FT2 ) FT2 * ); -forall( ftype FT ) FT * ?=?( FT * volatile *, forall( ftype FT2 ) FT2 * ); - -forall( type T ) T * ?+=?( T * *, ptrdiff_t ); -forall( type T ) T * ?+=?( T * volatile *, ptrdiff_t ); -forall( type T ) const T * ?+=?( const T * *, ptrdiff_t ); -forall( type T ) const T * ?+=?( const T * volatile *, ptrdiff_t ); -forall( type T ) volatile T * ?+=?( volatile T * *, ptrdiff_t ); -forall( type T ) volatile T * ?+=?( volatile T * volatile *, ptrdiff_t ); -forall( type T ) const volatile T * ?+=?( const volatile T * *, ptrdiff_t ); -forall( type T ) const volatile T * ?+=?( const volatile T * volatile *, ptrdiff_t ); -forall( type T ) T * ?-=?( T * *, ptrdiff_t ); -forall( type T ) T * ?-=?( T * volatile *, ptrdiff_t ); -forall( type T ) const T * ?-=?( const T * *, ptrdiff_t ); -forall( type T ) const T * ?-=?( const T * volatile *, ptrdiff_t ); -forall( type T ) volatile T * ?-=?( volatile T * *, ptrdiff_t ); -forall( type T ) volatile T * ?-=?( volatile T * volatile *, ptrdiff_t ); -forall( type T ) const volatile T * ?-=?( const volatile T * *, ptrdiff_t ); -forall( type T ) const volatile T * ?-=?( const volatile T * volatile *, ptrdiff_t ); - -_Bool ?=?( _Bool *, _Bool ), ?=?( volatile _Bool *, _Bool ); -char ?=?( char *, char ), ?=?( volatile char *, char ); -char signed ?=?( char signed *, char signed ), ?=?( volatile char signed *, char signed ); -char unsigned ?=?( char unsigned *, char unsigned ), ?=?( volatile char unsigned *, char unsigned ); -int short ?=?( int short *, int short ), ?=?( volatile int short *, int short ); -int short unsigned ?=?( int short unsigned *, int short unsigned ), ?=?( volatile int short unsigned *, int short unsigned ); -signed int ?=?( signed int *, signed int ), ?=?( volatile signed int *, signed int ); -unsigned int ?=?( unsigned *, unsigned ), ?=?( volatile unsigned *, unsigned ); -signed long int ?=?( signed long int *, signed long int ), ?=?( volatile signed long int *, signed long int ); -unsigned long int ?=?( unsigned long int *, unsigned long int ), ?=?( volatile unsigned long int *, unsigned long int ); -signed long long int ?=?( signed long long int *, signed long long int ), ?=?( volatile signed long long int *, signed long long int ); -unsigned long long int ?=?( unsigned long long int *, unsigned long long int ), ?=?( volatile unsigned long long int *, unsigned long long int ); - -_Bool ?*=?( _Bool *, _Bool ), ?*=?( volatile _Bool *, _Bool ); -char ?*=?( char *, char ), ?*=?( volatile char *, char ); -char signed ?*=?( char signed *, char signed ), ?*=?( volatile char signed *, char signed ); -char unsigned ?*=?( char unsigned *, char unsigned ), ?*=?( volatile char unsigned *, char unsigned ); -int short ?*=?( int short *, int short ), ?*=?( volatile int short *, int short ); -int short unsigned ?*=?( int short unsigned *, int short unsigned ), ?*=?( volatile int short unsigned *, int short unsigned ); -signed int ?*=?( signed int *, signed int ), ?*=?( volatile signed int *, signed int ); -unsigned int ?*=?( unsigned *, unsigned ), ?*=?( volatile unsigned *, unsigned ); -signed long int ?*=?( signed long int *, signed long int ), ?*=?( volatile signed long int *, signed long int ); -unsigned long int ?*=?( unsigned long int *, unsigned long int ), ?*=?( volatile unsigned long int *, unsigned long int ); -signed long long int ?*=?( signed long long int *, signed long long int ), ?*=?( volatile signed long long int *, signed long long int ); -unsigned long long int ?*=?( unsigned long long int *, unsigned long long int ), ?*=?( volatile unsigned long long int *, unsigned long long int ); - -_Bool ?/=?( _Bool *, _Bool ), ?/=?( volatile _Bool *, _Bool ); -char ?/=?( char *, char ), ?/=?( volatile char *, char ); -char signed ?/=?( char signed *, char signed ), ?/=?( volatile char signed *, char signed ); -char unsigned ?/=?( char unsigned *, char unsigned ), ?/=?( volatile char unsigned *, char unsigned ); -int short ?/=?( int short *, int short ), ?/=?( volatile int short *, int short ); -int short unsigned ?/=?( int short unsigned *, int short unsigned ), ?/=?( volatile int short unsigned *, int short unsigned ); -signed int ?/=?( signed int *, signed int ), ?/=?( volatile signed int *, signed int ); -unsigned int ?/=?( unsigned *, unsigned ), ?/=?( volatile unsigned *, unsigned ); -signed long int ?/=?( signed long int *, signed long int ), ?/=?( volatile signed long int *, signed long int ); -unsigned long int ?/=?( unsigned long int *, unsigned long int ), ?/=?( volatile unsigned long int *, unsigned long int ); -signed long long int ?/=?( signed long long int *, signed long long int ), ?/=?( volatile signed long long int *, signed long long int ); -unsigned long long int ?/=?( unsigned long long int *, unsigned long long int ), ?/=?( volatile unsigned long long int *, unsigned long long int ); - -_Bool ?%=?( _Bool *, _Bool ), ?%=?( volatile _Bool *, _Bool ); -char ?%=?( char *, char ), ?%=?( volatile char *, char ); -char signed ?%=?( char signed *, char signed ), ?%=?( volatile char signed *, char signed ); -char unsigned ?%=?( char unsigned *, char unsigned ), ?%=?( volatile char unsigned *, char unsigned ); -int short ?%=?( int short *, int short ), ?%=?( volatile int short *, int short ); -int short unsigned ?%=?( int short unsigned *, int short unsigned ), ?%=?( volatile int short unsigned *, int short unsigned ); -signed int ?%=?( signed int *, signed int ), ?%=?( volatile signed int *, signed int ); -unsigned int ?%=?( unsigned *, unsigned ), ?%=?( volatile unsigned *, unsigned ); -signed long int ?%=?( signed long int *, signed long int ), ?%=?( volatile signed long int *, signed long int ); -unsigned long int ?%=?( unsigned long int *, unsigned long int ), ?%=?( volatile unsigned long int *, unsigned long int ); -signed long long int ?%=?( signed long long int *, signed long long int ), ?%=?( volatile signed long long int *, signed long long int ); -unsigned long long int ?%=?( unsigned long long int *, unsigned long long int ), ?%=?( volatile unsigned long long int *, unsigned long long int ); - -_Bool ?+=?( _Bool *, _Bool ), ?+=?( volatile _Bool *, _Bool ); -char ?+=?( char *, char ), ?+=?( volatile char *, char ); -char signed ?+=?( char signed *, char signed ), ?+=?( volatile char signed *, char signed ); -char unsigned ?+=?( char unsigned *, char unsigned ), ?+=?( volatile char unsigned *, char unsigned ); -int short ?+=?( int short *, int short ), ?+=?( volatile int short *, int short ); -int short unsigned ?+=?( int short unsigned *, int short unsigned ), ?+=?( volatile int short unsigned *, int short unsigned ); -signed int ?+=?( signed int *, signed int ), ?+=?( volatile signed int *, signed int ); -unsigned int ?+=?( unsigned *, unsigned ), ?+=?( volatile unsigned *, unsigned ); -signed long int ?+=?( signed long int *, signed long int ), ?+=?( volatile signed long int *, signed long int ); -unsigned long int ?+=?( unsigned long int *, unsigned long int ), ?+=?( volatile unsigned long int *, unsigned long int ); -signed long long int ?+=?( signed long long int *, signed long long int ), ?+=?( volatile signed long long int *, signed long long int ); -unsigned long long int ?+=?( unsigned long long int *, unsigned long long int ), ?+=?( volatile unsigned long long int *, unsigned long long int ); - -_Bool ?-=?( _Bool *, _Bool ), ?-=?( volatile _Bool *, _Bool ); -char ?-=?( char *, char ), ?-=?( volatile char *, char ); -char signed ?-=?( char signed *, char signed ), ?-=?( volatile char signed *, char signed ); -char unsigned ?-=?( char unsigned *, char unsigned ), ?-=?( volatile char unsigned *, char unsigned ); -int short ?-=?( int short *, int short ), ?-=?( volatile int short *, int short ); -int short unsigned ?-=?( int short unsigned *, int short unsigned ), ?-=?( volatile int short unsigned *, int short unsigned ); -signed int ?-=?( signed int *, signed int ), ?-=?( volatile signed int *, signed int ); -unsigned int ?-=?( unsigned *, unsigned ), ?-=?( volatile unsigned *, unsigned ); -signed long int ?-=?( signed long int *, signed long int ), ?-=?( volatile signed long int *, signed long int ); -unsigned long int ?-=?( unsigned long int *, unsigned long int ), ?-=?( volatile unsigned long int *, unsigned long int ); -signed long long int ?-=?( signed long long int *, signed long long int ), ?-=?( volatile signed long long int *, signed long long int ); -unsigned long long int ?-=?( unsigned long long int *, unsigned long long int ), ?-=?( volatile unsigned long long int *, unsigned long long int ); - -_Bool ?<<=?( _Bool *, _Bool ), ?<<=?( volatile _Bool *, _Bool ); -char ?<<=?( char *, char ), ?<<=?( volatile char *, char ); -char signed ?<<=?( char signed *, char signed ), ?<<=?( volatile char signed *, char signed ); -char unsigned ?<<=?( char unsigned *, char unsigned ), ?<<=?( volatile char unsigned *, char unsigned ); -int short ?<<=?( int short *, int short ), ?<<=?( volatile int short *, int short ); -int short unsigned ?<<=?( int short unsigned *, int short unsigned ), ?<<=?( volatile int short unsigned *, int short unsigned ); -signed int ?<<=?( signed int *, signed int ), ?<<=?( volatile signed int *, signed int ); -unsigned int ?<<=?( unsigned *, unsigned ), ?<<=?( volatile unsigned *, unsigned ); -signed long int ?<<=?( signed long int *, signed long int ), ?<<=?( volatile signed long int *, signed long int ); -unsigned long int ?<<=?( unsigned long int *, unsigned long int ), ?<<=?( volatile unsigned long int *, unsigned long int ); -signed long long int ?<<=?( signed long long int *, signed long long int ), ?<<=?( volatile signed long long int *, signed long long int ); -unsigned long long int ?<<=?( unsigned long long int *, unsigned long long int ), ?<<=?( volatile unsigned long long int *, unsigned long long int ); - -_Bool ?>>=?( _Bool *, _Bool ), ?>>=?( volatile _Bool *, _Bool ); -char ?>>=?( char *, char ), ?>>=?( volatile char *, char ); -char signed ?>>=?( char signed *, char signed ), ?>>=?( volatile char signed *, char signed ); -char unsigned ?>>=?( char unsigned *, char unsigned ), ?>>=?( volatile char unsigned *, char unsigned ); -int short ?>>=?( int short *, int short ), ?>>=?( volatile int short *, int short ); -int short unsigned ?>>=?( int short unsigned *, int short unsigned ), ?>>=?( volatile int short unsigned *, int short unsigned ); -signed int ?>>=?( signed int *, signed int ), ?>>=?( volatile signed int *, signed int ); -unsigned int ?>>=?( unsigned *, unsigned ), ?>>=?( volatile unsigned *, unsigned ); -signed long int ?>>=?( signed long int *, signed long int ), ?>>=?( volatile signed long int *, signed long int ); -unsigned long int ?>>=?( unsigned long int *, unsigned long int ), ?>>=?( volatile unsigned long int *, unsigned long int ); -signed long long int ?>>=?( signed long long int *, signed long long int ), ?>>=?( volatile signed long long int *, signed long long int ); -unsigned long long int ?>>=?( unsigned long long int *, unsigned long long int ), ?>>=?( volatile unsigned long long int *, unsigned long long int ); - -_Bool ?&=?( _Bool *, _Bool ), ?&=?( volatile _Bool *, _Bool ); -char ?&=?( char *, char ), ?&=?( volatile char *, char ); -char signed ?&=?( char signed *, char signed ), ?&=?( volatile char signed *, char signed ); -char unsigned ?&=?( char unsigned *, char unsigned ), ?&=?( volatile char unsigned *, char unsigned ); -int short ?&=?( int short *, int short ), ?&=?( volatile int short *, int short ); -int short unsigned ?&=?( int short unsigned *, int short unsigned ), ?&=?( volatile int short unsigned *, int short unsigned ); -signed int ?&=?( signed int *, signed int ), ?&=?( volatile signed int *, signed int ); -unsigned int ?&=?( unsigned *, unsigned ), ?&=?( volatile unsigned *, unsigned ); -signed long int ?&=?( signed long int *, signed long int ), ?&=?( volatile signed long int *, signed long int ); -unsigned long int ?&=?( unsigned long int *, unsigned long int ), ?&=?( volatile unsigned long int *, unsigned long int ); -signed long long int ?&=?( signed long long int *, signed long long int ), ?&=?( volatile signed long long int *, signed long long int ); -unsigned long long int ?&=?( unsigned long long int *, unsigned long long int ), ?&=?( volatile unsigned long long int *, unsigned long long int ); - -_Bool ?|=?( _Bool *, _Bool ), ?|=?( volatile _Bool *, _Bool ); -char ?|=?( char *, char ), ?|=?( volatile char *, char ); -char signed ?|=?( char signed *, char signed ), ?|=?( volatile char signed *, char signed ); -char unsigned ?|=?( char unsigned *, char unsigned ), ?|=?( volatile char unsigned *, char unsigned ); -int short ?|=?( int short *, int short ), ?|=?( volatile int short *, int short ); -int short unsigned ?|=?( int short unsigned *, int short unsigned ), ?|=?( volatile int short unsigned *, int short unsigned ); -signed int ?|=?( signed int *, signed int ), ?|=?( volatile signed int *, signed int ); -unsigned int ?|=?( unsigned *, unsigned ), ?|=?( volatile unsigned *, unsigned ); -signed long int ?|=?( signed long int *, signed long int ), ?|=?( volatile signed long int *, signed long int ); -unsigned long int ?|=?( unsigned long int *, unsigned long int ), ?|=?( volatile unsigned long int *, unsigned long int ); -signed long long int ?|=?( signed long long int *, signed long long int ), ?|=?( volatile signed long long int *, signed long long int ); -unsigned long long int ?|=?( unsigned long long int *, unsigned long long int ), ?|=?( volatile unsigned long long int *, unsigned long long int ); - -_Bool ?^=?( _Bool *, _Bool ), ?^=?( volatile _Bool *, _Bool ); -char ?^=?( char *, char ), ?^=?( volatile char *, char ); -char signed ?^=?( char signed *, char signed ), ?^=?( volatile char signed *, char signed ); -char unsigned ?^=?( char unsigned *, char unsigned ), ?^=?( volatile char unsigned *, char unsigned ); -int short ?^=?( int short *, int short ), ?^=?( volatile int short *, int short ); -int short unsigned ?^=?( int short unsigned *, int short unsigned ), ?^=?( volatile int short unsigned *, int short unsigned ); -signed int ?^=?( signed int *, signed int ), ?^=?( volatile signed int *, signed int ); -unsigned int ?^=?( unsigned *, unsigned ), ?^=?( volatile unsigned *, unsigned ); -signed long int ?^=?( signed long int *, signed long int ), ?^=?( volatile signed long int *, signed long int ); -unsigned long int ?^=?( unsigned long int *, unsigned long int ), ?^=?( volatile unsigned long int *, unsigned long int ); -signed long long int ?^=?( signed long long int *, signed long long int ), ?^=?( volatile signed long long int *, signed long long int ); -unsigned long long int ?^=?( unsigned long long int *, unsigned long long int ), ?^=?( volatile unsigned long long int *, unsigned long long int ); - -float ?=?( float *, float ), ?=?( volatile float *, float ), - ?*=?( float *, float ), ?*=?( volatile float *, float ), - ?/=?( float *, float ), ?/=?( volatile float *, float ), - ?+=?( float *, float ), ?+=?( volatile float *, float ), - ?-=?( float *, float ), ?-=?( volatile float *, float ); - -double ?=?( double *, double ), ?=?( volatile double *, double ), - ?*=?( double *, double ), ?*=?( volatile double *, double ), - ?/=?( double *, double ), ?/=?( volatile double *, double ), - ?+=?( double *, double ), ?+=?( volatile double *, double ), - ?-=?( double *, double ), ?-=?( volatile double *, double ); - -long double ?=?( long double *, long double ), ?=?( volatile long double *, long double ), - ?*=?( long double *, long double ), ?*=?( volatile long double *, long double ), - ?/=?( long double *, long double ), ?/=?( volatile long double *, long double ), - ?+=?( long double *, long double ), ?+=?( volatile long double *, long double ), - ?-=?( long double *, long double ), ?-=?( volatile long double *, long double ); - -float _Complex ?=?( float _Complex *, float _Complex ), ?=?( volatile float _Complex *, float _Complex ), - ?*=?( float _Complex *, float _Complex ), ?*=?( volatile float _Complex *, float _Complex ), - ?/=?( float _Complex *, float _Complex ), ?/=?( volatile float _Complex *, float _Complex ), - ?+=?( float _Complex *, float _Complex ), ?+=?( volatile float _Complex *, float _Complex ), - ?-=?( float _Complex *, float _Complex ), ?-=?( volatile float _Complex *, float _Complex ); - -double _Complex ?=?( double _Complex *, double _Complex ), ?=?( volatile double _Complex *, double _Complex ), - ?*=?( double _Complex *, double _Complex ), ?*=?( volatile double _Complex *, double _Complex ), - ?/=?( double _Complex *, double _Complex ), ?/=?( volatile double _Complex *, double _Complex ), - ?+=?( double _Complex *, double _Complex ), ?+=?( volatile double _Complex *, double _Complex ), - ?-=?( double _Complex *, double _Complex ), ?-=?( volatile double _Complex *, double _Complex ); - -long double _Complex ?=?( long double _Complex *, long double _Complex ), ?=?( volatile long double _Complex *, long double _Complex ), - ?*=?( long double _Complex *, long double _Complex ), ?*=?( volatile long double _Complex *, long double _Complex ), - ?/=?( long double _Complex *, long double _Complex ), ?/=?( volatile long double _Complex *, long double _Complex ), - ?+=?( long double _Complex *, long double _Complex ), ?+=?( volatile long double _Complex *, long double _Complex ), - ?-=?( long double _Complex *, long double _Complex ), ?-=?( volatile long double _Complex *, long double _Complex ); Index: bcfa/prototypes.awk =================================================================== --- libcfa/prototypes.awk (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ (revision ) @@ -1,137 +1,0 @@ -# -# Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo -# -# The contents of this file are covered under the licence agreement in the -# file "LICENCE" distributed with Cforall. -# -# prototypes.awk -- -# -# Author : Peter A. Buhr -# Created On : Sat May 16 07:57:37 2015 -# Last Modified By : Peter A. Buhr -# Last Modified On : Sat May 16 08:02:10 2015 -# Update Count : 3 -# - -# http://llvm.org/svn/llvm-project/cfe/trunk/include/clang/Basic/Builtins.def - -BEGIN { - FS = "(" - # order so string search is longest string - types[0] = "UINTMAX"; vtypes[0] = "unsigned long int" - types[1] = "UINT16"; vtypes[1] = "short int" - types[2] = "UINT32"; vtypes[2] = "int" - types[3] = "UINT64"; vtypes[3] = "long long int" - types[4] = "UINT"; vtypes[4] = "unsigned int" - types[5] = "INTMAX"; vtypes[5] = "long int" - types[6] = "INTPTR"; vtypes[6] = "int *" - types[7] = "WINT"; vtypes[7] = "unsigned int" - types[8] = "INT"; vtypes[8] = "int" - types[9] = "ULONGLONG"; vtypes[9] = "unsigned long long" - types[10] = "ULONG"; vtypes[10] = "unsigned long" - types[11] = "UNSIGNED"; vtypes[11] = "unsigned" - types[12] = "COMPLEX_LONGDOUBLE"; vtypes[12] = "_Complex long double" - types[13] = "COMPLEX_DOUBLE"; vtypes[13] = "_Complex double" - types[14] = "COMPLEX_FLOAT"; vtypes[14] = "_Complex float" - types[15] = "LONGDOUBLEPTR"; vtypes[15] = "long double *" - types[16] = "LONGDOUBLE"; vtypes[16] = "long double" - types[17] = "LONGLONG"; vtypes[17] = "long long" - types[18] = "LONG"; vtypes[18] = "long" - types[19] = "DFLOAT32"; vtypes[19] = "_Decimal32" - types[20] = "DFLOAT64"; vtypes[20] = "_Decimal64" - types[21] = "DFLOAT128"; vtypes[21] = "_Decimal128" - types[22] = "DOUBLEPTR"; vtypes[22] = "double *" - types[23] = "DOUBLE"; vtypes[23] = "double" - types[24] = "FLOATPTR"; vtypes[24] = "float *" - types[25] = "FLOAT"; vtypes[25] = "float" - types[26] = "CONST_PTR"; vtypes[26] = "const void *" - types[27] = "CONST_STRING"; vtypes[27] = "const char *" - types[28] = "PTR_FN_VOID_VAR_PTR_SIZE"; vtypes[28] = "" - types[29] = "PTR_CONST_STRING"; vtypes[29] = "char *const" - types[30] = "PTRMODE_PTR"; vtypes[30] = "" - types[31] = "PTRPTR"; vtypes[31] = "void **" - types[32] = "PTR"; vtypes[32] = "void *" - types[33] = "VOID"; vtypes[33] = "void" - types[34] = "STRING"; vtypes[34] = "char *" - types[35] = "FILEPTR"; vtypes[35] = "struct _IO_FILE *" - types[36] = "SIZE"; vtypes[36] = "unsigned long" - types[37] = "VAR"; vtypes[37] = "..." - types[38] = "VALIST_ARG"; vtypes[38] = "void **" - types[39] = "VALIST_REF"; vtypes[39] = "void **" - types[40] = "UNWINDWORD"; vtypes[40] = "void *" - types[41] = "WORD"; vtypes[41] = "" - types[42] = "SSIZE"; vtypes[42] = "long int" - types[43] = "PID"; vtypes[43] = "int" - N = 44 -} # BEGIN - -/^BT_/ { prototypes[$1] = $1 } - -END { - printf( "#define DEF_BUILTIN(ENUM, NAME, CLASS, TYPE, LIBTYPE, BOTH_P, FALLBACK_P, NONANSI_P, ATTRS, IMPLICIT, COND) TYPE(NAME)\n" ); - printf( "#define FUNC_SIMPLE(RETURN, NAME, ARGS...) RETURN NAME(ARGS);\n" ); - printf( "#define BT_LAST(NAME) FUNC_SIMPLE(void, NAME)\n\n" ); - - # generate C types for macros names - for ( i = 0; i < N; i += 1 ) { - printf( "#define BT_%s %s\n", types[i], vtypes[i] ) - } # for - printf( "\n" ) - - for ( prototype in prototypes ) { - if ( index( "BT_LAST", prototype ) == 1 ) { - continue - } # if - - printf( "#define %s(NAME) FUNC_SIMPLE(", prototype ) - - if ( sub( "BT_FN_", "", prototype ) == 0 ) { - printf( "\n********** BAD MACRO NAME \"%s\" **********\n", prototype ) - exit 0 - } # if - - # generate function return type as macro - for ( t = 0; t < N; t += 1 ) { # find longest match - type = types[t]; - if ( index( prototype, type ) == 1 ) { # found match - printf( "BT_%s, NAME", type ) - sub( type, "", prototype ) - break; - } # if - } # for - - # generate function parameter types as macro - if ( index( prototype, "VAR" ) != 2 ) { # C-style empty parameters ? - for ( p = 0; length( prototype ) > 0; p += 1 ) { # until all parameters types are removed - sub( "_", "", prototype) # remove "_" - printf( ", ", type ) - temp = prototype - for ( t = 0; t < N; t += 1 ) { # find longest match - type = types[t]; - if ( index( prototype, type ) == 1 ) { # found match - printf( "BT_%s", type ) - sub( type, "", prototype ) - break; - } # if - } # for - if ( temp == prototype ) { # no match found for parameter in macro table - printf( "\n********** MISSING TYPE \"%s\" **********\n", prototype ) - exit 0 - } # if - } # for - } # if - printf( ")\n" ) - } # for - - # extras - printf( "\n#include \"builtins.def\"\n\n" ); - printf( "typedef void ** __builtin_va_list;\n" ); - printf( "extern const char *__PRETTY_FUNCTION__;\n" ); - printf( "typedef int wchar_t;\n" ); -} # END - -# Local Variables: # -# tab-width: 4 # -# mode: awk # -# compile-command: "make install" # -# End: # Index: bcfa/prototypes.c =================================================================== --- libcfa/prototypes.c (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ (revision ) @@ -1,2 +1,0 @@ -#define DEF_BUILTIN(ENUM, NAME, CLASS, TYPE, LIBTYPE, BOTH_P, FALLBACK_P, NONANSI_P, ATTRS, IMPLICIT, COND) TYPE(NAME) -#include "builtins.def" Index: bcfa/ptrdiff_t.c =================================================================== --- libcfa/ptrdiff_t.c (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ (revision ) @@ -1,1 +1,0 @@ -#include Index: ssing =================================================================== --- missing (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ (revision ) @@ -1,336 +1,0 @@ -#! /bin/sh -# Common stub for a few missing GNU programs while installing. -# Copyright (C) 1996, 1997, 1999, 2000, 2002 Free Software Foundation, Inc. -# Originally by Fran,cois Pinard , 1996. - -# 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, Inc., 59 Temple Place - Suite 330, Boston, MA -# 02111-1307, USA. - -# As a special exception to the GNU General Public License, if you -# distribute this file as part of a program that contains a -# configuration script generated by Autoconf, you may include it under -# the same distribution terms that you use for the rest of that program. - -if test $# -eq 0; then - echo 1>&2 "Try \`$0 --help' for more information" - exit 1 -fi - -run=: - -# In the cases where this matters, `missing' is being run in the -# srcdir already. -if test -f configure.ac; then - configure_ac=configure.ac -else - configure_ac=configure.in -fi - -case "$1" in ---run) - # Try to run requested program, and just exit if it succeeds. - run= - shift - "$@" && exit 0 - ;; -esac - -# If it does not exist, or fails to run (possibly an outdated version), -# try to emulate it. -case "$1" in - - -h|--h|--he|--hel|--help) - echo "\ -$0 [OPTION]... PROGRAM [ARGUMENT]... - -Handle \`PROGRAM [ARGUMENT]...' for when PROGRAM is missing, or return an -error status if there is no known handling for PROGRAM. - -Options: - -h, --help display this help and exit - -v, --version output version information and exit - --run try to run the given command, and emulate it if it fails - -Supported PROGRAM values: - aclocal touch file \`aclocal.m4' - autoconf touch file \`configure' - autoheader touch file \`config.h.in' - automake touch all \`Makefile.in' files - bison create \`y.tab.[ch]', if possible, from existing .[ch] - flex create \`lex.yy.c', if possible, from existing .c - help2man touch the output file - lex create \`lex.yy.c', if possible, from existing .c - makeinfo touch the output file - tar try tar, gnutar, gtar, then tar without non-portable flags - yacc create \`y.tab.[ch]', if possible, from existing .[ch]" - ;; - - -v|--v|--ve|--ver|--vers|--versi|--versio|--version) - echo "missing 0.4 - GNU automake" - ;; - - -*) - echo 1>&2 "$0: Unknown \`$1' option" - echo 1>&2 "Try \`$0 --help' for more information" - exit 1 - ;; - - aclocal*) - if test -z "$run" && ($1 --version) > /dev/null 2>&1; then - # We have it, but it failed. - exit 1 - fi - - echo 1>&2 "\ -WARNING: \`$1' is missing on your system. You should only need it if - you modified \`acinclude.m4' or \`${configure_ac}'. You might want - to install the \`Automake' and \`Perl' packages. Grab them from - any GNU archive site." - touch aclocal.m4 - ;; - - autoconf) - if test -z "$run" && ($1 --version) > /dev/null 2>&1; then - # We have it, but it failed. - exit 1 - fi - - echo 1>&2 "\ -WARNING: \`$1' is missing on your system. You should only need it if - you modified \`${configure_ac}'. You might want to install the - \`Autoconf' and \`GNU m4' packages. Grab them from any GNU - archive site." - touch configure - ;; - - autoheader) - if test -z "$run" && ($1 --version) > /dev/null 2>&1; then - # We have it, but it failed. - exit 1 - fi - - echo 1>&2 "\ -WARNING: \`$1' is missing on your system. You should only need it if - you modified \`acconfig.h' or \`${configure_ac}'. You might want - to install the \`Autoconf' and \`GNU m4' packages. Grab them - from any GNU archive site." - files=`sed -n 's/^[ ]*A[CM]_CONFIG_HEADER(\([^)]*\)).*/\1/p' ${configure_ac}` - test -z "$files" && files="config.h" - touch_files= - for f in $files; do - case "$f" in - *:*) touch_files="$touch_files "`echo "$f" | - sed -e 's/^[^:]*://' -e 's/:.*//'`;; - *) touch_files="$touch_files $f.in";; - esac - done - touch $touch_files - ;; - - automake*) - if test -z "$run" && ($1 --version) > /dev/null 2>&1; then - # We have it, but it failed. - exit 1 - fi - - echo 1>&2 "\ -WARNING: \`$1' is missing on your system. You should only need it if - you modified \`Makefile.am', \`acinclude.m4' or \`${configure_ac}'. - You might want to install the \`Automake' and \`Perl' packages. - Grab them from any GNU archive site." - find . -type f -name Makefile.am -print | - sed 's/\.am$/.in/' | - while read f; do touch "$f"; done - ;; - - autom4te) - if test -z "$run" && ($1 --version) > /dev/null 2>&1; then - # We have it, but it failed. - exit 1 - fi - - echo 1>&2 "\ -WARNING: \`$1' is needed, and you do not seem to have it handy on your - system. You might have modified some files without having the - proper tools for further handling them. - You can get \`$1Help2man' as part of \`Autoconf' from any GNU - archive site." - - file=`echo "$*" | sed -n 's/.*--output[ =]*\([^ ]*\).*/\1/p'` - test -z "$file" && file=`echo "$*" | sed -n 's/.*-o[ ]*\([^ ]*\).*/\1/p'` - if test -f "$file"; then - touch $file - else - test -z "$file" || exec >$file - echo "#! /bin/sh" - echo "# Created by GNU Automake missing as a replacement of" - echo "# $ $@" - echo "exit 0" - chmod +x $file - exit 1 - fi - ;; - - bison|yacc) - echo 1>&2 "\ -WARNING: \`$1' is missing on your system. You should only need it if - you modified a \`.y' file. You may need the \`Bison' package - in order for those modifications to take effect. You can get - \`Bison' from any GNU archive site." - rm -f y.tab.c y.tab.h - if [ $# -ne 1 ]; then - eval LASTARG="\${$#}" - case "$LASTARG" in - *.y) - SRCFILE=`echo "$LASTARG" | sed 's/y$/c/'` - if [ -f "$SRCFILE" ]; then - cp "$SRCFILE" y.tab.c - fi - SRCFILE=`echo "$LASTARG" | sed 's/y$/h/'` - if [ -f "$SRCFILE" ]; then - cp "$SRCFILE" y.tab.h - fi - ;; - esac - fi - if [ ! -f y.tab.h ]; then - echo >y.tab.h - fi - if [ ! -f y.tab.c ]; then - echo 'main() { return 0; }' >y.tab.c - fi - ;; - - lex|flex) - echo 1>&2 "\ -WARNING: \`$1' is missing on your system. You should only need it if - you modified a \`.l' file. You may need the \`Flex' package - in order for those modifications to take effect. You can get - \`Flex' from any GNU archive site." - rm -f lex.yy.c - if [ $# -ne 1 ]; then - eval LASTARG="\${$#}" - case "$LASTARG" in - *.l) - SRCFILE=`echo "$LASTARG" | sed 's/l$/c/'` - if [ -f "$SRCFILE" ]; then - cp "$SRCFILE" lex.yy.c - fi - ;; - esac - fi - if [ ! -f lex.yy.c ]; then - echo 'main() { return 0; }' >lex.yy.c - fi - ;; - - help2man) - if test -z "$run" && ($1 --version) > /dev/null 2>&1; then - # We have it, but it failed. - exit 1 - fi - - echo 1>&2 "\ -WARNING: \`$1' is missing on your system. You should only need it if - you modified a dependency of a manual page. You may need the - \`Help2man' package in order for those modifications to take - effect. You can get \`Help2man' from any GNU archive site." - - file=`echo "$*" | sed -n 's/.*-o \([^ ]*\).*/\1/p'` - if test -z "$file"; then - file=`echo "$*" | sed -n 's/.*--output=\([^ ]*\).*/\1/p'` - fi - if [ -f "$file" ]; then - touch $file - else - test -z "$file" || exec >$file - echo ".ab help2man is required to generate this page" - exit 1 - fi - ;; - - makeinfo) - if test -z "$run" && (makeinfo --version) > /dev/null 2>&1; then - # We have makeinfo, but it failed. - exit 1 - fi - - echo 1>&2 "\ -WARNING: \`$1' is missing on your system. You should only need it if - you modified a \`.texi' or \`.texinfo' file, or any other file - indirectly affecting the aspect of the manual. The spurious - call might also be the consequence of using a buggy \`make' (AIX, - DU, IRIX). You might want to install the \`Texinfo' package or - the \`GNU make' package. Grab either from any GNU archive site." - file=`echo "$*" | sed -n 's/.*-o \([^ ]*\).*/\1/p'` - if test -z "$file"; then - file=`echo "$*" | sed 's/.* \([^ ]*\) *$/\1/'` - file=`sed -n '/^@setfilename/ { s/.* \([^ ]*\) *$/\1/; p; q; }' $file` - fi - touch $file - ;; - - tar) - shift - if test -n "$run"; then - echo 1>&2 "ERROR: \`tar' requires --run" - exit 1 - fi - - # We have already tried tar in the generic part. - # Look for gnutar/gtar before invocation to avoid ugly error - # messages. - if (gnutar --version > /dev/null 2>&1); then - gnutar "$@" && exit 0 - fi - if (gtar --version > /dev/null 2>&1); then - gtar "$@" && exit 0 - fi - firstarg="$1" - if shift; then - case "$firstarg" in - *o*) - firstarg=`echo "$firstarg" | sed s/o//` - tar "$firstarg" "$@" && exit 0 - ;; - esac - case "$firstarg" in - *h*) - firstarg=`echo "$firstarg" | sed s/h//` - tar "$firstarg" "$@" && exit 0 - ;; - esac - fi - - echo 1>&2 "\ -WARNING: I can't seem to be able to run \`tar' with the given arguments. - You may want to install GNU tar or Free paxutils, or check the - command line arguments." - exit 1 - ;; - - *) - echo 1>&2 "\ -WARNING: \`$1' is needed, and you do not seem to have it handy on your - system. You might have modified some files without having the - proper tools for further handling them. Check the \`README' file, - it often tells you about the needed prerequirements for installing - this package. You may also peek at any GNU archive site, in case - some other package would contain this missing \`$1' program." - exit 1 - ;; -esac - -exit 0 Index: installdirs =================================================================== --- mkinstalldirs (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ (revision ) @@ -1,99 +1,0 @@ -#! /bin/sh -# mkinstalldirs --- make directory hierarchy -# Author: Noah Friedman -# Created: 1993-05-16 -# Public domain - -errstatus=0 -dirmode="" - -usage="\ -Usage: mkinstalldirs [-h] [--help] [-m mode] dir ..." - -# process command line arguments -while test $# -gt 0 ; do - case "${1}" in - -h | --help | --h* ) # -h for help - echo "${usage}" 1>&2; exit 0 ;; - -m ) # -m PERM arg - shift - test $# -eq 0 && { echo "${usage}" 1>&2; exit 1; } - dirmode="${1}" - shift ;; - -- ) shift; break ;; # stop option processing - -* ) echo "${usage}" 1>&2; exit 1 ;; # unknown option - * ) break ;; # first non-opt arg - esac -done - -for file -do - if test -d "$file"; then - shift - else - break - fi -done - -case $# in -0) exit 0 ;; -esac - -case $dirmode in -'') - if mkdir -p -- . 2>/dev/null; then - echo "mkdir -p -- $*" - exec mkdir -p -- "$@" - fi ;; -*) - if mkdir -m "$dirmode" -p -- . 2>/dev/null; then - echo "mkdir -m $dirmode -p -- $*" - exec mkdir -m "$dirmode" -p -- "$@" - fi ;; -esac - -for file -do - set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'` - shift - - pathcomp= - for d - do - pathcomp="$pathcomp$d" - case "$pathcomp" in - -* ) pathcomp=./$pathcomp ;; - esac - - if test ! -d "$pathcomp"; then - echo "mkdir $pathcomp" - - mkdir "$pathcomp" || lasterr=$? - - if test ! -d "$pathcomp"; then - errstatus=$lasterr - else - if test ! -z "$dirmode"; then - echo "chmod $dirmode $pathcomp" - - lasterr="" - chmod "$dirmode" "$pathcomp" || lasterr=$? - - if test ! -z "$lasterr"; then - errstatus=$lasterr - fi - fi - fi - fi - - pathcomp="$pathcomp/" - done -done - -exit $errstatus - -# Local Variables: -# mode: shell-script -# sh-indentation: 3 -# End: -# mkinstalldirs ends here Index: src/ArgTweak/module.mk =================================================================== --- src/ArgTweak/module.mk (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/ArgTweak/module.mk (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -1,4 +1,18 @@ -SRC += ArgTweak/Rewriter.cc \ -# ArgTweak/Mutate.cc \ - $(NULL) +######################### -*- Mode: Makefile-Gmake -*- ######################## +## +## Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo +## +## The contents of this file are covered under the licence agreement in the +## file "LICENCE" distributed with Cforall. +## +## module.mk -- +## +## Author : Richard C. Bilson +## Created On : Mon Jun 1 17:49:17 2015 +## Last Modified By : Peter A. Buhr +## Last Modified On : Mon Jun 1 17:50:11 2015 +## Update Count : 1 +############################################################################### +#SRC += ArgTweak/Rewriter.cc \ +# ArgTweak/Mutate.cc Index: src/CodeGen/CodeGenerator.cc =================================================================== --- src/CodeGen/CodeGenerator.cc (revision 937e51d79693364ccc3aec416b5db0894464e624) +++ src/CodeGen/CodeGenerator.cc (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -0,0 +1,669 @@ +// +// Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo +// +// The contents of this file are covered under the licence agreement in the +// file "LICENCE" distributed with Cforall. +// +// CodeGenerator.cc -- +// +// Author : Richard C. Bilson +// Created On : Mon May 18 07:44:20 2015 +// Last Modified By : Rob Schluntz +// Last Modified On : Wed Jun 24 16:11:41 2015 +// Update Count : 143 +// + +#include +#include +#include +#include + +#include "Parser/ParseNode.h" + +#include "SynTree/Type.h" +#include "SynTree/Expression.h" +#include "SynTree/Initializer.h" +#include "SynTree/Statement.h" + +#include "utility.h" +#include "UnimplementedError.h" + +#include "CodeGenerator.h" +#include "OperatorTable.h" +#include "GenType.h" + +using namespace std; + +namespace CodeGen { + int CodeGenerator::tabsize = 4; + + // the kinds of statements that would ideally be separated by more whitespace + bool wantSpacing( Statement * stmt) { + return dynamic_cast< IfStmt * >( stmt ) || dynamic_cast< CompoundStmt * >( stmt ) || + dynamic_cast< WhileStmt * >( stmt ) || dynamic_cast< ForStmt * > ( stmt ) || dynamic_cast< SwitchStmt *>( stmt ); + } + + ostream & CodeGenerator::Indenter::operator()( ostream & output ) { + return output << string( cg.cur_indent, ' ' ); + } + + ostream & operator<<( ostream & output, CodeGenerator::Indenter &indent ) { + return indent( output ); + } + + CodeGenerator::CodeGenerator( std::ostream &os ) : indent(*this), cur_indent( 0 ), insideFunction( false ), output( os ) { } + + CodeGenerator::CodeGenerator( std::ostream &os, std::string init, int indentation, bool infunp ) + : indent(*this), cur_indent( indentation ), insideFunction( infunp ), output( os ) { + //output << std::string( init ); + } + + CodeGenerator::CodeGenerator( std::ostream &os, char *init, int indentation, bool infunp ) + : indent(*this), cur_indent( indentation ), insideFunction( infunp ), output( os ) { + //output << std::string( init ); + } + + string mangleName( DeclarationWithType *decl ) { + if ( decl->get_mangleName() != "" ) { + return decl->get_mangleName(); + } else { + return decl->get_name(); + } // if + } + + //*** Declarations + void CodeGenerator::visit( FunctionDecl *functionDecl ) { + handleStorageClass( functionDecl ); + if ( functionDecl->get_isInline() ) { + output << "inline "; + } // if + if ( functionDecl->get_isNoreturn() ) { + output << "_Noreturn "; + } // if + output << genType( functionDecl->get_functionType(), mangleName( functionDecl ) ); + + // how to get this to the Functype? + std::list< Declaration * > olds = functionDecl->get_oldDecls(); + if ( ! olds.empty() ) { + output << " /* function has old declaration */"; + } // if + + // acceptAll( functionDecl->get_oldDecls(), *this ); + if ( functionDecl->get_statements() ) { + functionDecl->get_statements()->accept(*this ); + } // if + } + + void CodeGenerator::visit( ObjectDecl *objectDecl ) { + handleStorageClass( objectDecl ); + output << genType( objectDecl->get_type(), mangleName( objectDecl ) ); + + if ( objectDecl->get_init() ) { + output << " = "; + objectDecl->get_init()->accept( *this ); + } // if + if ( objectDecl->get_bitfieldWidth() ) { + output << ":"; + objectDecl->get_bitfieldWidth()->accept( *this ); + } // if + } + + void CodeGenerator::handleAggregate( AggregateDecl *aggDecl ) { + if ( aggDecl->get_name() != "" ) + output << aggDecl->get_name(); + + std::list< Declaration * > &memb = aggDecl->get_members(); + + if ( ! memb.empty() ) { + output << " {" << endl; + + cur_indent += CodeGenerator::tabsize; + for ( std::list< Declaration* >::iterator i = memb.begin(); i != memb.end(); i++) { + output << indent; + (*i)->accept(*this ); + output << ";" << endl; + } + + cur_indent -= CodeGenerator::tabsize; + + output << indent << "}"; + } // if + } + + void CodeGenerator::visit( StructDecl *structDecl ) { + output << "struct "; + handleAggregate( structDecl ); + } + + void CodeGenerator::visit( UnionDecl *aggregateDecl ) { + output << "union "; + handleAggregate( aggregateDecl ); + } + + void CodeGenerator::visit( EnumDecl *aggDecl ) { + output << "enum "; + + if ( aggDecl->get_name() != "" ) + output << aggDecl->get_name(); + + std::list< Declaration* > &memb = aggDecl->get_members(); + + if ( ! memb.empty() ) { + output << " {" << endl; + + cur_indent += CodeGenerator::tabsize; + for ( std::list< Declaration* >::iterator i = memb.begin(); i != memb.end(); i++) { + ObjectDecl *obj = dynamic_cast< ObjectDecl* >( *i ); + assert( obj ); + output << indent << mangleName( obj ); + if ( obj->get_init() ) { + output << " = "; + obj->get_init()->accept(*this ); + } // if + output << "," << endl; + } // for + + cur_indent -= CodeGenerator::tabsize; + + output << indent << "}"; + } // if + } + + void CodeGenerator::visit( ContextDecl *aggregateDecl ) {} + + void CodeGenerator::visit( TypedefDecl *typeDecl ) { + output << "typedef "; + output << genType( typeDecl->get_base(), typeDecl->get_name() ); + } + + void CodeGenerator::visit( TypeDecl *typeDecl ) { + // really, we should mutate this into something that isn't a TypeDecl but that requires large-scale changes, + // still to be done + output << "extern unsigned long " << typeDecl->get_name(); + if ( typeDecl->get_base() ) { + output << " = sizeof( " << genType( typeDecl->get_base(), "" ) << " )"; + } // if + } + + void CodeGenerator::visit( SingleInit *init ) { + init->get_value()->accept( *this ); + } + + void CodeGenerator::visit( ListInit *init ) { + output << "{ "; + genCommaList( init->begin_initializers(), init->end_initializers() ); + output << " }"; + } + + void CodeGenerator::visit( Constant *constant ) { + output << constant->get_value() ; + } + + //*** Expressions + void CodeGenerator::visit( ApplicationExpr *applicationExpr ) { + if ( VariableExpr *varExpr = dynamic_cast< VariableExpr* >( applicationExpr->get_function() ) ) { + OperatorInfo opInfo; + if ( varExpr->get_var()->get_linkage() == LinkageSpec::Intrinsic && operatorLookup( varExpr->get_var()->get_name(), opInfo ) ) { + std::list< Expression* >::iterator arg = applicationExpr->get_args().begin(); + switch ( opInfo.type ) { + case OT_PREFIXASSIGN: + case OT_POSTFIXASSIGN: + case OT_INFIXASSIGN: + { + assert( arg != applicationExpr->get_args().end() ); + if ( AddressExpr *addrExpr = dynamic_cast< AddressExpr * >( *arg ) ) { + + *arg = addrExpr->get_arg(); + } else { + UntypedExpr *newExpr = new UntypedExpr( new NameExpr( "*?" ) ); + newExpr->get_args().push_back( *arg ); + *arg = newExpr; + } // if + break; + } + + default: + // do nothing + ; + } + + switch ( opInfo.type ) { + case OT_INDEX: + assert( applicationExpr->get_args().size() == 2 ); + (*arg++)->accept( *this ); + output << "["; + (*arg)->accept( *this ); + output << "]"; + break; + + case OT_CALL: + // there are no intrinsic definitions of the function call operator + assert( false ); + break; + + case OT_PREFIX: + case OT_PREFIXASSIGN: + assert( applicationExpr->get_args().size() == 1 ); + output << "("; + output << opInfo.symbol; + (*arg)->accept( *this ); + output << ")"; + break; + + case OT_POSTFIX: + case OT_POSTFIXASSIGN: + assert( applicationExpr->get_args().size() == 1 ); + (*arg)->accept( *this ); + output << opInfo.symbol; + break; + + case OT_INFIX: + case OT_INFIXASSIGN: + assert( applicationExpr->get_args().size() == 2 ); + output << "("; + (*arg++)->accept( *this ); + output << opInfo.symbol; + (*arg)->accept( *this ); + output << ")"; + break; + + case OT_CONSTANT: + // there are no intrinsic definitions of 0 or 1 as functions + assert( false ); + } + } else { + varExpr->accept( *this ); + output << "("; + genCommaList( applicationExpr->get_args().begin(), applicationExpr->get_args().end() ); + output << ")"; + } // if + } else { + applicationExpr->get_function()->accept( *this ); + output << "("; + genCommaList( applicationExpr->get_args().begin(), applicationExpr->get_args().end() ); + output << ")"; + } // if + } + + void CodeGenerator::visit( UntypedExpr *untypedExpr ) { + if ( NameExpr *nameExpr = dynamic_cast< NameExpr* >( untypedExpr->get_function() ) ) { + OperatorInfo opInfo; + if ( operatorLookup( nameExpr->get_name(), opInfo ) ) { + std::list< Expression* >::iterator arg = untypedExpr->get_args().begin(); + switch ( opInfo.type ) { + case OT_INDEX: + assert( untypedExpr->get_args().size() == 2 ); + (*arg++)->accept( *this ); + output << "["; + (*arg)->accept( *this ); + output << "]"; + break; + + case OT_CALL: + assert( false ); + break; + + case OT_PREFIX: + case OT_PREFIXASSIGN: + case OT_LABELADDRESS: + assert( untypedExpr->get_args().size() == 1 ); + output << "("; + output << opInfo.symbol; + (*arg)->accept( *this ); + output << ")"; + break; + + case OT_POSTFIX: + case OT_POSTFIXASSIGN: + assert( untypedExpr->get_args().size() == 1 ); + (*arg)->accept( *this ); + output << opInfo.symbol; + break; + + case OT_INFIX: + case OT_INFIXASSIGN: + assert( untypedExpr->get_args().size() == 2 ); + output << "("; + (*arg++)->accept( *this ); + output << opInfo.symbol; + (*arg)->accept( *this ); + output << ")"; + break; + + case OT_CONSTANT: + // there are no intrinsic definitions of 0 or 1 as functions + assert( false ); + } + } else { + nameExpr->accept( *this ); + output << "("; + genCommaList( untypedExpr->get_args().begin(), untypedExpr->get_args().end() ); + output << ")"; + } // if + } else { + untypedExpr->get_function()->accept( *this ); + output << "("; + genCommaList( untypedExpr->get_args().begin(), untypedExpr->get_args().end() ); + output << ")"; + } // if + } + + void CodeGenerator::visit( NameExpr *nameExpr ) { + OperatorInfo opInfo; + if ( operatorLookup( nameExpr->get_name(), opInfo ) ) { + assert( opInfo.type == OT_CONSTANT ); + output << opInfo.symbol; + } else { + output << nameExpr->get_name(); + } // if + } + + void CodeGenerator::visit( AddressExpr *addressExpr ) { + output << "(&"; + // this hack makes sure that we don't convert "constant_zero" to "0" if we're taking its address + if ( VariableExpr *variableExpr = dynamic_cast< VariableExpr* >( addressExpr->get_arg() ) ) { + output << mangleName( variableExpr->get_var() ); + } else { + addressExpr->get_arg()->accept( *this ); + } // if + output << ")"; + } + + void CodeGenerator::visit( CastExpr *castExpr ) { + output << "(("; + if ( castExpr->get_results().empty() ) { + output << "void" ; + } else { + output << genType( castExpr->get_results().front(), "" ); + } // if + output << ")"; + castExpr->get_arg()->accept( *this ); + output << ")"; + } + + void CodeGenerator::visit( UntypedMemberExpr *memberExpr ) { + assert( false ); + } + + void CodeGenerator::visit( MemberExpr *memberExpr ) { + memberExpr->get_aggregate()->accept( *this ); + output << "." << mangleName( memberExpr->get_member() ); + } + + void CodeGenerator::visit( VariableExpr *variableExpr ) { + OperatorInfo opInfo; + if ( variableExpr->get_var()->get_linkage() == LinkageSpec::Intrinsic && operatorLookup( variableExpr->get_var()->get_name(), opInfo ) && opInfo.type == OT_CONSTANT ) { + output << opInfo.symbol; + } else { + output << mangleName( variableExpr->get_var() ); + } // if + } + + void CodeGenerator::visit( ConstantExpr *constantExpr ) { + assert( constantExpr->get_constant() ); + constantExpr->get_constant()->accept( *this ); + } + + void CodeGenerator::visit( SizeofExpr *sizeofExpr ) { + output << "sizeof("; + if ( sizeofExpr->get_isType() ) { + output << genType( sizeofExpr->get_type(), "" ); + } else { + sizeofExpr->get_expr()->accept( *this ); + } // if + output << ")"; + } + + void CodeGenerator::visit( LogicalExpr *logicalExpr ) { + output << "("; + logicalExpr->get_arg1()->accept( *this ); + if ( logicalExpr->get_isAnd() ) { + output << " && "; + } else { + output << " || "; + } // if + logicalExpr->get_arg2()->accept( *this ); + output << ")"; + } + + void CodeGenerator::visit( ConditionalExpr *conditionalExpr ) { + output << "("; + conditionalExpr->get_arg1()->accept( *this ); + output << " ? "; + conditionalExpr->get_arg2()->accept( *this ); + output << " : "; + conditionalExpr->get_arg3()->accept( *this ); + output << ")"; + } + + void CodeGenerator::visit( CommaExpr *commaExpr ) { + output << "("; + commaExpr->get_arg1()->accept( *this ); + output << " , "; + commaExpr->get_arg2()->accept( *this ); + output << ")"; + } + + void CodeGenerator::visit( TupleExpr *tupleExpr ) {} + + void CodeGenerator::visit( TypeExpr *typeExpr ) {} + + //*** Statements + void CodeGenerator::visit( CompoundStmt *compoundStmt ) { + std::list ks = compoundStmt->get_kids(); + output << "{" << endl; + + cur_indent += CodeGenerator::tabsize; + + for ( std::list::iterator i = ks.begin(); i != ks.end(); i++) { + output << indent << printLabels( (*i)->get_labels() ); + (*i)->accept(*this ); + + output << endl; + if ( wantSpacing( *i ) ) { + output << endl; + } + } + cur_indent -= CodeGenerator::tabsize; + + output << indent << "}"; + } + + void CodeGenerator::visit( ExprStmt *exprStmt ) { + // I don't see why this check is necessary. + // If this starts to cause problems then put it back in, + // with an explanation + assert( exprStmt ); + + // if ( exprStmt != 0 ) { + exprStmt->get_expr()->accept( *this ); + output << ";" ; + // } // if + } + + void CodeGenerator::visit( IfStmt *ifStmt ) { + output << "if ("; + ifStmt->get_condition()->accept(*this ); + output << ") "; + + ifStmt->get_thenPart()->accept(*this ); + + if ( ifStmt->get_elsePart() != 0) { + output << " else "; + ifStmt->get_elsePart()->accept(*this ); + } // if + } + + void CodeGenerator::visit( SwitchStmt *switchStmt ) { + output << "switch (" ; + switchStmt->get_condition()->accept(*this ); + output << ") "; + + output << "{" << std::endl; + cur_indent += CodeGenerator::tabsize; + + acceptAll( switchStmt->get_branches(), *this ); + + cur_indent -= CodeGenerator::tabsize; + + output << indent << "}"; + } + + void CodeGenerator::visit( CaseStmt *caseStmt ) { + output << indent; + if ( caseStmt->isDefault()) { + output << "default"; + } else { + output << "case "; + caseStmt->get_condition()->accept(*this ); + } // if + output << ":\n"; + + std::list sts = caseStmt->get_statements(); + + cur_indent += CodeGenerator::tabsize; + for ( std::list::iterator i = sts.begin(); i != sts.end(); i++) { + output << indent << printLabels( (*i)->get_labels() ) ; + (*i)->accept(*this ); + output << endl; + } + cur_indent -= CodeGenerator::tabsize; + } + + void CodeGenerator::visit( BranchStmt *branchStmt ) { + switch ( branchStmt->get_type()) { + case BranchStmt::Goto: + if ( ! branchStmt->get_target().empty() ) + output << "goto " << branchStmt->get_target(); + else { + if ( branchStmt->get_computedTarget() != 0 ) { + output << "goto *"; + branchStmt->get_computedTarget()->accept( *this ); + } // if + } // if + break; + case BranchStmt::Break: + output << "break"; + break; + case BranchStmt::Continue: + output << "continue"; + break; + } + output << ";"; + } + + + void CodeGenerator::visit( ReturnStmt *returnStmt ) { + output << "return "; + + // xxx -- check for null expression; + if ( returnStmt->get_expr() ) { + returnStmt->get_expr()->accept( *this ); + } // if + output << ";"; + } + + void CodeGenerator::visit( WhileStmt *whileStmt ) { + if ( whileStmt->get_isDoWhile() ) + output << "do" ; + else { + output << "while (" ; + whileStmt->get_condition()->accept(*this ); + output << ")"; + } // if + output << " "; + + output << CodeGenerator::printLabels( whileStmt->get_body()->get_labels() ); + whileStmt->get_body()->accept( *this ); + + output << indent; + + if ( whileStmt->get_isDoWhile() ) { + output << " while (" ; + whileStmt->get_condition()->accept(*this ); + output << ");"; + } // if + } + + void CodeGenerator::visit( ForStmt *forStmt ) { + output << "for ("; + + if ( forStmt->get_initialization() != 0 ) + forStmt->get_initialization()->accept( *this ); + else + output << ";"; + + if ( forStmt->get_condition() != 0 ) + forStmt->get_condition()->accept( *this ); + output << ";"; + + if ( forStmt->get_increment() != 0 ) + forStmt->get_increment()->accept( *this ); + output << ") "; + + if ( forStmt->get_body() != 0 ) { + output << CodeGenerator::printLabels( forStmt->get_body()->get_labels() ); + forStmt->get_body()->accept( *this ); + } // if + } + + void CodeGenerator::visit( NullStmt *nullStmt ) { + //output << indent << CodeGenerator::printLabels( nullStmt->get_labels() ); + output << "/* null statement */ ;"; + } + + void CodeGenerator::visit( DeclStmt *declStmt ) { + declStmt->get_decl()->accept( *this ); + + if ( doSemicolon( declStmt->get_decl() ) ) { + output << ";"; + } // if + } + + std::string CodeGenerator::printLabels( std::list< Label > &l ) { + std::string str( "" ); + l.unique(); // assumes a sorted list. Why not use set? + + for ( std::list< Label >::iterator i = l.begin(); i != l.end(); i++ ) + str += *i + ": "; + + return str; + } + + void CodeGenerator::handleStorageClass( Declaration *decl ) { + switch ( decl->get_storageClass() ) { + case DeclarationNode::Extern: + output << "extern "; + break; + case DeclarationNode::Static: + output << "static "; + break; + case DeclarationNode::Auto: + // silently drop storage class + break; + case DeclarationNode::Register: + output << "register "; + break; + case DeclarationNode::Inline: + output << "inline "; + break; + case DeclarationNode::Fortran: + output << "fortran "; + break; + case DeclarationNode::Noreturn: + output << "_Noreturn "; + break; + case DeclarationNode::Threadlocal: + output << "_Thread_local "; + break; + case DeclarationNode::NoStorageClass: + break; + } // switch + } +} // namespace CodeGen + +// Local Variables: // +// tab-width: 4 // +// mode: c++ // +// compile-command: "make install" // +// End: // Index: src/CodeGen/CodeGenerator.h =================================================================== --- src/CodeGen/CodeGenerator.h (revision 937e51d79693364ccc3aec416b5db0894464e624) +++ src/CodeGen/CodeGenerator.h (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -0,0 +1,127 @@ +// +// Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo +// +// The contents of this file are covered under the licence agreement in the +// file "LICENCE" distributed with Cforall. +// +// CodeGenerator.h -- +// +// Author : Richard C. Bilson +// Created On : Mon May 18 07:44:20 2015 +// Last Modified By : Rob Schluntz +// Last Modified On : Thu Jun 11 13:24:23 2015 +// Update Count : 23 +// + +#ifndef CODEGENV_H +#define CODEGENV_H + +#include + +#include "SynTree/SynTree.h" +#include "SynTree/Visitor.h" +#include "SymTab/Indexer.h" + +namespace CodeGen { + class CodeGenerator : public Visitor { + public: + static int tabsize; + + CodeGenerator( std::ostream &os ); + CodeGenerator( std::ostream &os, std::string, int indent = 0, bool infun = false ); + CodeGenerator( std::ostream &os, char *, int indent = 0, bool infun = false ); + + //*** Declaration + virtual void visit( StructDecl * ); + virtual void visit( FunctionDecl * ); + virtual void visit( ObjectDecl * ); + virtual void visit( UnionDecl *aggregateDecl ); + virtual void visit( EnumDecl *aggregateDecl ); + virtual void visit( ContextDecl *aggregateDecl ); + virtual void visit( TypedefDecl *typeDecl ); + virtual void visit( TypeDecl *typeDecl ); + + //*** Initializer + virtual void visit( SingleInit * ); + virtual void visit( ListInit * ); + + //*** Constant + virtual void visit( Constant * ); + + //*** Expression + virtual void visit( ApplicationExpr *applicationExpr ); + virtual void visit( UntypedExpr *untypedExpr ); + virtual void visit( NameExpr *nameExpr ); + virtual void visit( AddressExpr *addressExpr ); + virtual void visit( CastExpr *castExpr ); + virtual void visit( UntypedMemberExpr *memberExpr ); + virtual void visit( MemberExpr *memberExpr ); + virtual void visit( VariableExpr *variableExpr ); + virtual void visit( ConstantExpr *constantExpr ); + virtual void visit( SizeofExpr *sizeofExpr ); + virtual void visit( LogicalExpr *logicalExpr ); + virtual void visit( ConditionalExpr *conditionalExpr ); + virtual void visit( CommaExpr *commaExpr ); + virtual void visit( TupleExpr *tupleExpr ); + virtual void visit( TypeExpr *typeExpr ); + + //*** Statements + virtual void visit( CompoundStmt * ); + virtual void visit( ExprStmt * ); + virtual void visit( IfStmt * ); + virtual void visit( SwitchStmt * ); + virtual void visit( CaseStmt * ); + virtual void visit( BranchStmt * ); + virtual void visit( ReturnStmt * ); + virtual void visit( WhileStmt * ); + virtual void visit( ForStmt * ); + virtual void visit( NullStmt * ); + virtual void visit( DeclStmt * ); + + template< class Iterator > void genCommaList( Iterator begin, Iterator end ); + + struct Indenter { + Indenter(CodeGenerator &cg) : cg(cg) {} + CodeGenerator & cg; + std::ostream& operator()(std::ostream & os); + }; + private: + + Indenter indent; + int cur_indent; + bool insideFunction; + std::ostream &output; + + static std::string printLabels ( std::list < Label > & ); + void handleStorageClass( Declaration *decl ); + void handleAggregate( AggregateDecl *aggDecl ); + void handleTypedef( NamedTypeDecl *namedType ); + + }; + + template< class Iterator > + void CodeGenerator::genCommaList( Iterator begin, Iterator end ) { + if ( begin == end ) return; + + for ( ;; ) { + (*begin++)->accept( *this ); + if ( begin == end ) return; + output << ", "; + } // for + } + + inline bool doSemicolon( Declaration* decl ) { + if ( FunctionDecl* func = dynamic_cast< FunctionDecl* >( decl ) ) { + return ! func->get_statements(); + } // if + return true; + } +} // namespace CodeGen + +#endif // CODEGENV_H + +// Local Variables: // +// tab-width: 4 // +// mode: c++ // +// compile-command: "make install" // +// End: // Index: c/CodeGen/CodeGenerator2.cc =================================================================== --- src/CodeGen/CodeGenerator2.cc (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ (revision ) @@ -1,666 +1,0 @@ -// -// Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo -// -// The contents of this file are covered under the licence agreement in the -// file "LICENCE" distributed with Cforall. -// -// CodeGenerator2.cc -- -// -// Author : Richard C. Bilson -// Created On : Mon May 18 07:44:20 2015 -// Last Modified By : Peter A. Buhr -// Last Modified On : Thu May 21 17:13:35 2015 -// Update Count : 7 -// - -#include -#include -#include -#include - -#include "SynTree/Type.h" -#include "SynTree/Declaration.h" -#include "SynTree/Statement.h" -#include "SynTree/Expression.h" -#include "SynTree/Initializer.h" - -#include "utility.h" -#include "UnimplementedError.h" - -#include "CodeGenerator2.h" -#include "OperatorTable.h" -#include "GenType.h" - -using namespace std; - -namespace CodeGen { - int CodeGenerator2::tabsize = 4; - - CodeGenerator2::CodeGenerator2( std::ostream &os ) : cur_indent( 0 ), insideFunction( false ), before( os ), after() { } - - CodeGenerator2::CodeGenerator2( std::ostream &os, std::string init, int indent, bool infunp ) - : cur_indent( indent ), insideFunction( infunp ), before( os ) { - //before << std::string( init ); - } - - CodeGenerator2::CodeGenerator2( std::ostream &os, char *init, int indent, bool infunp ) - : cur_indent( indent ), insideFunction( infunp ), before( os ) { - //before << std::string( init ); - } - - string mangleName( DeclarationWithType *decl ) { - if ( decl->get_mangleName() != "" ) { - return decl->get_mangleName(); - } else { - return decl->get_name(); - } // if - } - - //*** Declarations - void CodeGenerator2::visit( FunctionDecl *functionDecl ) { - handleStorageClass( functionDecl ); - before << genType( functionDecl->get_functionType(), mangleName( functionDecl ) ); - - // how to get this to the Functype? - std::list< Declaration * > olds = functionDecl->get_oldDecls(); - if ( ! olds.empty() ) { - before << " /* function has old declaration */"; - } // if - - // acceptAll( functionDecl->get_oldDecls(), *this ); - if ( functionDecl->get_statements() ) { - functionDecl->get_statements()->accept(*this ); - } // if - } - - void CodeGenerator2::visit( ObjectDecl *objectDecl ) { - handleStorageClass( objectDecl ); - before << genType( objectDecl->get_type(), mangleName( objectDecl ) ); - - if ( objectDecl->get_init() ) { - before << " = "; - objectDecl->get_init()->accept( *this ); - } // if - if ( objectDecl->get_bitfieldWidth() ) { - before << ":"; - objectDecl->get_bitfieldWidth()->accept( *this ); - } // if - } - - void CodeGenerator2::handleAggregate( AggregateDecl *aggDecl ) { - if ( aggDecl->get_name() != "" ) - before << aggDecl->get_name(); - - std::list< Declaration * > &memb = aggDecl->get_members(); - - if ( ! memb.empty() ) { - before << endl << string( cur_indent, ' ' ) << "{" << endl; - - cur_indent += CodeGenerator2::tabsize; - for ( std::list< Declaration* >::iterator i = memb.begin(); i != memb.end(); i++) { - before << string( cur_indent, ' ' ); - (*i)->accept(*this ); - before << ";" << endl; - } - - cur_indent -= CodeGenerator2::tabsize; - - before << string( cur_indent, ' ' ) << "}"; - } // if - } - - void CodeGenerator2::visit( StructDecl *structDecl ) { - before << "struct "; - handleAggregate( structDecl ); - } - - void CodeGenerator2::visit( UnionDecl *aggregateDecl ) { - before << "union "; - handleAggregate( aggregateDecl ); - } - - void CodeGenerator2::visit( EnumDecl *aggDecl ) { - before << "enum "; - - if ( aggDecl->get_name() != "" ) - before << aggDecl->get_name(); - - std::list< Declaration* > &memb = aggDecl->get_members(); - - if ( ! memb.empty() ) { - before << endl << "{" << endl; - - cur_indent += CodeGenerator2::tabsize; - for ( std::list< Declaration* >::iterator i = memb.begin(); i != memb.end(); i++) { - ObjectDecl *obj = dynamic_cast< ObjectDecl* >( *i ); - assert( obj ); - before << string( cur_indent, ' ' ) << mangleName( obj ); - if ( obj->get_init() ) { - before << " = "; - obj->get_init()->accept(*this ); - } // if - before << "," << endl; - } // for - - cur_indent -= CodeGenerator2::tabsize; - - before << "}" << endl; - } // if - } - - void CodeGenerator2::visit( ContextDecl *aggregateDecl ) {} - - void CodeGenerator2::visit( TypedefDecl *typeDecl ) { - before << "typedef "; - before << genType( typeDecl->get_base(), typeDecl->get_name() ); - } - - void CodeGenerator2::visit( TypeDecl *typeDecl ) { - // really, we should mutate this into something that isn't a TypeDecl but that requires large-scale changes, - // still to be done - before << "extern unsigned long " << typeDecl->get_name(); - if ( typeDecl->get_base() ) { - before << " = sizeof( " << genType( typeDecl->get_base(), "" ) << " )"; - } // if - } - - void CodeGenerator2::visit( SingleInit *init ) { - init->get_value()->accept( *this ); - } - - void CodeGenerator2::visit( ListInit *init ) { - before << "{ "; - genCommaList( init->begin_initializers(), init->end_initializers() ); - before << " }"; - } - - void CodeGenerator2::visit( Constant *constant ) { - before << constant->get_value() ; - } - - //*** Expressions - void CodeGenerator2::visit( ApplicationExpr *applicationExpr ) { - if ( VariableExpr *varExpr = dynamic_cast< VariableExpr* >( applicationExpr->get_function() ) ) { - OperatorInfo opInfo; - if ( varExpr->get_var()->get_linkage() == LinkageSpec::Intrinsic && operatorLookup( varExpr->get_var()->get_name(), opInfo ) ) { - std::list< Expression* >::iterator arg = applicationExpr->get_args().begin(); - switch ( opInfo.type ) { - case OT_PREFIXASSIGN: - case OT_POSTFIXASSIGN: - case OT_INFIXASSIGN: - { - assert( arg != applicationExpr->get_args().end() ); - if ( AddressExpr *addrExpr = dynamic_cast< AddressExpr * >( *arg ) ) { - - *arg = addrExpr->get_arg(); - } else { - UntypedExpr *newExpr = new UntypedExpr( new NameExpr( "*?" ) ); - newExpr->get_args().push_back( *arg ); - *arg = newExpr; - } // if - break; - } - - default: - // do nothing - ; - } - - switch ( opInfo.type ) { - case OT_INDEX: - assert( applicationExpr->get_args().size() == 2 ); - (*arg++)->accept( *this ); - before << "["; - (*arg)->accept( *this ); - before << "]"; - break; - - case OT_CALL: - // there are no intrinsic definitions of the function call operator - assert( false ); - break; - - case OT_PREFIX: - case OT_PREFIXASSIGN: - assert( applicationExpr->get_args().size() == 1 ); - before << "("; - before << opInfo.symbol; - (*arg)->accept( *this ); - before << ")"; - break; - - case OT_POSTFIX: - case OT_POSTFIXASSIGN: - assert( applicationExpr->get_args().size() == 1 ); - (*arg)->accept( *this ); - before << opInfo.symbol; - break; - - case OT_INFIX: - case OT_INFIXASSIGN: - assert( applicationExpr->get_args().size() == 2 ); - before << "("; - (*arg++)->accept( *this ); - before << opInfo.symbol; - (*arg)->accept( *this ); - before << ")"; - break; - - case OT_CONSTANT: - // there are no intrinsic definitions of 0 or 1 as functions - assert( false ); - } - } else { - varExpr->accept( *this ); - before << "("; - genCommaList( applicationExpr->get_args().begin(), applicationExpr->get_args().end() ); - before << ")"; - } // if - } else { - applicationExpr->get_function()->accept( *this ); - before << "("; - genCommaList( applicationExpr->get_args().begin(), applicationExpr->get_args().end() ); - before << ")"; - } // if - } - - void CodeGenerator2::visit( UntypedExpr *untypedExpr ) { - if ( NameExpr *nameExpr = dynamic_cast< NameExpr* >( untypedExpr->get_function() ) ) { - OperatorInfo opInfo; - if ( operatorLookup( nameExpr->get_name(), opInfo ) ) { - std::list< Expression* >::iterator arg = untypedExpr->get_args().begin(); - switch ( opInfo.type ) { - case OT_INDEX: - assert( untypedExpr->get_args().size() == 2 ); - (*arg++)->accept( *this ); - before << "["; - (*arg)->accept( *this ); - before << "]"; - break; - - case OT_CALL: - assert( false ); - break; - - case OT_PREFIX: - case OT_PREFIXASSIGN: - assert( untypedExpr->get_args().size() == 1 ); - before << "("; - before << opInfo.symbol; - (*arg)->accept( *this ); - before << ")"; - break; - - case OT_POSTFIX: - case OT_POSTFIXASSIGN: - assert( untypedExpr->get_args().size() == 1 ); - (*arg)->accept( *this ); - before << opInfo.symbol; - break; - - case OT_INFIX: - case OT_INFIXASSIGN: - assert( untypedExpr->get_args().size() == 2 ); - before << "("; - (*arg++)->accept( *this ); - before << opInfo.symbol; - (*arg)->accept( *this ); - before << ")"; - break; - - case OT_CONSTANT: - // there are no intrinsic definitions of 0 or 1 as functions - assert( false ); - } - } else { - nameExpr->accept( *this ); - before << "("; - genCommaList( untypedExpr->get_args().begin(), untypedExpr->get_args().end() ); - before << ")"; - } // if - } else { - untypedExpr->get_function()->accept( *this ); - before << "("; - genCommaList( untypedExpr->get_args().begin(), untypedExpr->get_args().end() ); - before << ")"; - } // if - } - - void CodeGenerator2::visit( NameExpr *nameExpr ) { - OperatorInfo opInfo; - if ( operatorLookup( nameExpr->get_name(), opInfo ) ) { - assert( opInfo.type == OT_CONSTANT ); - before << opInfo.symbol; - } else { - before << nameExpr->get_name(); - } // if - } - - void CodeGenerator2::visit( AddressExpr *addressExpr ) { - before << "(&"; - // this hack makes sure that we don't convert "constant_zero" to "0" if we're taking its address - if ( VariableExpr *variableExpr = dynamic_cast< VariableExpr* >( addressExpr->get_arg() ) ) { - before << mangleName( variableExpr->get_var() ); - } else { - addressExpr->get_arg()->accept( *this ); - } // if - before << ")"; - } - - void CodeGenerator2::visit( CastExpr *castExpr ) { - before << "(("; - if ( castExpr->get_results().empty() ) { - before << "void" ; - } else { - before << genType( castExpr->get_results().front(), "" ); - } // if - before << ")"; - castExpr->get_arg()->accept( *this ); - before << ")"; - } - - void CodeGenerator2::visit( UntypedMemberExpr *memberExpr ) { - assert( false ); - } - - void CodeGenerator2::visit( MemberExpr *memberExpr ) { - memberExpr->get_aggregate()->accept( *this ); - before << "." << mangleName( memberExpr->get_member() ); - } - - void CodeGenerator2::visit( VariableExpr *variableExpr ) { - OperatorInfo opInfo; - if ( variableExpr->get_var()->get_linkage() == LinkageSpec::Intrinsic && operatorLookup( variableExpr->get_var()->get_name(), opInfo ) && opInfo.type == OT_CONSTANT ) { - before << opInfo.symbol; - } else { - before << mangleName( variableExpr->get_var() ); - } // if - } - - void CodeGenerator2::visit( ConstantExpr *constantExpr ) { - assert( constantExpr->get_constant() ); - constantExpr->get_constant()->accept( *this ); - } - - void CodeGenerator2::visit( SizeofExpr *sizeofExpr ) { - before << "sizeof("; - if ( sizeofExpr->get_isType() ) { - before << genType( sizeofExpr->get_type(), "" ); - } else { - sizeofExpr->get_expr()->accept( *this ); - } // if - before << ")"; - } - - void CodeGenerator2::visit( LogicalExpr *logicalExpr ) { - before << "("; - logicalExpr->get_arg1()->accept( *this ); - if ( logicalExpr->get_isAnd() ) { - before << " && "; - } else { - before << " || "; - } // if - logicalExpr->get_arg2()->accept( *this ); - before << ")"; - } - - void CodeGenerator2::visit( ConditionalExpr *conditionalExpr ) { - before << "("; - conditionalExpr->get_arg1()->accept( *this ); - before << " ? "; - conditionalExpr->get_arg2()->accept( *this ); - before << " : "; - conditionalExpr->get_arg3()->accept( *this ); - before << ")"; - } - - void CodeGenerator2::visit( CommaExpr *commaExpr ) { - before << "("; - commaExpr->get_arg1()->accept( *this ); - before << " , "; - commaExpr->get_arg2()->accept( *this ); - before << ")"; - } - - void CodeGenerator2::visit( TupleExpr *tupleExpr ) {} - - void CodeGenerator2::visit( TypeExpr *typeExpr ) {} - - - //*** Statements - void CodeGenerator2::visit( CompoundStmt *compoundStmt ) { - std::list ks = compoundStmt->get_kids(); - - before << endl << string( cur_indent, ' ' ) << "{" << endl; - - cur_indent += CodeGenerator2::tabsize; - - for ( std::list::iterator i = ks.begin(); i != ks.end(); i++) { - before << string( cur_indent, ' ' ) << printLabels( (*i)->get_labels() ) ; - (*i)->accept(*this ); - shift_left(); - before << endl; - } - cur_indent -= CodeGenerator2::tabsize; - - before << string( cur_indent, ' ' ) << "}" << endl; - } - - void CodeGenerator2::visit( ExprStmt *exprStmt ) { - if ( exprStmt != 0 ) { - exprStmt->get_expr()->accept( *this ); - shift_left(); - before << ";" ; - } // if - } - - void CodeGenerator2::visit( IfStmt *ifStmt ) { - before << "if ("; - ifStmt->get_condition()->accept(*this ); - after += ")\n"; - shift_left(); - - cur_indent += CodeGenerator2::tabsize; - before << string( cur_indent, ' ' ); - ifStmt->get_thenPart()->accept(*this ); - cur_indent -= CodeGenerator2::tabsize; - shift_left(); before << endl; - - if ( ifStmt->get_elsePart() != 0) { - before << string( cur_indent, ' ' ) << " else " << endl ; - - cur_indent += CodeGenerator2::tabsize; - ifStmt->get_elsePart()->accept(*this ); - cur_indent -= CodeGenerator2::tabsize; - } // if - } - - void CodeGenerator2::visit( SwitchStmt *switchStmt ) { - //before << /* "\r" << */ string( cur_indent, ' ' ) << CodeGenerator2::printLabels( switchStmt->get_labels() ) - before << "switch (" ; - switchStmt->get_condition()->accept(*this ); - after += ")\n"; - shift_left(); - - before << string( cur_indent, ' ' ) << "{" << std::endl; - cur_indent += CodeGenerator2::tabsize; - - std::list< Statement * > stmts = switchStmt->get_branches(); - bool lastBreak = false; - - // horrible, horrible hack - if ( dynamic_cast( stmts.back() ) != 0 ) { - lastBreak = true; - stmts.pop_back(); - } // if - acceptAll( stmts, *this ); - if ( lastBreak ) { - Statement *st = switchStmt->get_branches().back(); - before << CodeGenerator2::printLabels( st->get_labels()); - st->accept( *this ); - } // if - - cur_indent -= CodeGenerator2::tabsize; - - before << /* "\r" << */ string( cur_indent, ' ' ) << "}" << endl ; - } - - void CodeGenerator2::visit( CaseStmt *caseStmt ) { - before << string( cur_indent, ' ' ); - if ( caseStmt->isDefault()) - before << "default " ; - else { - before << "case " ; - caseStmt->get_condition()->accept(*this ); - } // if - after += ":\n"; - shift_left(); - - std::list sts = caseStmt->get_statements(); - - cur_indent += CodeGenerator2::tabsize; - for ( std::list::iterator i = sts.begin(); i != sts.end(); i++) { - before << /* "\r" << */ string( cur_indent, ' ' ) << printLabels( (*i)->get_labels() ) ; - (*i)->accept(*this ); - shift_left(); - before << ";" << endl; - } - cur_indent -= CodeGenerator2::tabsize; - } - - void CodeGenerator2::visit( BranchStmt *branchStmt ) { - switch ( branchStmt->get_type()) { - case BranchStmt::Goto: - if ( ! branchStmt->get_target().empty() ) - before << "goto " << branchStmt->get_target(); - else { - if ( branchStmt->get_computedTarget() != 0 ) { - before << "goto *"; - branchStmt->get_computedTarget()->accept( *this ); - } // if - } // if - break; - case BranchStmt::Break: - before << "break"; - break; - case BranchStmt::Continue: - before << "continue"; - break; - } - before << ";"; - } - - - void CodeGenerator2::visit( ReturnStmt *returnStmt ) { - before << "return "; - - // xxx -- check for null expression; - if ( returnStmt->get_expr() ) { - returnStmt->get_expr()->accept( *this ); - } // if - after += ";"; - } - - void CodeGenerator2::visit( WhileStmt *whileStmt ) { - if ( whileStmt->get_isDoWhile() ) - before << "do" ; - else { - before << "while (" ; - whileStmt->get_condition()->accept(*this ); - after += ")"; - } // if - after += "{\n"; - shift_left(); - - whileStmt->get_body()->accept( *this ); - - before << /* "\r" << */ string( cur_indent, ' ' ) << "}" ; - - if ( whileStmt->get_isDoWhile() ) { - before << " while (" ; - whileStmt->get_condition()->accept(*this ); - after += ");"; - } // if - - after += "\n"; - } - - void CodeGenerator2::visit( ForStmt *forStmt ) { - before << "for ("; - - if ( forStmt->get_initialization() != 0 ) - forStmt->get_initialization()->accept( *this ); - else - before << ";"; - shift_left(); - - if ( forStmt->get_condition() != 0 ) - forStmt->get_condition()->accept( *this ); - shift_left(); before << ";"; - - if ( forStmt->get_increment() != 0 ) - forStmt->get_increment()->accept( *this ); - shift_left(); before << ")" << endl; - - if ( forStmt->get_body() != 0 ) { - cur_indent += CodeGenerator2::tabsize; - before << string( cur_indent, ' ' ) << CodeGenerator2::printLabels( forStmt->get_body()->get_labels() ); - forStmt->get_body()->accept( *this ); - cur_indent -= CodeGenerator2::tabsize; - } // if - } - - void CodeGenerator2::visit( NullStmt *nullStmt ) { - //before << /* "\r" << */ string( cur_indent, ' ' ) << CodeGenerator2::printLabels( nullStmt->get_labels() ); - before << "/* null statement */ ;"; - } - - void CodeGenerator2::visit( DeclStmt *declStmt ) { - declStmt->get_decl()->accept( *this ); - - if ( doSemicolon( declStmt->get_decl() ) ) { - after += ";"; - } // if - shift_left(); - } - - std::string CodeGenerator2::printLabels( std::list< Label > &l ) { - std::string str( "" ); - l.unique(); - - for ( std::list< Label >::iterator i = l.begin(); i != l.end(); i++ ) - str += *i + ": "; - - return str; - } - - void CodeGenerator2::shift_left() { - before << after; - after = ""; - } - - void CodeGenerator2::handleStorageClass( Declaration *decl ) { - switch ( decl->get_storageClass() ) { - case Declaration::NoStorageClass: - break; - case Declaration::Extern: - before << "extern "; - break; - case Declaration::Static: - before << "static "; - break; - case Declaration::Auto: - // silently drop storage class - break; - case Declaration::Register: - before << "register "; - break; - } // switch - } -} // namespace CodeGen - -// Local Variables: // -// tab-width: 4 // -// mode: c++ // -// compile-command: "make install" // -// End: // Index: c/CodeGen/CodeGenerator2.h =================================================================== --- src/CodeGen/CodeGenerator2.h (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ (revision ) @@ -1,126 +1,0 @@ -// -// Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo -// -// The contents of this file are covered under the licence agreement in the -// file "LICENCE" distributed with Cforall. -// -// CodeGenerator2.h -- -// -// Author : Richard C. Bilson -// Created On : Mon May 18 07:44:20 2015 -// Last Modified By : Peter A. Buhr -// Last Modified On : Mon May 18 23:35:37 2015 -// Update Count : 2 -// - -#ifndef CODEGENV_H -#define CODEGENV_H - -#include -#include - -#include "SynTree/SynTree.h" -#include "SynTree/Visitor.h" -#include "SymTab/Indexer.h" - -namespace CodeGen { - class CodeGenerator2 : public Visitor { - public: - static int tabsize; - - CodeGenerator2( std::ostream &os ); - CodeGenerator2( std::ostream &os, std::string, int indent = 0, bool infun = false ); - CodeGenerator2( std::ostream &os, char *, int indent = 0, bool infun = false ); - - CodeGenerator2( CodeGenerator2 & ); - - //*** Declaration - virtual void visit( StructDecl * ); - virtual void visit( FunctionDecl * ); - virtual void visit( ObjectDecl * ); - virtual void visit( UnionDecl *aggregateDecl ); - virtual void visit( EnumDecl *aggregateDecl ); - virtual void visit( ContextDecl *aggregateDecl ); - virtual void visit( TypedefDecl *typeDecl ); - virtual void visit( TypeDecl *typeDecl ); - - //*** Initializer - virtual void visit( SingleInit * ); - virtual void visit( ListInit * ); - - //*** Constant - virtual void visit( Constant * ); - - //*** Expression - virtual void visit( ApplicationExpr *applicationExpr ); - virtual void visit( UntypedExpr *untypedExpr ); - virtual void visit( NameExpr *nameExpr ); - virtual void visit( AddressExpr *addressExpr ); - virtual void visit( CastExpr *castExpr ); - virtual void visit( UntypedMemberExpr *memberExpr ); - virtual void visit( MemberExpr *memberExpr ); - virtual void visit( VariableExpr *variableExpr ); - virtual void visit( ConstantExpr *constantExpr ); - virtual void visit( SizeofExpr *sizeofExpr ); - virtual void visit( LogicalExpr *logicalExpr ); - virtual void visit( ConditionalExpr *conditionalExpr ); - virtual void visit( CommaExpr *commaExpr ); - virtual void visit( TupleExpr *tupleExpr ); - virtual void visit( TypeExpr *typeExpr ); - - //*** Statements - virtual void visit( CompoundStmt * ); - virtual void visit( ExprStmt * ); - virtual void visit( IfStmt * ); - virtual void visit( SwitchStmt * ); - virtual void visit( CaseStmt * ); - virtual void visit( BranchStmt * ); - virtual void visit( ReturnStmt * ); - virtual void visit( WhileStmt * ); - virtual void visit( ForStmt * ); - virtual void visit( NullStmt * ); - virtual void visit( DeclStmt * ); - - std::string get_string( void ); - void add_string_left( std::string s ) { before << s; } - void shift_left(); - template< class Iterator > void genCommaList( Iterator begin, Iterator end ); - private: - int cur_indent; - bool insideFunction; - std::ostream &before; - std::string after; - - static std::string printLabels ( std::list < Label > & ); - void handleStorageClass( Declaration *decl ); - void handleAggregate( AggregateDecl *aggDecl ); - void handleTypedef( NamedTypeDecl *namedType ); - - }; - - template< class Iterator > - void CodeGenerator2::genCommaList( Iterator begin, Iterator end ) { - if ( begin == end ) return; - - for ( ;; ) { - (*begin++)->accept( *this ); - if ( begin == end ) return; - before << ", "; - } // for - } - - inline bool doSemicolon( Declaration* decl ) { - if ( FunctionDecl* func = dynamic_cast< FunctionDecl* >( decl ) ) { - return ! func->get_statements(); - } // if - return true; - } -} // namespace CodeGen - -#endif // CODEGENV_H - -// Local Variables: // -// tab-width: 4 // -// mode: c++ // -// compile-command: "make install" // -// End: // Index: src/CodeGen/GenType.cc =================================================================== --- src/CodeGen/GenType.cc (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/CodeGen/GenType.cc (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -10,13 +10,13 @@ // Created On : Mon May 18 07:44:20 2015 // Last Modified By : Peter A. Buhr -// Last Modified On : Mon May 18 23:38:22 2015 -// Update Count : 2 -// - -#include +// Last Modified On : Mon Jun 8 14:36:02 2015 +// Update Count : 9 +// + +#include #include #include "GenType.h" -#include "CodeGenerator2.h" +#include "CodeGenerator.h" #include "SynTree/Visitor.h" #include "SynTree/Type.h" @@ -68,5 +68,5 @@ void GenType::genArray( const Type::Qualifiers &qualifiers, Type *base, Expression *dimension, bool isVarLen, bool isStatic ) { - std::ostrstream os; + std::ostringstream os; if ( typeString != "" ) { if ( typeString[ 0 ] == '*' ) { @@ -97,10 +97,10 @@ } // if if ( dimension != 0 ) { - CodeGenerator2 cg( os ); + CodeGenerator cg( os ); dimension->accept( cg ); } // if os << "]"; - typeString = std::string( os.str(), os.pcount() ); + typeString = os.str(); base->accept( *this ); @@ -127,5 +127,5 @@ void GenType::visit( FunctionType *funcType ) { - std::ostrstream os; + std::ostringstream os; if ( typeString != "" ) { @@ -148,5 +148,5 @@ } // if } else { - CodeGenerator2 cg( os ); + CodeGenerator cg( os ); os << "(" ; @@ -159,5 +159,5 @@ } // if - typeString = std::string( os.str(), os.pcount() ); + typeString = os.str(); if ( funcType->get_returnVals().size() == 0 ) { Index: src/CodeGen/Generate.cc =================================================================== --- src/CodeGen/Generate.cc (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/CodeGen/Generate.cc (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -10,6 +10,6 @@ // Created On : Mon May 18 07:44:20 2015 // Last Modified By : Peter A. Buhr -// Last Modified On : Mon May 18 23:39:24 2015 -// Update Count : 1 +// Last Modified On : Thu Jun 4 14:04:25 2015 +// Update Count : 5 // @@ -21,6 +21,5 @@ #include "Generate.h" #include "SynTree/Declaration.h" - -#include "CodeGenerator2.h" +#include "CodeGenerator.h" using namespace std; @@ -28,10 +27,9 @@ namespace CodeGen { void generate( std::list< Declaration* > translationUnit, std::ostream &os, bool doIntrinsics ) { - CodeGen::CodeGenerator2 cgv( os ); + CodeGen::CodeGenerator cgv( os ); for ( std::list::iterator i = translationUnit.begin(); i != translationUnit.end(); i++ ) { if ( LinkageSpec::isGeneratable( (*i)->get_linkage() ) && (doIntrinsics || ! LinkageSpec::isBuiltin( (*i)->get_linkage() ) ) ) { (*i)->accept(cgv); - cgv.shift_left(); if ( doSemicolon( *i ) ) { os << ";"; Index: src/CodeGen/OperatorTable.cc =================================================================== --- src/CodeGen/OperatorTable.cc (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/CodeGen/OperatorTable.cc (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -10,6 +10,6 @@ // Created On : Mon May 18 07:44:20 2015 // Last Modified By : Peter A. Buhr -// Last Modified On : Mon May 18 23:42:07 2015 -// Update Count : 2 +// Last Modified On : Tue Jun 23 17:41:14 2015 +// Update Count : 5 // @@ -20,44 +20,45 @@ namespace { const OperatorInfo tableValues[] = { - { "?[?]", "", "_operator_index", OT_INDEX }, - { "?()", "", "_operator_call", OT_CALL }, - { "?++", "++", "_operator_postincr", OT_POSTFIXASSIGN }, - { "?--", "--", "_operator_postdecr", OT_POSTFIXASSIGN }, - { "*?", "*", "_operator_deref", OT_PREFIX }, - { "+?", "+", "_operator_unaryplus", OT_PREFIX }, - { "-?", "-", "_operator_unaryminus", OT_PREFIX }, - { "~?", "~", "_operator_bitnot", OT_PREFIX }, - { "!?", "!", "_operator_lognot", OT_PREFIX }, - { "++?", "++", "_operator_preincr", OT_PREFIXASSIGN }, - { "--?", "--", "_operator_predecr", OT_PREFIXASSIGN }, - { "?*?", "*", "_operator_multiply", OT_INFIX }, - { "?/?", "/", "_operator_divide", OT_INFIX }, - { "?%?", "%", "_operator_modulus", OT_INFIX }, - { "?+?", "+", "_operator_add", OT_INFIX }, - { "?-?", "-", "_operator_subtract", OT_INFIX }, - { "?<>?", ">>", "_operator_shiftright", OT_INFIX }, - { "??", ">", "_operator_greater", OT_INFIX }, - { "?<=?", "<=", "_operator_lessequal", OT_INFIX }, - { "?>=?", ">=", "_operator_greaterequal", OT_INFIX }, - { "?==?", "==", "_operator_equal", OT_INFIX }, - { "?!=?", "!=", "_operator_notequal", OT_INFIX }, - { "?&?", "&", "_operator_bitand", OT_INFIX }, - { "?^?", "^", "_operator_bitxor", OT_INFIX }, - { "?|?", "|", "_operator_bitor", OT_INFIX }, - { "?=?", "=", "_operator_assign", OT_INFIXASSIGN }, - { "?*=?", "*=", "_operator_multassign", OT_INFIXASSIGN }, - { "?/=?", "/=", "_operator_divassign", OT_INFIXASSIGN }, - { "?%=?", "%=", "_operator_modassign", OT_INFIXASSIGN }, - { "?+=?", "+=", "_operator_addassign", OT_INFIXASSIGN }, - { "?-=?", "-=", "_operator_subassign", OT_INFIXASSIGN }, + { "?[?]", "", "_operator_index", OT_INDEX }, + { "?()", "", "_operator_call", OT_CALL }, + { "?++", "++", "_operator_postincr", OT_POSTFIXASSIGN }, + { "?--", "--", "_operator_postdecr", OT_POSTFIXASSIGN }, + { "*?", "*", "_operator_deref", OT_PREFIX }, + { "+?", "+", "_operator_unaryplus", OT_PREFIX }, + { "-?", "-", "_operator_unaryminus", OT_PREFIX }, + { "~?", "~", "_operator_bitnot", OT_PREFIX }, + { "!?", "!", "_operator_lognot", OT_PREFIX }, + { "++?", "++", "_operator_preincr", OT_PREFIXASSIGN }, + { "--?", "--", "_operator_predecr", OT_PREFIXASSIGN }, + { "?*?", "*", "_operator_multiply", OT_INFIX }, + { "?/?", "/", "_operator_divide", OT_INFIX }, + { "?%?", "%", "_operator_modulus", OT_INFIX }, + { "?+?", "+", "_operator_add", OT_INFIX }, + { "?-?", "-", "_operator_subtract", OT_INFIX }, + { "?<>?", ">>", "_operator_shiftright", OT_INFIX }, + { "??", ">", "_operator_greater", OT_INFIX }, + { "?<=?", "<=", "_operator_lessequal", OT_INFIX }, + { "?>=?", ">=", "_operator_greaterequal", OT_INFIX }, + { "?==?", "==", "_operator_equal", OT_INFIX }, + { "?!=?", "!=", "_operator_notequal", OT_INFIX }, + { "?&?", "&", "_operator_bitand", OT_INFIX }, + { "?^?", "^", "_operator_bitxor", OT_INFIX }, + { "?|?", "|", "_operator_bitor", OT_INFIX }, + { "?=?", "=", "_operator_assign", OT_INFIXASSIGN }, + { "?*=?", "*=", "_operator_multassign", OT_INFIXASSIGN }, + { "?/=?", "/=", "_operator_divassign", OT_INFIXASSIGN }, + { "?%=?", "%=", "_operator_modassign", OT_INFIXASSIGN }, + { "?+=?", "+=", "_operator_addassign", OT_INFIXASSIGN }, + { "?-=?", "-=", "_operator_subassign", OT_INFIXASSIGN }, { "?<<=?", "<<=", "_operator_shiftleftassign", OT_INFIXASSIGN }, { "?>>=?", ">>=", "_operator_shiftrightassign", OT_INFIXASSIGN }, - { "?&=?", "&=", "_operator_bitandassign", OT_INFIXASSIGN }, - { "?^=?", "^=", "_operator_bitxorassign", OT_INFIXASSIGN }, - { "?|=?", "|=", "_operator_bitorassign", OT_INFIXASSIGN }, - { "0", "0", "_constant_zero", OT_CONSTANT }, - { "1", "1", "_constant_one", OT_CONSTANT } + { "?&=?", "&=", "_operator_bitandassign", OT_INFIXASSIGN }, + { "?^=?", "^=", "_operator_bitxorassign", OT_INFIXASSIGN }, + { "?|=?", "|=", "_operator_bitorassign", OT_INFIXASSIGN }, + { "&&", "&&", "&&", OT_LABELADDRESS }, + { "0", "0", "_constant_zero", OT_CONSTANT }, + { "1", "1", "_constant_one", OT_CONSTANT } }; Index: src/CodeGen/OperatorTable.h =================================================================== --- src/CodeGen/OperatorTable.h (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/CodeGen/OperatorTable.h (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -10,6 +10,6 @@ // Created On : Mon May 18 07:44:20 2015 // Last Modified By : Peter A. Buhr -// Last Modified On : Mon May 18 23:43:07 2015 -// Update Count : 2 +// Last Modified On : Tue Jun 23 16:09:27 2015 +// Update Count : 3 // @@ -29,4 +29,5 @@ OT_POSTFIXASSIGN, OT_INFIXASSIGN, + OT_LABELADDRESS, OT_CONSTANT }; Index: src/CodeGen/module.mk =================================================================== --- src/CodeGen/module.mk (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/CodeGen/module.mk (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -1,6 +1,24 @@ +######################### -*- Mode: Makefile-Gmake -*- ######################## +## +## Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo +## +## The contents of this file are covered under the licence agreement in the +## file "LICENCE" distributed with Cforall. +## +## module.mk -- +## +## Author : Richard C. Bilson +## Created On : Mon Jun 1 17:49:17 2015 +## Last Modified By : Peter A. Buhr +## Last Modified On : Tue Jun 2 11:17:02 2015 +## Update Count : 3 +############################################################################### + +#SRC += ArgTweak/Rewriter.cc \ +# ArgTweak/Mutate.cc + SRC += CodeGen/Generate.cc \ - CodeGen/CodeGenerator2.cc \ + CodeGen/CodeGenerator.cc \ CodeGen/GenType.cc \ CodeGen/FixNames.cc \ - CodeGen/OperatorTable.cc \ - $(NULL) + CodeGen/OperatorTable.cc Index: src/Common/SemanticError.h =================================================================== --- src/Common/SemanticError.h (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/Common/SemanticError.h (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -10,6 +10,6 @@ // Created On : Mon May 18 07:44:20 2015 // Last Modified By : Peter A. Buhr -// Last Modified On : Tue May 19 07:22:23 2015 -// Update Count : 1 +// Last Modified On : Mon Jun 8 14:38:53 2015 +// Update Count : 4 // @@ -19,5 +19,5 @@ #include #include -#include +#include #include #include @@ -42,8 +42,8 @@ template< typename T > SemanticError::SemanticError( const std::string &error, const T *obj ) { - std::ostrstream os; + std::ostringstream os; os << "Error: " << error; obj->print( os ); - errors.push_back( std::string( os.str(), os.pcount() ) ); + errors.push_back( os.str() ); } Index: src/Common/UniqueName.cc =================================================================== --- src/Common/UniqueName.cc (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/Common/UniqueName.cc (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -10,10 +10,10 @@ // Created On : Mon May 18 07:44:20 2015 // Last Modified By : Peter A. Buhr -// Last Modified On : Tue May 19 07:23:41 2015 -// Update Count : 1 +// Last Modified On : Mon Jun 8 14:47:49 2015 +// Update Count : 3 // #include -#include +#include #include "UniqueName.h" @@ -23,7 +23,7 @@ std::string UniqueName::newName( const std::string &additional ) { - std::ostrstream os; + std::ostringstream os; os << base << additional << count++; - return std::string( os.str(), os.pcount() ); + return os.str(); } Index: src/Common/module.mk =================================================================== --- src/Common/module.mk (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/Common/module.mk (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -1,2 +1,18 @@ +######################### -*- Mode: Makefile-Gmake -*- ######################## +## +## Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo +## +## The contents of this file are covered under the licence agreement in the +## file "LICENCE" distributed with Cforall. +## +## module.mk -- +## +## Author : Richard C. Bilson +## Created On : Mon Jun 1 17:49:17 2015 +## Last Modified By : Peter A. Buhr +## Last Modified On : Mon Jun 1 17:51:23 2015 +## Update Count : 1 +############################################################################### + SRC += Common/SemanticError.cc \ Common/UniqueName.cc Index: src/Common/utility.h =================================================================== --- src/Common/utility.h (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/Common/utility.h (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -10,6 +10,6 @@ // Created On : Mon May 18 07:44:20 2015 // Last Modified By : Peter A. Buhr -// Last Modified On : Tue May 19 15:34:57 2015 -// Update Count : 3 +// Last Modified On : Mon Jun 8 14:43:54 2015 +// Update Count : 13 // @@ -18,5 +18,5 @@ #include -#include +#include #include #include @@ -60,5 +60,5 @@ for ( typename Container::const_iterator i = container.begin(); i != container.end(); ++i ) { if ( *i ) { - os << std::string(indent, ' '); + os << std::string( indent, ' ' ); (*i)->print( os, indent + 2 ); os << std::endl; @@ -130,10 +130,7 @@ template < typename T > std::string toString ( T value ) { - std::ostrstream os; - + std::ostringstream os; os << value; // << std::ends; - os.freeze( false ); - - return std::string(os.str(), os.pcount()); + return os.str(); } @@ -151,6 +148,4 @@ template< typename T > void replace( std::list< T > &org, typename std::list< T >::iterator pos, std::list< T > &with ) { - // TIter should secretly be a typename std::list< T >::iterator - // ( g++ 3.2 issues a 'is implicitly a typename' warning if I make this explicit ) typename std::list< T >::iterator next = pos; advance( next, 1 ); @@ -196,4 +191,14 @@ while ( b1 != e1 && b2 != e2 ) *out++ = func(*b1++, *b2++); +} + +// it's nice to actually be able to increment iterators by an arbitrary amount +template< typename Iterator > +Iterator operator+(Iterator i, int inc) { + while ( inc > 0 ) { + ++i; + --inc; + } + return i; } Index: src/ControlStruct/ChooseMutator.cc =================================================================== --- src/ControlStruct/ChooseMutator.cc (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/ControlStruct/ChooseMutator.cc (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -9,7 +9,7 @@ // Author : Rodolfo G. Esteves // Created On : Mon May 18 07:44:20 2015 -// Last Modified By : Peter A. Buhr -// Last Modified On : Tue May 19 15:31:39 2015 -// Update Count : 2 +// Last Modified By : Rob Schluntz +// Last Modified On : Wed Jun 03 15:30:20 2015 +// Update Count : 5 // @@ -44,4 +44,9 @@ std::list< Statement * > &stmts = caseStmt->get_statements(); + // the difference between switch and choose is that switch has an implicit fallthrough + // to the next case, whereas choose has an implicit break at the end of the current case. + // thus to transform a choose statement into a switch, we only need to insert breaks at the + // end of any case that doesn't already end in a break and that doesn't end in a fallthru + if ( insideChoose ) { BranchStmt *posBrk; Index: src/ControlStruct/LabelFixer.cc =================================================================== --- src/ControlStruct/LabelFixer.cc (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/ControlStruct/LabelFixer.cc (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -9,7 +9,7 @@ // Author : Rodolfo G. Esteves // Created On : Mon May 18 07:44:20 2015 -// Last Modified By : Peter A. Buhr -// Last Modified On : Tue May 19 15:25:59 2015 -// Update Count : 1 +// Last Modified By : Rob Schluntz +// Last Modified On : Wed Jun 24 16:24:34 2015 +// Update Count : 141 // @@ -19,17 +19,38 @@ #include "LabelFixer.h" #include "MLEMutator.h" +#include "SynTree/Expression.h" #include "SynTree/Statement.h" #include "SynTree/Declaration.h" #include "utility.h" +#include + namespace ControlStruct { LabelFixer::Entry::Entry( Statement *to, Statement *from ) : definition ( to ) { - if ( from != 0 ) - usage.push_back( from ); - } + if ( from != 0 ) { + UsageLoc loc; loc.stmt = from; + usage.push_back( loc ); + } + } + + LabelFixer::Entry::Entry( Statement *to, Expression *from ) : definition ( to ) { + if ( from != 0 ) { + UsageLoc loc; loc.expr = from; + usage.push_back( loc ); + } + } + bool LabelFixer::Entry::insideLoop() { return ( dynamic_cast< ForStmt * > ( definition ) || - dynamic_cast< WhileStmt * > ( definition ) ); + dynamic_cast< WhileStmt * > ( definition ) ); + } + + void LabelFixer::Entry::UsageLoc::accept( Visitor & visitor ) { + if ( dynamic_cast< Statement * >( stmt ) ) { + stmt->accept( visitor ); + } else { + expr->accept( visitor ); + } } @@ -40,6 +61,5 @@ void LabelFixer::visit( FunctionDecl *functionDecl ) { - if ( functionDecl->get_statements() != 0 ) - functionDecl->get_statements()->accept( *this ); + maybeAccept( functionDecl->get_statements(), *this ); MLEMutator mlemut( resolveJumps(), generator ); @@ -47,8 +67,11 @@ } + // prune to at most one label definition for each statement void LabelFixer::visit( Statement *stmt ) { + currentStatement = stmt; std::list< Label > &labels = stmt->get_labels(); if ( ! labels.empty() ) { + // only remember one label for each statement Label current = setLabelsDef( labels, stmt ); labels.clear(); @@ -58,84 +81,166 @@ void LabelFixer::visit( BranchStmt *branchStmt ) { - visit ( ( Statement * )branchStmt ); // the labels this statement might have - - Label target; - if ( (target = branchStmt->get_target()) != "" ) { + visit ( ( Statement * )branchStmt ); + + // for labeled branches, add an entry to the label table + Label target = branchStmt->get_target(); + if ( target != "" ) { setLabelsUsg( target, branchStmt ); - } //else /* computed goto or normal exit-loop statements */ - } - + } + } + + void LabelFixer::visit( UntypedExpr *untyped ) { + if ( NameExpr * func = dynamic_cast< NameExpr * >( untyped->get_function() ) ) { + if ( func->get_name() == "&&" ) { + NameExpr * arg = dynamic_cast< NameExpr * >( untyped->get_args().front() ); + Label target = arg->get_name(); + assert( target != "" ); + setLabelsUsg( target, untyped ); + } else { + Visitor::visit( untyped ); + } + } + } + + + // sets the definition of the labelTable entry to be the provided + // statement for every label in the list parameter. Happens for every kind of statement Label LabelFixer::setLabelsDef( std::list< Label > &llabel, Statement *definition ) { assert( definition != 0 ); - Entry *entry = new Entry( definition ); - bool used = false; - - for ( std::list< Label >::iterator i = llabel.begin(); i != llabel.end(); i++ ) - if ( labelTable.find( *i ) == labelTable.end() ) - { used = true; labelTable[ *i ] = entry; } // undefined and unused - else - if ( labelTable[ *i ]->defined() ) - throw SemanticError( "Duplicate definition of label: " + *i ); - else - labelTable[ *i ]->set_definition( definition ); - - if ( ! used ) delete entry; - - return labelTable[ llabel.front() ]->get_label(); // this *must* exist - } - - Label LabelFixer::setLabelsUsg( Label orgValue, Statement *use ) { + assert( llabel.size() > 0 ); + + Entry * e = new Entry( definition ); + + for ( std::list< Label >::iterator i = llabel.begin(); i != llabel.end(); i++ ) { + if ( labelTable.find( *i ) == labelTable.end() ) { + // all labels on this statement need to use the same entry, so this should only be created once + // undefined and unused until now, add an entry + labelTable[ *i ] = e; + } else if ( labelTable[ *i ]->defined() ) { + // defined twice, error + throw SemanticError( "Duplicate definition of label: " + *i ); + } else { + // used previously, but undefined until now -> link with this entry + Entry * oldEntry = labelTable[ *i ]; + e->add_uses( *oldEntry ); + labelTable[ *i ] = e; + } // if + } // for + + // produce one of the labels attached to this statement to be + // temporarily used as the canonical label + return labelTable[ llabel.front() ]->get_label(); + } + + // Remember all uses of a label. + template< typename UsageNode > + void LabelFixer::setLabelsUsg( Label orgValue, UsageNode *use ) { assert( use != 0 ); - if ( labelTable.find( orgValue ) != labelTable.end() ) - labelTable[ orgValue ]->add_use( use ); // the label has been defined or used before - else + if ( labelTable.find( orgValue ) != labelTable.end() ) { + // the label has been defined or used before + labelTable[ orgValue ]->add_use( use ); + } else { labelTable[ orgValue ] = new Entry( 0, use ); - - return labelTable[ orgValue ]->get_label(); - } - + } + } + + class LabelGetter : public Visitor { + public: + LabelGetter( Label &label ) : label( label ) {} + + virtual void visit( BranchStmt * branchStmt ) { + label = branchStmt->get_target(); + } + + virtual void visit( UntypedExpr * untyped ) { + NameExpr * name = dynamic_cast< NameExpr * >( untyped->get_function() ); + assert( name ); + assert( name->get_name() == "&&" ); + NameExpr * arg = dynamic_cast< NameExpr * >( untyped->get_args().front() ); + assert( arg ); + label = arg->get_name(); + } + + private: + Label &label; + }; + + class LabelSetter : public Visitor { + public: + LabelSetter( Label label ) : label( label ) {} + + virtual void visit( BranchStmt * branchStmt ) { + branchStmt->set_target( label ); + } + + virtual void visit( UntypedExpr * untyped ) { + NameExpr * name = dynamic_cast< NameExpr * >( untyped->get_function() ); + assert( name ); + assert( name->get_name() == "&&" ); + NameExpr * arg = dynamic_cast< NameExpr * >( untyped->get_args().front() ); + assert( arg ); + arg->set_name( label ); + } + + private: + Label label; + }; + + // Ultimately builds a table that maps a label to its defining statement. + // In the process, std::map *LabelFixer::resolveJumps() throw ( SemanticError ) { std::map< Statement *, Entry * > def_us; - for ( std::map< Label, Entry *>::iterator i = labelTable.begin(); i != labelTable.end(); i++ ) { + // combine the entries for all labels that target the same location + for ( std::map< Label, Entry *>::iterator i = labelTable.begin(); i != labelTable.end(); ++i ) { Entry *e = i->second; - if ( def_us.find ( e->get_definition() ) == def_us.end() ) + if ( def_us.find ( e->get_definition() ) == def_us.end() ) { def_us[ e->get_definition() ] = e; - else - if ( e->used() ) - def_us[ e->get_definition() ]->add_uses( e->get_uses() ); - } - - // get rid of labelTable - for ( std::map< Statement *, Entry * >::iterator i = def_us.begin(); i != def_us.end(); i++ ) { + } else if ( e->used() ) { + def_us[ e->get_definition() ]->add_uses( *e ); + } + } + + // create a unique label for each target location. + for ( std::map< Statement *, Entry * >::iterator i = def_us.begin(); i != def_us.end(); ++i ) { Statement *to = (*i).first; - std::list< Statement *> &from = (*i).second->get_uses(); - Label finalLabel = generator->newLabel(); - (*i).second->set_label( finalLabel ); - + Entry * entry = (*i).second; + std::list< Entry::UsageLoc > &from = entry->get_uses(); + + // no label definition found if ( to == 0 ) { - BranchStmt *first_use = dynamic_cast(from.back()); - Label undef(""); - if ( first_use != 0 ) - undef = first_use->get_target(); + Label undef; + LabelGetter getLabel( undef ); + from.back().accept( getLabel ); + // Label undef = getLabel( from.back()->get_target() ); throw SemanticError ( "'" + undef + "' label not defined"); - } + } // if + + // generate a new label, and attach it to its defining statement as the only label on that statement + Label finalLabel = generator->newLabel( to->get_labels().back() ); + entry->set_label( finalLabel ); to->get_labels().clear(); to->get_labels().push_back( finalLabel ); - for ( std::list< Statement *>::iterator j = from.begin(); j != from.end(); j++ ) { - BranchStmt *jumpTo = dynamic_cast< BranchStmt * > ( *j ); - assert( jumpTo != 0 ); - jumpTo->set_target( finalLabel ); + // redirect each of the source branch statements to the new target label + for ( std::list< Entry::UsageLoc >::iterator j = from.begin(); j != from.end(); ++j ) { + LabelSetter setLabel( finalLabel ); + (*j).accept( setLabel ); + // setLabel( *j, finalLabel ); + + // BranchStmt *jump = *j; + // assert( jump != 0 ); + // jump->set_target( finalLabel ); } // for } // for - // reverse table + // create a table where each label maps to its defining statement std::map< Label, Statement * > *ret = new std::map< Label, Statement * >(); - for ( std::map< Statement *, Entry * >::iterator i = def_us.begin(); i != def_us.end(); i++ ) + for ( std::map< Statement *, Entry * >::iterator i = def_us.begin(); i != def_us.end(); ++i ) { (*ret)[ (*i).second->get_label() ] = (*i).first; + } return ret; Index: src/ControlStruct/LabelFixer.h =================================================================== --- src/ControlStruct/LabelFixer.h (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/ControlStruct/LabelFixer.h (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -9,7 +9,7 @@ // Author : Rodolfo G. Esteves // Created On : Mon May 18 07:44:20 2015 -// Last Modified By : Peter A. Buhr -// Last Modified On : Tue May 19 15:31:55 2015 -// Update Count : 3 +// Last Modified By : Rob Schluntz +// Last Modified On : Tue Jun 23 15:47:25 2015 +// Update Count : 28 // @@ -53,12 +53,23 @@ virtual void visit( DeclStmt *stmt ) { visit( (Statement *)stmt ); return Parent::visit( stmt ); } virtual void visit( BranchStmt *branchStmt ); + virtual void visit( UntypedExpr *untyped ); Label setLabelsDef( std::list< Label > &, Statement *definition ); - Label setLabelsUsg( Label, Statement *usage = 0 ); + template< typename UsageNode > + void setLabelsUsg( Label, UsageNode *usage = 0 ); private: class Entry { - public: - Entry( Statement *to = 0, Statement *from = 0 ); + public: + union UsageLoc { + Statement * stmt; + Expression * expr; + + void accept( Visitor &visitor ); + }; + + Entry( Statement *to ) : definition( to ) {} + Entry( Statement *to, Statement *from ); + Entry( Statement *to, Expression *from ); bool used() { return ( usage.empty() ); } bool defined() { return ( definition != 0 ); } @@ -66,21 +77,31 @@ Label get_label() const { return label; } + void set_label( Label lab ) { label = lab; } + Statement *get_definition() const { return definition; } - std::list< Statement *> &get_uses() { return usage; } - - void add_use ( Statement *use ) { usage.push_back( use ); } - void add_uses ( std::list uses ) { usage.insert( usage.end(), uses.begin(), uses.end() ); } void set_definition( Statement *def ) { definition = def; } - void set_label( Label lab ) { label = lab; } - Label gset_label() const { return label; } + std::list< UsageLoc > &get_uses() { return usage; } + void add_use( Statement *use ) { + UsageLoc loc; + loc.stmt = use; + usage.push_back( loc ); + } + void add_use( Expression *use ) { + UsageLoc loc; + loc.expr = use; + usage.push_back( loc ); + } + + void add_uses ( Entry &other ) { usage.insert( usage.end(), other.usage.begin(), usage.end() ); } private: Label label; Statement *definition; - std::list usage; + std::list usage; }; std::map < Label, Entry *> labelTable; LabelGenerator *generator; + Statement * currentStatement; }; } // namespace ControlStruct Index: src/ControlStruct/LabelGenerator.cc =================================================================== --- src/ControlStruct/LabelGenerator.cc (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/ControlStruct/LabelGenerator.cc (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -10,10 +10,10 @@ // Created On : Mon May 18 07:44:20 2015 // Last Modified By : Peter A. Buhr -// Last Modified On : Tue May 19 15:32:04 2015 -// Update Count : 2 +// Last Modified On : Tue Jun 23 12:18:34 2015 +// Update Count : 13 // #include -#include +#include #include "LabelGenerator.h" @@ -29,9 +29,8 @@ } - Label LabelGenerator::newLabel() { - std::ostrstream os; - os << "__L" << current++ << "__";// << std::ends; - os.freeze( false ); - std::string ret = std::string (os.str(), os.pcount()); + Label LabelGenerator::newLabel( std::string suffix ) { + std::ostringstream os; + os << "__L" << current++ << "__" << suffix; + std::string ret = os.str(); return Label( ret ); } Index: src/ControlStruct/LabelGenerator.h =================================================================== --- src/ControlStruct/LabelGenerator.h (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/ControlStruct/LabelGenerator.h (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -9,7 +9,7 @@ // Author : Rodolfo G. Esteves // Created On : Mon May 18 07:44:20 2015 -// Last Modified By : Peter A. Buhr -// Last Modified On : Tue May 19 15:33:20 2015 -// Update Count : 3 +// Last Modified By : Rob Schluntz +// Last Modified On : Wed Jun 03 14:16:26 2015 +// Update Count : 5 // @@ -18,4 +18,5 @@ #include "SynTree/SynTree.h" +#include namespace ControlStruct { @@ -23,5 +24,5 @@ public: static LabelGenerator *getGenerator(); - Label newLabel(); + Label newLabel(std::string suffix = ""); void reset() { current = 0; } void rewind() { current--; } Index: src/ControlStruct/LabelTypeChecker.cc =================================================================== --- src/ControlStruct/LabelTypeChecker.cc (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/ControlStruct/LabelTypeChecker.cc (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -9,7 +9,7 @@ // Author : Rodolfo G. Esteves // Created On : Mon May 18 07:44:20 2015 -// Last Modified By : Peter A. Buhr -// Last Modified On : Tue May 19 15:32:15 2015 -// Update Count : 2 +// Last Modified By : Rob Schluntz +// Last Modified On : Wed Jun 24 16:24:48 2015 +// Update Count : 3 // @@ -29,5 +29,5 @@ NameExpr *fname; if ( ((fname = dynamic_cast(untypedExpr->get_function())) != 0) - && fname->get_name() == std::string("LabAddress") ) + && fname->get_name() == std::string("&&") ) std::cerr << "Taking the label of an address." << std::endl; else { Index: src/ControlStruct/MLEMutator.cc =================================================================== --- src/ControlStruct/MLEMutator.cc (revision eb50842f528b3e34cf566df4d08aa8c6d4b077a8) +++ src/ControlStruct/MLEMutator.cc (revision 937e51d79693364ccc3aec416b5db0894464e624) @@ -9,7 +9,7 @@ // Author : Rodolfo G. Esteves // Created On : Mon May 18 07:44:20 2015 -// Last Modified By : Peter A. Buhr -// Last Modified On : Tue May 19 15:32:26 2015 -// Update Count : 2 +// Last Modified By : Rob Schluntz +// Last Modified On : Thu Jun 04 15:12:33 2015 +// Update Count : 173 // @@ -19,4 +19,5 @@ #include "MLEMutator.h" #include "SynTree/Statement.h" +#include "SynTree/Expression.h" namespace ControlStruct { @@ -26,69 +27,124 @@ } - CompoundStmt* MLEMutator::mutate( CompoundStmt *cmpndStmt ) { - bool labeledBlock = false; - if ( !((cmpndStmt->get_labels()).empty()) ) { - labeledBlock = true; - enclosingBlocks.push_back( Entry( cmpndStmt ) ); - } // if - - std::list< Statement * > &kids = cmpndStmt->get_kids(); + // break labels have to come after the statement they break out of, + // so mutate a statement, then if they inform us through the breakLabel field + // tha they need a place to jump to on a break statement, add the break label + // to the body of statements + void MLEMutator::fixBlock( std::list< Statement * > &kids ) { for ( std::list< Statement * >::iterator k = kids.begin(); k != kids.end(); k++ ) { *k = (*k)->acceptMutator(*this); if ( ! get_breakLabel().empty() ) { - std::list< Statement * >::iterator next = k; next++; + std::list< Statement * >::iterator next = k+1; if ( next == kids.end() ) { std::list