Lines Matching refs:PROFILE
3769 local *PROFILE = shift;
3772 read(PROFILE, $firstchar, 1);
3773 seek(PROFILE, -1, 1); # unread the firstchar
3777 while (defined($line = <PROFILE>)) {
3838 open(PROFILE, "<$fname") || error("$fname: $!\n");
3839 binmode PROFILE; # New perls do UTF-8 processing
3840 my $header = ReadProfileHeader(*PROFILE);
3854 $symbols = ReadSymbols(*PROFILE{IO});
3856 $header = ReadProfileHeader(*PROFILE) || "";
3861 $header = ReadProfileHeader(*PROFILE) || "";
3868 $result = ReadHeapProfile($prog, *PROFILE, $header);
3871 $result = ReadHeapProfile($prog, *PROFILE, $header);
3877 $result = ReadSynchProfile($prog, *PROFILE);
3883 $result = ReadSynchProfile($prog, *PROFILE);
3887 $result = ReadCPUProfile($prog, $fname, *PROFILE);
3895 $result = ReadCPUProfile($prog, $fname, *PROFILE);
3898 close(PROFILE);
3939 local *PROFILE = shift;
3947 my $slots = CpuProfileStream->new(*PROFILE, $fname);
3999 seek(PROFILE, $i * 4, 0);
4000 read(PROFILE, $map, (stat PROFILE)[7]);
4042 while (<PROFILE>) {
4097 local *PROFILE = shift;
4187 while (<PROFILE>) {
4190 $map .= ReadMappedLibraries(*PROFILE);
4195 $map .= ReadMemoryMap(*PROFILE);
4245 while (<PROFILE>) {
4248 $map .= ReadMappedLibraries(*PROFILE);
4253 $map .= ReadMemoryMap(*PROFILE);
4300 local *PROFILE = shift;
4320 while ( $line = <PROFILE> ) {