]> oss.titaniummirror.com Git - msp430-gcc.git/blobdiff - gcc/fixinc/fixincl.tpl
Imported gcc-4.4.3
[msp430-gcc.git] / gcc / fixinc / fixincl.tpl
diff --git a/gcc/fixinc/fixincl.tpl b/gcc/fixinc/fixincl.tpl
deleted file mode 100644 (file)
index e8aefd0..0000000
+++ /dev/null
@@ -1,216 +0,0 @@
-[= AutoGen5 Template -*- Mode: C -*-
-x=fixincl.x =]
-/*
- *  DO NOT EDIT THIS FILE - it has been generated
- *
- * Install modified versions of certain ANSI-incompatible system header
- * files which are fixed to work correctly with ANSI C and placed in a
- * directory that GNU C will search.
- *
- * This file contains [=(count "fix")=] fixup descriptions.
- *
- * See README for more information.
- *
- *  inclhack copyright (c) 1998, 1999, 2000, 2001
- *  The Free Software Foundation, Inc.
- *
- [=(define re-ct 0) (define max-mach 0) (define ct 0)
-   (define HACK "") (define Hack "")    (define tmp "")
-   (gpl "inclhack" " *  ")=]
- */
-[=
-
-FOR fix =]
-/* * * * * * * * * * * * * * * * * * * * * * * * * *
- *
- *  Description of [=
-    (set! Hack (string-capitalize! (get "hackname")))
-    (set! HACK (string-upcase!     (get "hackname")))
-    (if (and (not (exist? "test_text")) (not (exist? "replace")))
-        (error (sprintf "include fix '%s' has no test text" Hack )) )
-    (. Hack)=] fix
- */[=
-
-# Note that this is not just for debugging purposes, but in case
-  some C fix wishes to refer to the regexps it is paired with.
-  See commentary at the top of fixfixes.c.
-=]
-tSCC z[=(. Hack)=]Name[] =
-     "[=hackname=]";
-
-/*
- *  File name selection pattern
- */[=
-
-  IF (exist? "files")=]
-tSCC z[=(. Hack)=]List[] =
-  "[=FOR files =]|[=files=][=ENDFOR=]|";[=
-
-  ELSE =]
-#define z[=(. Hack)=]List (char*)NULL[=
-  ENDIF (exist? "files") =]
-/*
- *  Machine/OS name selection pattern
- */[=
-
-  IF (exist? "mach")=]
-tSCC* apz[=(. Hack)=]Machs[] = {[=
-    (set! ct 0) =][=
-
-    FOR mach =]
-        [=
-      (set! tmp (get "mach"))
-      (set! ct (+ ct (string-length tmp) 5))
-      (kr-string tmp)=],[=
-    ENDFOR=]
-        (const char*)NULL };[=
-
-    (if (> ct max-mach) (set! max-mach ct)) =][=
-
-  ELSE =]
-#define apz[=(. Hack)=]Machs (const char**)NULL[=
-  ENDIF (exist? "files") =][=
-
-  IF (exist? "select")=]
-
-/*
- *  content selection pattern - do fix if pattern found
- */[=
-    FOR select =]
-tSCC z[=(. Hack)=]Select[=(for-index)=][] =
-       [=(kr-string (get "select"))=];[=
-    ENDFOR select =][=
-  ENDIF =][=
-
-  IF (exist? "bypass")=]
-
-/*
- *  content bypass pattern - skip fix if pattern found
- */[=
-    FOR bypass =]
-tSCC z[=(. Hack)=]Bypass[=(for-index)=][] =
-       [=(kr-string (get "bypass"))=];[=
-    ENDFOR bypass =][=
-  ENDIF =][=
-
-  IF (exist? "test")=]
-
-/*
- *  perform the 'test' shell command - do fix on success
- */[=
-    FOR test =]
-tSCC z[=(. Hack)=]Test[=(for-index)=][] =
-       [=(kr-string (get "test"))=];[=
-    ENDFOR  =][=
-  ENDIF     =][=
-
-  IF (exist? "c_test")=]
-
-/*
- *  perform the C function call test
- */[=
-    FOR c_test =]
-tSCC z[=(. Hack)=]FTst[=(for-index)=][] = "[=c_test=]";[=
-    ENDFOR c_test =][=
-  ENDIF =][=
-
-  IF (set! ct (+ (count "select") (count "bypass") 
-              (count "test") (count "c_test")))
-
-     (= ct 0)
-=]
-#define [=(. HACK)=]_TEST_CT  0
-#define a[=(. Hack)=]Tests   (tTestDesc*)NULL[=
-  ELSE =]
-
-#define    [=(. HACK)=]_TEST_CT  [=(. ct)=][=
-       (set! re-ct (+ re-ct (count "select") (count "bypass"))) =]
-static tTestDesc a[=(. Hack)=]Tests[] = {[=
-
-    FOR test =]
-  { TT_TEST,     z[=(. Hack)=]Test[=(for-index)=],   0 /* unused */ },[=
-    ENDFOR test =][=
-
-    FOR c_test =]
-  { TT_FUNCTION, z[=(. Hack)=]FTst[=(for-index)=],   0 /* unused */ },[=
-    ENDFOR c_test =][=
-
-    FOR bypass =]
-  { TT_NEGREP,   z[=(. Hack)=]Bypass[=(for-index)=], (regex_t*)NULL },[=
-    ENDFOR bypass =][=
-
-    FOR select =]
-  { TT_EGREP,    z[=(. Hack)=]Select[=(for-index)=], (regex_t*)NULL },[=
-    ENDFOR select =] };[=
-  ENDIF =]
-
-/*
- *  Fix Command Arguments for [=(. Hack)=]
- */
-static const char* apz[=(. Hack)=]Patch[] = {[=
-    IF   (exist? "sed")=] "sed"[=
-      FOR sed=],
-    "-e", [=(kr-string (get "sed"))=][=
-      ENDFOR sed=],[=
-
-    ELIF (exist? "shell")=] "sh", "-c",
-    [=(kr-string (get "shell"))=],[=
-
-    ELIF (exist? "c_fix")=]
-    [=(kr-string (get "c_fix"))=],[=
-
-      FOR c_fix_arg =]
-    [=(kr-string (get "c_fix_arg"))=],[=
-      ENDFOR c_fix_arg =][=
-
-    ELIF (> (len "replace") 0) =]
-[=(kr-string (get "replace"))=],[=
-
-    ENDIF=]
-    (char*)NULL };
-[=ENDFOR fix=]
-
-/* * * * * * * * * * * * * * * * * * * * * * * * * *
- *
- *  List of all fixes
- */[=
-#  as of this writing, 49 bytes are needed by the case statement format.
-   We also must allow for the size of the target machine machine name.
-   This allows for a 79 byte machine name.  Better be enough.
-=]
-#define REGEX_COUNT          [= (. re-ct) =]
-#define MACH_LIST_SIZE_LIMIT [= (+ 128 max-mach) =]
-#define FIX_COUNT            [= (count "fix") =]
-
-/*
- *  Enumerate the fixes[= # in a way that minimizes diffs :-) =]
- */
-typedef enum {[=
-
-FOR fix "," =]
-    [=(string-upcase! (get "hackname"))=]_FIXIDX[=
-ENDFOR
-
-=]
-} t_fixinc_idx;
-
-tFixDesc fixDescList[ FIX_COUNT ] = {[=
-
-
-FOR fix ",\n" =][=
-    (set! Hack (string-capitalize! (get "hackname")))
-    (set! HACK (string-upcase!     (get "hackname"))) =]
-  {  z[=(. Hack)=]Name,    z[=(. Hack)=]List,
-     apz[=(. Hack)=]Machs,
-     [=(. HACK)=]_TEST_CT, [=
-       IF (exist? "not_machine") =]FD_MACH_IFNOT[=
-       ELSE                      =]FD_MACH_ONLY[=
-       ENDIF =][=
-       IF    (exist? "shell")    =] | FD_SHELL_SCRIPT[=
-       ELIF  (exist? "c_fix")    =] | FD_SUBROUTINE[=
-       ELIF  (exist? "replace")  =] | FD_REPLACEMENT[=
-       ENDIF =],
-     a[=(. Hack)=]Tests,   apz[=(. Hack)=]Patch, 0 }[=
-
-ENDFOR =]
-};