guile-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: #if __GNUC__ > 2 ..


From: Matt Wette
Subject: Re: #if __GNUC__ > 2 ..
Date: Sun, 18 Jun 2017 14:37:10 -0700

With patch below, this looks to be working.  I will update and release later 
today. — Matt

diff --git a/module/nyacc/lang/c99/cpp.scm b/module/nyacc/lang/c99/cpp.scm
index 7ea57f7..511553a 100644
--- a/module/nyacc/lang/c99/cpp.scm
+++ b/module/nyacc/lang/c99/cpp.scm
@@ -230,7 +230,7 @@
            ((or) (if (and (zero? (ev1 tree)) (zero? (ev2 tree))) 0 1))
            ((and) (if (or (zero? (ev1 tree)) (zero? (ev2 tree))) 0 1))
            ((cond-expr) (if (zero? (ev1 tree)) (ev3 tree) (ev2 tree)))
-           ((ident) (cpp-err "undefined identifier: ~S" (cadr tree)))
+           ((ident) 0)
            (else (error "incomplete implementation"))))))
     (eval-expr tree)))
 
@@ -464,6 +464,7 @@
 
 ;; @deffn {Procedure} eval-cpp-cond-text text defs => string
 ;; Evaluate CPP condition expression (text).
+;; Undefined identifiers are replaced with @code{0}.
 ;; @end deffn
 (define (eval-cpp-cond-text text defs)
   (with-throw-handler




reply via email to

[Prev in Thread] Current Thread [Next in Thread]