From eb95ae4fff28a3a243b2fae5a39e9d3359da6256 Mon Sep 17 00:00:00 2001 From: rofl0r Date: Tue, 3 Apr 2012 15:28:01 +0200 Subject: [PATCH] added handy --debug option --- rcb.pl | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/rcb.pl b/rcb.pl index b44a174..450ad69 100755 --- a/rcb.pl +++ b/rcb.pl @@ -141,6 +141,7 @@ my $step = 0; my $ignore_rcb = 0; my $mainfile = undef; my $ignore_errors = 0; +my $debug_cflags = 0; sub scanfile { my ($path, $file) = @_; @@ -192,6 +193,9 @@ if($arg1 eq "--force") { } elsif($arg1 eq "--ignore-errors") { $ignore_errors = 1; goto argscan; +} elsif($arg1 eq "--debug") { + $debug_cflags = 1; + goto argscan; } else { $mainfile = $arg1; } @@ -206,7 +210,10 @@ if (defined($ENV{CC})) { $cc = "cc"; printc "blue", "[RcB] \$CC not set, defaulting to cc\n"; } + my $cflags = defined($ENV{CFLAGS}) ? $ENV{CFLAGS} : ""; +$cflags .= $debug_cflags ? "-O0 -g" : ""; + my $nm; if (defined($ENV{NM})) { $nm = $ENV{NM}; -- 2.11.4.GIT