Lines Matching refs:comment
123 my $comment;
134 # Handle continued multi-line comment.
176 } elsif (!defined $comment) {
178 $comment = $string;
214 $_ = ""; # If the comment doesn't end, discard the result of the line and set flag
236 $comment = undef;
247 HandleUIString($UIString, $key, $comment, $file, $macroLine);
300 my ($string, $key, $comment, $file, $line) = @_;
313 $comment = UnescapeHexSequence($comment);
314 if (!defined($comment)) {
315 print "$file:$line:ERROR:comment has an illegal hexadecimal escape sequence\n";
326 if (grep { $_ == 0xFFFD } unpack "U*", $comment) {
327 print "$file:$line:ERROR:comment for translation has illegal UTF-8 -- most likely a problem with the Text Encoding of the source file\n";
341 if ($commentByKey{$key} && $commentByKey{$key} ne $comment) {
351 $commentByKey{$key} = $comment;