From: Simon Ruderich <simon@ruderich.org>
Date: Sun, 20 May 2018 10:47:00 +0000 (+0200)
Subject: Add missing //o to regex
X-Git-Tag: 0.09~2
X-Git-Url: https://ruderich.org/simon/gitweb/?a=commitdiff_plain;h=c00a6af3163584d9bbe5f0742f9ed001c202e564;p=blhc%2Fblhc.git

Add missing //o to regex

//o is a performance optimization which tells Perl to never recompile
the regex (per default it's recompiled if any used variable changes).
//o might not be necessary in recent Perl versions but in the past this
check had a measurable performance impact.

So add it for consistency and because we actually never change the
variable.
---

diff --git a/bin/blhc b/bin/blhc
index c2a9d98..193297e 100755
--- a/bin/blhc
+++ b/bin/blhc
@@ -1073,7 +1073,7 @@ foreach my $file (@ARGV) {
             # treated as a normal compiler line.
             next if $line =~ m{^\s*rm\s+};
             # Some build systems emit "gcc > file".
-            next if $line =~ m{$cc_regex_normal\s*>\s*\S+};
+            next if $line =~ m{$cc_regex_normal\s*>\s*\S+}o;
 
             # Check if additional hardening options were used. Used to ensure
             # they are used for the complete build.