* chew.c (courierize): Don't modify @command params.
This commit is contained in:
parent
7148ab6212
commit
ba994a14fd
|
@ -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.
|
||||
|
||||
|
|
|
@ -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');
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue