forked from pool/strace
12 lines
346 B
Diff
12 lines
346 B
Diff
--- strace-graph
|
|
+++ strace-graph
|
|
@@ -229,7 +229,7 @@
|
|
push @$seq, ['EXEC', $filename, $argv];
|
|
|
|
$pr{$pid}{seq} = $seq;
|
|
- } elsif ($call eq 'fork' || $call eq 'clone' || $call eq 'vfork') {
|
|
+ } elsif ($call eq 'fork' || $call eq 'clone' || $call eq 'clone2' || $call eq 'vfork') {
|
|
return if $result == 0;
|
|
|
|
my $seq = $pr{$pid}{seq};
|