diff options
| author | Attila Molnar <attilamolnar@hush.com> | 2016-09-16 10:54:15 +0200 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2016-09-16 10:54:15 +0200 |
| commit | bdfde49fb6d9a8787c072b759d4af27584308e1b (patch) | |
| tree | 0d79854e65b0de68fd2f85f9a0f8f6f06e6b4aed /make/configure.pm | |
| parent | 926361d233f4e6ea6a3964a070097fe637bd6bed (diff) | |
| parent | 806e57433a38193ae14942ee60f573fe47f4b643 (diff) | |
Merge pull request #1219 from SaberUK/master+directive
Rewrite the build system directive parser.
Diffstat (limited to 'make/configure.pm')
| -rw-r--r-- | make/configure.pm | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/make/configure.pm b/make/configure.pm index 8619d5be2..e88454658 100644 --- a/make/configure.pm +++ b/make/configure.pm @@ -38,7 +38,6 @@ use File::Spec::Functions qw(catfile); use make::common; use make::console; -use make::utilities; use constant CONFIGURE_DIRECTORY => '.configure'; use constant CONFIGURE_CACHE_FILE => catfile(CONFIGURE_DIRECTORY, 'cache.cfg'); @@ -56,7 +55,6 @@ our @EXPORT = qw(CONFIGURE_CACHE_FILE write_configure_cache get_compiler_info find_compiler - get_property parse_templates); sub __get_socketengines { @@ -268,21 +266,6 @@ sub find_compiler { } } -sub get_property($$;$) -{ - my ($file, $property, $default) = @_; - open(MODULE, $file) or return $default; - while (<MODULE>) { - if ($_ =~ /^\/\* \$(\S+): (.+) \*\/$/) { - next unless $1 eq $property; - close(MODULE); - return translate_functions($2, $file); - } - } - close(MODULE); - return $default // ''; -} - sub parse_templates($$$) { # These are actually hash references |