Donate to e Foundation | Murena handsets with /e/OS | Own a part of Murena! Learn more

Commit bcec7c21 authored by Mauro Carvalho Chehab's avatar Mauro Carvalho Chehab
Browse files

[media] docs-rst: parse-headers.pl: make debug a command line option 



Add a parser for the --debug option, in order to allow
seeing what the parser is doing.

Acked-by: default avatarJonathan Corbet <corbet@lwn.net>
Signed-off-by: default avatarMauro Carvalho Chehab <mchehab@s-opensource.com>
parent c92bab5e

Documentation/sphinx/parse-headers.pl

+10 −4
Original line number Diff line number Diff line
@@ -2,12 +2,18 @@ 
use strict;

use Text::Tabs;



# Uncomment if debug is needed

#use Data::Dumper;



# change to 1 to generate some debug prints

my $debug = 0;



while ($ARGV[0] =~ m/^-(.*)/) {

	my $cmd = shift @ARGV;

	if ($cmd eq "--debug") {

		require Data::Dumper;

		$debug = 1;

		next;

	}

	die "argument $cmd unknown";

}



if (scalar @ARGV < 2 || scalar @ARGV > 3) {

	die "Usage:\n\t$0 <file in> <file out> [<exceptions file>]\n";

}