Lines Matching refs:PROFILE
3772 local *PROFILE = shift;
3775 read(PROFILE, $firstchar, 1);
3776 seek(PROFILE, -1, 1); # unread the firstchar
3780 while (defined($line = <PROFILE>)) {
3841 open(PROFILE, "<$fname") || error("$fname: $!\n");
3842 binmode PROFILE; # New perls do UTF-8 processing
3843 my $header = ReadProfileHeader(*PROFILE);
3857 $symbols = ReadSymbols(*PROFILE{IO});
3859 $header = ReadProfileHeader(*PROFILE) || "";
3864 $header = ReadProfileHeader(*PROFILE) || "";
3871 $result = ReadHeapProfile($prog, *PROFILE, $header);
3874 $result = ReadHeapProfile($prog, *PROFILE, $header);
3880 $result = ReadSynchProfile($prog, *PROFILE);
3886 $result = ReadSynchProfile($prog, *PROFILE);
3890 $result = ReadCPUProfile($prog, $fname, *PROFILE);
3898 $result = ReadCPUProfile($prog, $fname, *PROFILE);
3901 close(PROFILE);
3942 local *PROFILE = shift;
3950 my $slots = CpuProfileStream->new(*PROFILE, $fname);
4002 seek(PROFILE, $i * 4, 0);
4003 read(PROFILE, $map, (stat PROFILE)[7]);
4045 while (<PROFILE>) {
4100 local *PROFILE = shift;
4190 while (<PROFILE>) {
4193 $map .= ReadMappedLibraries(*PROFILE);
4198 $map .= ReadMemoryMap(*PROFILE);
4248 while (<PROFILE>) {
4251 $map .= ReadMappedLibraries(*PROFILE);
4256 $map .= ReadMemoryMap(*PROFILE);
4303 local *PROFILE = shift;
4323 while ( $line = <PROFILE> ) {