diff options
| author | fukachan <fukachan> | 2004-07-23 13:16:30 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2004-07-23 13:16:30 +0000 |
| commit | 017265cfc701f6abcd99f52a0fa6eb9516fd510f (patch) | |
| tree | 971613cdfec2b93173ad88a8dfa579dc29ba5ac3 /fml/lib/FML/Error/Analyze | |
| parent | 1359417a1475d1530200003dd4005954bff51c50 (diff) | |
| download | fml8-017265cfc701f6abcd99f52a0fa6eb9516fd510f.tar.gz fml8-017265cfc701f6abcd99f52a0fa6eb9516fd510f.tar.bz2 fml8-017265cfc701f6abcd99f52a0fa6eb9516fd510f.zip | |
fix comments (FNF)
Diffstat (limited to 'fml/lib/FML/Error/Analyze')
| -rw-r--r-- | fml/lib/FML/Error/Analyze/histgram.pm | 10 | ||||
| -rw-r--r-- | fml/lib/FML/Error/Analyze/simple_count.pm | 10 |
2 files changed, 10 insertions, 10 deletions
diff --git a/fml/lib/FML/Error/Analyze/histgram.pm b/fml/lib/FML/Error/Analyze/histgram.pm index b7ccaedf..f102aed5 100644 --- a/fml/lib/FML/Error/Analyze/histgram.pm +++ b/fml/lib/FML/Error/Analyze/histgram.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: histgram.pm,v 1.9 2004/04/23 04:10:33 fukachan Exp $ +# $FML: histgram.pm,v 1.10 2004/05/22 06:19:52 fukachan Exp $ # package FML::Error::Analyze::histgram; @@ -17,7 +17,7 @@ my $debug = 1; =head1 NAME -FML::Error::Analyze::histgram - cost evaluator +FML::Error::Analyze::histgram - cost evaluator. =head1 SYNOPSIS @@ -72,7 +72,7 @@ but sum up count as the delta. =cut -# Descriptions: error continuity based cost counting +# Descriptions: error continuity based cost counting. # Arguments: OBJ($self) OBJ($curproc) HASH_REF($data) # Side Effects: none # Return Value: ARRAY_REF @@ -171,7 +171,7 @@ sub _histgram } -# Descriptions: return array list with 0 padding (debug) +# Descriptions: return array list with 0 padding (debug). # Arguments: ARRAY_REF($ra) # Side Effects: none # Return Value: STR @@ -204,7 +204,7 @@ sub summary # Descriptions: return addresses to be removed. # Arguments: OBJ($self) # Side Effects: none -# Return Value: HASH_REF +# Return Value: ARRAY_REF sub removal_address { my ($self) = @_; diff --git a/fml/lib/FML/Error/Analyze/simple_count.pm b/fml/lib/FML/Error/Analyze/simple_count.pm index c88f005d..02187072 100644 --- a/fml/lib/FML/Error/Analyze/simple_count.pm +++ b/fml/lib/FML/Error/Analyze/simple_count.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: simple_count.pm,v 1.8 2004/04/23 04:10:33 fukachan Exp $ +# $FML: simple_count.pm,v 1.9 2004/05/22 06:19:52 fukachan Exp $ # package FML::Error::Analyze::simple_count; @@ -17,7 +17,7 @@ my $debug = 1; =head1 NAME -FML::Error::Analyze::simple_count - simple cost evaluator +FML::Error::Analyze::simple_count - simple cost evaluator. =head1 SYNOPSIS @@ -53,7 +53,7 @@ The cost to sum up varies according to the status code. =cut -# Descriptions: main dispatcher +# Descriptions: main dispatcher. # Arguments: OBJ($self) OBJ($curproc) HASH_REF($data) # Side Effects: none # Return Value: none @@ -142,7 +142,7 @@ sub summary # Descriptions: return addresses to be removed. # Arguments: OBJ($self) # Side Effects: none -# Return Value: HASH_REF +# Return Value: ARRAY_REF sub removal_address { my ($self) = @_; @@ -151,7 +151,7 @@ sub removal_address } -# Descriptions: print address and the summary +# Descriptions: print address and the summary. # Arguments: OBJ($self) STR($addr) # Side Effects: none # Return Value: none |