equal
deleted
inserted
replaced
478 { |
478 { |
479 case (Text.Info(r, (t1, info)), Text.Info(_, XML.Elem(Markup.Timing(t2), _))) => |
479 case (Text.Info(r, (t1, info)), Text.Info(_, XML.Elem(Markup.Timing(t2), _))) => |
480 Some(Text.Info(r, (t1 + t2, info))) |
480 Some(Text.Info(r, (t1 + t2, info))) |
481 case (prev, Text.Info(r, XML.Elem(Markup.Entity(kind, name), _))) => |
481 case (prev, Text.Info(r, XML.Elem(Markup.Entity(kind, name), _))) => |
482 val kind1 = Word.implode(Word.explode('_', kind)) |
482 val kind1 = Word.implode(Word.explode('_', kind)) |
483 val txt1 = kind1 + " " + quote(name) |
483 val txt1 = |
|
484 if (name == "") kind1 |
|
485 else kind1 + " " + quote(name) |
484 val t = prev.info._1 |
486 val t = prev.info._1 |
485 val txt2 = |
487 val txt2 = |
486 if (kind == Markup.COMMAND && t.elapsed.seconds >= timing_threshold) |
488 if (kind == Markup.COMMAND && t.elapsed.seconds >= timing_threshold) |
487 "\n" + t.message |
489 "\n" + t.message |
488 else "" |
490 else "" |