Lines Matching full:prod
249 my $prod = $fhead;
251 $prod =~ s/\@filename\@/$ARGV[0]/g;
252 $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g;
253 $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g;
254 chomp ($prod);
256 print "$prod\n";
399 my $prod = $fprod;
401 $prod =~ s/\@filename\@/$ARGV/g;
402 $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g;
403 $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g;
404 chomp ($prod);
406 print "$prod\n";
411 my $prod = $eprod;
413 $prod =~ s/\@enum_name\@/$enumsym/g;
414 $prod =~ s/\@EnumName\@/$enumname/g;
415 $prod =~ s/\@ENUMSHORT\@/$enumshort/g;
416 $prod =~ s/\@ENUMNAME\@/$enumlong/g;
417 $prod =~ s/\@ENUMPREFIX\@/$enumname_prefix/g;
418 if ($flags) { $prod =~ s/\@type\@/flags/g; } else { $prod =~ s/\@type\@/enum/g; }
419 if ($flags) { $prod =~ s/\@Type\@/Flags/g; } else { $prod =~ s/\@Type\@/Enum/g; }
420 if ($flags) { $prod =~ s/\@TYPE\@/FLAGS/g; } else { $prod =~ s/\@TYPE\@/ENUM/g; }
421 $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g;
422 $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g;
423 chomp ($prod);
425 print "$prod\n";
429 my $prod = $vhead;
431 $prod =~ s/\@enum_name\@/$enumsym/g;
432 $prod =~ s/\@EnumName\@/$enumname/g;
433 $prod =~ s/\@ENUMSHORT\@/$enumshort/g;
434 $prod =~ s/\@ENUMNAME\@/$enumlong/g;
435 $prod =~ s/\@ENUMPREFIX\@/$enumname_prefix/g;
436 if ($flags) { $prod =~ s/\@type\@/flags/g; } else { $prod =~ s/\@type\@/enum/g; }
437 if ($flags) { $prod =~ s/\@Type\@/Flags/g; } else { $prod =~ s/\@Type\@/Enum/g; }
438 if ($flags) { $prod =~ s/\@TYPE\@/FLAGS/g; } else { $prod =~ s/\@TYPE\@/ENUM/g; }
439 $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g;
440 $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g;
441 chomp ($prod);
443 print "$prod\n";
447 my $prod = $vprod;
449 $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g;
450 $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g;
453 my $tmp_prod = $prod;
467 my $prod = $vtail;
469 $prod =~ s/\@enum_name\@/$enumsym/g;
470 $prod =~ s/\@EnumName\@/$enumname/g;
471 $prod =~ s/\@ENUMSHORT\@/$enumshort/g;
472 $prod =~ s/\@ENUMNAME\@/$enumlong/g;
473 $prod =~ s/\@ENUMPREFIX\@/$enumname_prefix/g;
474 if ($flags) { $prod =~ s/\@type\@/flags/g; } else { $prod =~ s/\@type\@/enum/g; }
475 if ($flags) { $prod =~ s/\@Type\@/Flags/g; } else { $prod =~ s/\@Type\@/Enum/g; }
476 if ($flags) { $prod =~ s/\@TYPE\@/FLAGS/g; } else { $prod =~ s/\@TYPE\@/ENUM/g; }
477 $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g;
478 $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g;
479 chomp ($prod);
481 print "$prod\n";
487 my $prod = $ftail;
489 $prod =~ s/\@filename\@/$ARGV/g;
490 $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g;
491 $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g;
492 chomp ($prod);
494 print "$prod\n";
