Problems with Show

[Alfredo Torre]

Please, try to run this codes:

CODE 1: NO PROBLEMS
Real OldShow.a = Show(1, "ALL");
Real OldShow.s = Show(1, "STANDARD");
Real OldShow.t = Show(1, "TRACE");
Real OldShow.e = Show(1, "ERROR");

WriteLn(" TRACE ");
WriteLn("<E> ERROR </E>");
WriteLn("<W> WARNING </W>");

CODE 2: NO STANDARD -> NO PROBLEMS
Real OldShow.a = Show(1, "ALL");
Real OldShow.s = Show(0, "STANDARD");
Real OldShow.t = Show(1, "TRACE");
Real OldShow.e = Show(1, "ERROR");

WriteLn(" TRACE ");
WriteLn("<E> ERROR </E>");
WriteLn("<W> WARNING </W>");

CODE 3: NO ALL -> STANDARD MESSAGES ARE SHOWN
Real OldShow.a = Show(0, "ALL");
Real OldShow.s = Show(1, "STANDARD");
Real OldShow.t = Show(1, "TRACE");
Real OldShow.e = Show(1, "ERROR");

WriteLn(" TRACE ");
WriteLn("<E> ERROR </E>");
WriteLn("<W> WARNING </W>");

CODE 4: YES ALL, NO ERROR -> ERROR MESSAGES ARE SHOWN
Real OldShow.a = Show(1, "ALL");
Real OldShow.s = Show(1, "STANDARD");
Real OldShow.t = Show(1, "TRACE");
Real OldShow.e = Show(0, "ERROR");

WriteLn(" TRACE ");
WriteLn("<E> ERROR </E>");
WriteLn("<W> WARNING </W>");

By the way, ¿could it be possible to add the option WARNING for this type of messages?

[Víctor de Buen Remiro]

Sorry by delay and tahanks to report it

[Víctor de Buen Remiro]

Problem has been fixed in CVS a few weeks ago but I forgot to update this bug
report.