epita-std/ACU
Archived
1
0
Fork 0
Code Releases Activity

Trace printer handles <who/> tags

Browse Source
This commit is contained in:
Mercier Pierre-Olivier 2014-01-16 23:32:52 +01:00
parent 24df9247e7
commit 767a4f9be2
1 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
ACU/Trace.pm
View File

@ -498,6 +498,14 @@ sub toString($$)
$e->setAttribute("id", $self->{id}); $e->setAttribute("id", $self->{id});
$e->setAttribute("type", $self->{type}); $e->setAttribute("type", $self->{type});
if (defined $self->{who})
{
my $w = $doc->createElement("who");
$w->setAttribute("login", $self->{who}{login});
$w->setAttribute("type", $self->{who}{type}) if (defined $self->{who}{type});
$e->appendChild( $w );
}
for my $k (keys %{ $self->{values} }) for my $k (keys %{ $self->{values} })
{ {
my $v = $doc->createElement("value"); my $v = $doc->createElement("value");