* src/reader.c (parse_skel_decl): New.

(read_declarations): Add case `tok_skel', call parse_skel_decl ().
* src/lex.h (token_t): New token `tok_skel'.
* src/lex.c (percent_table): Add skeleton option entry.
Standardize.

ChangeLog

@@ -1,3 +1,11 @@
+2001-08-29  Marc Autret  <autret_m@epita.fr>
+
+	* src/reader.c (parse_skel_decl): New.
+	(read_declarations): Add case `tok_skel', call parse_skel_decl (). 
+	* src/lex.h (token_t): New token `tok_skel'.
+	* src/lex.c (percent_table): Add skeleton option entry.
+	Standardize.
+
 2001-08-29  Marc Autret  <autret_m@epita.fr>
 
 	* src/bison.simple: Add %%user_code directive at the end.

src/lex.c

@@ -552,11 +552,12 @@ struct percent_table_struct percent_table[] =
   { "file_prefix",	&spec_file_prefix,	tok_setopt },	/* -b */
   { "name_prefix",	&spec_name_prefix,	tok_setopt },	/* -p */
 #endif
-  { "header_extension",	NULL,			tok_hdrext},
+  { "header_extension",	NULL,			tok_hdrext },
-  { "source_extension",	NULL,			tok_srcext},
+  { "source_extension",	NULL,			tok_srcext },
   { "define",		NULL,			tok_define },
   { "verbose",		&verbose_flag,		tok_noop },	/* -v */
   { "debug",		&debug_flag,		tok_noop },	/* -t */
+  { "skeleton",		NULL,			tok_skel },	/* -S */
   { "semantic_parser",	&semantic_parser,	tok_noop },
   { "pure_parser",	&pure_parser,		tok_noop },
 

src/lex.h

@@ -50,6 +50,7 @@ typedef enum token_e
     tok_hdrext,
     tok_srcext,
     tok_define,
+    tok_skel,
     tok_noop,
     tok_setopt,
     tok_illegal,

src/reader.c

@@ -941,6 +941,17 @@ parse_macro_decl (void)
   macro_insert (macro_key, macro_value);
 }
 
+
+/*----------------------------------.
+| Parse what comes after %skeleton. |
+`----------------------------------*/
+
+void
+parse_skel_decl (void)
+{
+  /* Complete with parse_dquoted_param () on the CVS branch 1.29.  */
+}
+
 /*------------------------------------------.
 | Parse what comes after %header_extension. |
 `------------------------------------------*/
@@ -1052,6 +1063,10 @@ read_declarations (void)
 	      parse_macro_decl ();
 	      break;
 	      
+	    case tok_skel:
+	      parse_skel_decl ();
+	      break;
+
 	    case tok_noop:
 	      break;