mirror of
https://git.savannah.gnu.org/git/bison.git
synced 2026-03-09 20:33:03 +00:00
* src/files.c (compute_base_names): Add extensions computing when
`--file-prefix' used. Standardize function calls.
This commit is contained in:
@@ -1,3 +1,9 @@
|
||||
2001-08-14 Marc Autret <autret_m@epita.fr>
|
||||
|
||||
* src/files.c (compute_base_names): Add extensions computing when
|
||||
`--file-prefix' used.
|
||||
Standardize function calls.
|
||||
|
||||
2001-08-13 Marc Autret <autret_m@epita.fr>
|
||||
|
||||
* src/bison.simple (YYSTACK_USE_ALLOCA): Changed to allow users
|
||||
|
||||
17
src/files.c
17
src/files.c
@@ -264,11 +264,11 @@ compute_base_names (void)
|
||||
/* if the initial segment of extension contains 'c' or a 'C', I assume
|
||||
that it is a C or C++ source file */
|
||||
if (ext_index)
|
||||
ext_index = (strspn(spec_outfile + ext_index + 1, "cC")) ? ext_index : 0;
|
||||
ext_index = (strspn (spec_outfile + ext_index + 1, "cC")) ? ext_index : 0;
|
||||
if (ext_index)
|
||||
{
|
||||
base_length -= strlen (spec_outfile + ext_index);
|
||||
compute_exts_from_src(spec_outfile + ext_index);
|
||||
compute_exts_from_src (spec_outfile + ext_index);
|
||||
}
|
||||
|
||||
base_name = strndup (spec_outfile, base_length);
|
||||
@@ -295,6 +295,15 @@ compute_base_names (void)
|
||||
strlen (short_base_name) + strlen (EXT_TAB) + 1);
|
||||
stpcpy (stpcpy (base_name, short_base_name), EXT_TAB);
|
||||
|
||||
/* Computes the extensions from the garmmar file name. */
|
||||
ext_index = get_extension_index (infile);
|
||||
/* if the initial segment of extension contains a 'y' or a 'Y', I assume
|
||||
that it is a yacc or bison grammar file */
|
||||
if (ext_index)
|
||||
ext_index = (strspn (infile + ext_index + 1, "yY")) ? ext_index : 0;
|
||||
if (ext_index)
|
||||
compute_exts_from_gf (infile + ext_index);
|
||||
|
||||
return;
|
||||
}
|
||||
|
||||
@@ -314,11 +323,11 @@ compute_base_names (void)
|
||||
/* if the initial segment of extension contains a 'y' or a 'Y', I assume
|
||||
that it is a yacc or bison grammar file */
|
||||
if (ext_index)
|
||||
ext_index = (strspn(name_base + ext_index + 1, "yY")) ? ext_index : 0;
|
||||
ext_index = (strspn (name_base + ext_index + 1, "yY")) ? ext_index : 0;
|
||||
if (ext_index)
|
||||
{
|
||||
base_length -= strlen (name_base + ext_index);
|
||||
compute_exts_from_gf(name_base + ext_index);
|
||||
compute_exts_from_gf (name_base + ext_index);
|
||||
}
|
||||
|
||||
short_base_length = base_length;
|
||||
|
||||
Reference in New Issue
Block a user