nyacc: new release 0.76.4
authorMatt Wette <matt.wette@gmail.com>
Fri, 24 Feb 2017 01:31:24 +0000 (17:31 -0800)
committerJan Nieuwenhuizen <janneke@gnu.org>
Fri, 24 Feb 2017 01:31:24 +0000 (17:31 -0800)
module/nyacc/README.nyacc
module/nyacc/lalr.scm
module/nyacc/lang/c99/cpp.scm

index 0003ffa69dae2dd11e479fb6a8cc983c09a6e1ad..eb078ff81e94fc580c98e1789e03c4b5dff1a83b 100644 (file)
@@ -1,4 +1,4 @@
-This is a version 0.76.3 of NYACC (Not Yet Another Compiler Compiler!).
+This is a version 0.76.4 of NYACC (Not Yet Another Compiler Compiler!).
 
 Copyright (C) 2015-2017 Matthew R. Wette
 
index 537c43c60f7599fc06179f1f574cb59fa02782b5..2e888f4314078e2331f61499c7d915e9490c6c79 100644 (file)
@@ -50,7 +50,7 @@
   #:use-module (nyacc util)
   )
 
-(define *nyacc-version* "0.76.3")
+(define *nyacc-version* "0.76.4")
 
 
 ;; @deffn proxy-? sym rhs
index 8dc1864d006ed8f378c95a4103e2f2add7445156..898bf6191204dfda1e4540a82987e95747f03b3b 100644 (file)
   ;; return "defined(FOO)" or "defined FOO".
   (define (scan-defined-arg)
     (let* ((ch (skip-il-ws (read-char))) (no-ec (not (char=? ch #\())))
-      (let iter ((chl (list ch)) (ch (read-char)))
+      (let iter ((chl (list ch)) (ch (skip-il-ws (read-char))))
        (cond
         ((eof-object? ch)
          (if no-ec