* chew.c (courierize): Don't modify @command params.

This commit is contained in:
Alan Modra 2002-01-31 06:23:17 +00:00
parent 7148ab6212
commit ba994a14fd
2 changed files with 36 additions and 22 deletions

View File

@ -1,9 +1,13 @@
2002-01-31 Alan Modra <amodra@bigpond.net.au>
* chew.c (courierize): Don't modify @command params.
2001-10-30 Hans-Peter Nilsson <hp@bitrange.com>
* doc/bfdint.texi (BFD target vector miscellaneous): Add
* bfdint.texi (BFD target vector miscellaneous): Add
bfd_target_mmo_flavour.
* doc/bfd.texinfo (BFD back ends): Add entry for mmo.
* doc/Makefile.am (DOCFILES): Add mmo.texi.
* bfd.texinfo (BFD back ends): Add entry for mmo.
* Makefile.am (DOCFILES): Add mmo.texi.
(SRCDOC): Add mmo.c.
(s-mmo, mmo.texi): New rules.

View File

@ -686,37 +686,47 @@ WORD (courierize)
while (at (tos, idx) && at (tos, idx) != '\n')
{
if (at (tos, idx) == '{' && at (tos, idx + 1) == '*')
if (command > 1)
{
/* We are inside {} parameters of some command;
Just pass through until matching brace. */
if (at (tos, idx) == '{')
++command;
else if (at (tos, idx) == '}')
--command;
}
else if (command != 0)
{
if (at (tos, idx) == '{')
++command;
else if (!islower ((unsigned char) at (tos, idx)))
--command;
}
else if (at (tos, idx) == '@'
&& islower ((unsigned char) at (tos, idx + 1)))
{
++command;
}
else if (at (tos, idx) == '{' && at (tos, idx + 1) == '*')
{
cattext (&out, "/*");
idx += 2;
continue;
}
else if (at (tos, idx) == '*' && at (tos, idx + 1) == '}')
{
cattext (&out, "*/");
idx += 2;
continue;
}
else if (at (tos, idx) == '{' && !command)
else if (at (tos, idx) == '{'
|| at (tos, idx) == '}')
{
cattext (&out, "@{");
idx++;
}
else if (at (tos, idx) == '}' && !command)
{
cattext (&out, "@}");
idx++;
}
else
{
if (at (tos, idx) == '@')
command = 1;
else if (isspace ((unsigned char) at (tos, idx))
|| at (tos, idx) == '}')
command = 0;
catchar (&out, at (tos, idx));
idx++;
catchar (&out, '@');
}
catchar (&out, at (tos, idx));
idx++;
}
catchar (&out, '\n');
}