nyacc: Support enhanced Guile-1.8.

* module/nyacc/lalr.scm: Export process-spec, reserved?.  Use optargs, syncase.
* module/nyacc/lex.scm: Use optargs, syncase.
* module/nyacc/parse.scm: Use optargs.
* module/nyacc/util.scm: Use optargs.
* module/nyacc/lang/util.scm: Use optargs.
* module/nyacc/lang/c99/cpp.scm: Use syncase.
* module/nyacc/lang/c99/parser.scm: Use optargs, syncase.

module/nyacc/lalr.scm

@@ -35,7 +35,11 @@
 	    looking-at first-item
 	    terminal? non-terminal?
 	    range-next
+            process-spec
+            reserved?
 	    )
+  #:use-module (ice-9 optargs)
+  #:use-module (ice-9 syncase)
   #:use-module ((srfi srfi-1) #:select (fold fold-right remove lset-union
 					     lset-intersection lset-difference))
   #:use-module ((srfi srfi-9) #:select (define-record-type))

module/nyacc/lang/c99/cpp.scm

@@ -25,6 +25,7 @@
 	    cpp-expand-text
 	    expand-cpp-mref
 	    )
+  #:use-module (ice-9 syncase)
   #:use-module (nyacc parse)
   #:use-module (nyacc lex)
   #:use-module (nyacc lang util)

module/nyacc/lang/c99/parser.scm

@@ -19,6 +19,8 @@
 
 (define-module (nyacc lang c99 parser)
   #:export (parse-c parse-c99 def-xdef? std-dict)
+  #:use-module (ice-9 optargs)
+  #:use-module (ice-9 syncase)
   #:use-module (nyacc lex)
   #:use-module (nyacc parse)
   #:use-module (nyacc lang util)

module/nyacc/lang/util.scm

@@ -21,6 +21,7 @@
 	    ;; for ???
 	    move-if-changed
             fmterr)
+  #:use-module (ice-9 optargs)
   #:use-module ((srfi srfi-1) #:select(find))
   )
 

module/nyacc/lex.scm

@@ -49,6 +49,8 @@
 	    like-c-ident?
 	    filter-mt remove-mt map-mt make-ident-like-p 
 	    c:ws c:if c:ir)
+  #:use-module (ice-9 optargs)
+  #:use-module (ice-9 syncase)
   #:use-module ((srfi srfi-1) #:select (remove append-reverse))
   #:use-module (ice-9 pretty-print)
   )

module/nyacc/parse.scm

@@ -23,6 +23,7 @@
   #:export (make-lalr-parser
 	    make-lalr-ia-parser
 	    )
+  #:use-module (ice-9 optargs)
   #:use-module (nyacc util)
   #:use-module ((srfi srfi-43) #:select (vector-map vector-for-each))
   )

module/nyacc/util.scm

@@ -28,6 +28,7 @@
 	    ugly-print
 	    tzort
 	    )
+  #:use-module (ice-9 optargs)
   #:use-module ((srfi srfi-43) #:select (vector-fold))
   )