]> ruderich.org/simon Gitweb - blhc/blhc.git/commitdiff
Store regex for compiler commands in a global variable.
authorSimon Ruderich <simon@ruderich.org>
Thu, 15 Mar 2012 22:54:41 +0000 (23:54 +0100)
committerSimon Ruderich <simon@ruderich.org>
Thu, 15 Mar 2012 22:54:41 +0000 (23:54 +0100)
bin/blhc

index d966f9340248c5331157568f1fe2673f852d99cb..6fb0f21b491ebbd7b4cb4592ea82416e60bcc64d 100755 (executable)
--- a/bin/blhc
+++ b/bin/blhc
@@ -115,6 +115,9 @@ sub pic_pie_conflict {
 
 # CONSTANTS/VARIABLES
 
+# Regex to catch compiler commands.
+my $cc_regex = qr/((?<!\.)cc|(x86_64-linux-gnu-)?gcc|g\+\+|c\+\+)/;
+
 # Regex to catch (GCC) compiler warnings.
 my $warning_regex = qr/^(.+?):([0-9]+):[0-9]+: warning: (.+?) \[(.+?)\]$/;
 
@@ -242,7 +245,7 @@ while (my $line = <>) {
 
         } else {
             # Ignore lines with no compiler commands.
-            next if $line !~ /\b((?<!\.)cc|gcc|g\+\+|c\+\+)(\s|\\)/;
+            next if $line !~ /\b$cc_regex(\s|\\)/;
 
             # Ignore false positives.
             #
@@ -286,7 +289,6 @@ foreach my $line (@input) {
     # Ignore false positives.
     #
     # ./configure summary.
-    my $cc_regex = qr/(cc|(x86_64-linux-gnu-)?gcc|g\+\+|c\+\+)/;
     next if $line =~ /^\s*(C|c)ompiler[\s.]*:\s+$cc_regex(\s-std=[a-z0-9:+]+)?\s*$/
             or $line =~ /^\s*- (CC|CXX)\s*=\s*$cc_regex\s*$/
             or $line =~ /^\s*-- Check for working (C|CXX) compiler: /;