From: Simon Ruderich <simon@ruderich.org>
Date: Sun, 18 Mar 2012 00:23:18 +0000 (+0100)
Subject: Use /x to make regex more readable.
X-Git-Tag: 0.01~92
X-Git-Url: https://ruderich.org/simon/gitweb/?a=commitdiff_plain;h=01e6fd1cdcf4eaa755e4a9a6385e971bfe27774e;p=blhc%2Fblhc.git

Use /x to make regex more readable.
---

diff --git a/bin/blhc b/bin/blhc
index ee98a89..527a098 100755
--- a/bin/blhc
+++ b/bin/blhc
@@ -335,7 +335,11 @@ while (my $line = <>) {
             #
             # `./configure` output.
             next if not $non_verbose and $line =~ /^checking /;
-            next if $line =~ /^\s*(?:C )?(?:C|c)ompiler[\s.]*:\s+$cc_regex(?:\s-std=[a-z0-9:+]+)?\s*$/
+            next if $line =~ /^\s*(?:C\s+)?
+                               (?:C|c)ompiler[\s.]*:\s+
+                               $cc_regex
+                               (?:\s-std=[a-z0-9:+]+)?\s*$
+                             /x
                     or $line =~ /^\s*(?:- )?(?:CC|CXX)\s*=\s*$cc_regex\s*$/
                     or $line =~ /^\s*-- Check for working (?:C|CXX) compiler: /
                     or $line =~ /^\s*(?:echo )?Using [A-Z_]+\s*=\s*/;