mirror of
https://github.com/Zenithsiz/ftmemsim-valgrind.git
synced 2026-02-03 10:05:29 +00:00
40 lines
1.1 KiB
Perl
Executable File
40 lines
1.1 KiB
Perl
Executable File
#! /usr/bin/perl -w
|
|
|
|
use strict;
|
|
|
|
while (<>)
|
|
{
|
|
s/ __getsockname / getsockname /;
|
|
s/ __sigaction / sigaction /;
|
|
s/ __GI___/ __/;
|
|
s/ __([a-z]*)_nocancel / $1 /;
|
|
|
|
# "libSystem*" occurs on Darwin.
|
|
s/\(in \/.*(libc|libSystem).*\)$/(in \/...libc...)/;
|
|
s/\(within \/.*(libc|libSystem).*\)$/(within \/...libc...)/;
|
|
|
|
# Filter out dynamic loader
|
|
s/ \(in \/.*ld-.*so\)$//;
|
|
|
|
# Remove the filename -- on some platforms (eg. Linux) it will be in
|
|
# libc, on some (eg. Darwin) it will be in the main executable.
|
|
s/\(below main\) \(.+\)$/(below main)/;
|
|
|
|
# Merge the different C++ operator variations.
|
|
s/(at.*)__builtin_new/$1...operator new.../;
|
|
s/(at.*)operator new\(unsigned(| int| long)\)/$1...operator new.../;
|
|
|
|
s/(at.*)__builtin_vec_new/$1...operator new.../;
|
|
s/(at.*)operator new\[\]\(unsigned(| int| long)\)/$1...operator new[].../;
|
|
|
|
s/(at.*)__builtin_delete/$1...operator delete.../;
|
|
s/(at.*)operator delete\(void\*\)/$1...operator delete.../;
|
|
|
|
s/(at.*)__builtin_vec_delete/$1...operator delete[].../;
|
|
s/(at.*)operator delete\[\]\(void\*\)/$1...operator delete[].../;
|
|
|
|
print;
|
|
}
|
|
|
|
exit 0;
|