mescc: Ignore -fnobuiltin, -nostdinc for GCC compatibility.

* module/mescc.scm (parse-opts): Add -fnobuiltin, -nostdinc.
(mescc:main): Ignore them.

diff --git a/module/mescc.scm b/module/mescc.scm
index 749be811de74dc36e99d8d36ebf23bd7f94d04fa..6a4bd69523f55da0b00a1338a730889dbc6b42e8 100644 (file)
--- a/module/mescc.scm
+++ b/module/mescc.scm
@@ -59,6 +59,7 @@
             (define (single-char #\D) (value #t))
             (debug-info (single-char #\g))
             (dumpmachine)
             (define (single-char #\D) (value #t))
             (debug-info (single-char #\g))
             (dumpmachine)

+            (fno-builtin)

             (help (single-char #\h))
             (include (single-char #\I) (value #t))
             (library-dir (single-char #\L) (value #t))
             (help (single-char #\h))
             (include (single-char #\I) (value #t))
             (library-dir (single-char #\L) (value #t))


@@ -66,6 +67,7 @@
             (machine (single-char #\m) (value #t))
             (nodefaultlibs)
             (nostartfiles)
             (machine (single-char #\m) (value #t))
             (nodefaultlibs)
             (nostartfiles)

+            (nostdinc)

             (nostdlib)
             (preprocess (single-char #\E))
             (std (value #t))
             (nostdlib)
             (preprocess (single-char #\E))
             (std (value #t))


@@ -111,6 +113,10 @@ Usage: mescc [OPTION]... FILE...
   -w,--write=TYPE     dump Nyacc AST using TYPE {pretty-print,write}
   -x LANGUAGE         specify LANGUAGE of the following input files
 
   -w,--write=TYPE     dump Nyacc AST using TYPE {pretty-print,write}
   -x LANGUAGE         specify LANGUAGE of the following input files
 

+Ignored for GCC compatibility
+  -fno-builtin
+  -nostdinc
+

 Environment variables:
 
   MES=BINARY          run on mes-executable BINARY {mes,guile}
 Environment variables:
 
   MES=BINARY          run on mes-executable BINARY {mes,guile}


@@ -126,8 +132,10 @@ General help using GNU software: <http://gnu.org/gethelp/>
 
 (define (mescc:main args)
   (let* ((single-dash-options '("-dumpmachine"
 
 (define (mescc:main args)
   (let* ((single-dash-options '("-dumpmachine"

+                                "-fno-builtin"

                                 "-nodefaultlibs"
                                 "-nostartfiles"
                                 "-nodefaultlibs"
                                 "-nostartfiles"

+                                "-nostdinc"

                                 "-nostdlib"
                                 "-std"))
          (args (map (lambda (o)
                                 "-nostdlib"
                                 "-std"))
          (args (map (lambda (o)