diff options
author | Alexey Lebedeff <alebedev@mirantis.com> | 2016-06-21 18:01:54 +0300 |
---|---|---|
committer | Alexey Lebedeff <alebedev@mirantis.com> | 2016-06-21 19:12:01 +0300 |
commit | 0e00f80fb74f8f449eacf237e84a698a5555e7bd (patch) | |
tree | 716d81b173c836a55c21aa04c007426b981b82c0 /make/make_emakefile | |
parent | 9f9841eb7327c9fe73e84e197fd2965a97b639cf (diff) | |
download | erlang-0e00f80fb74f8f449eacf237e84a698a5555e7bd.tar.gz |
Use perl discovered by configure
Diffstat (limited to 'make/make_emakefile')
-rwxr-xr-x | make/make_emakefile | 66 |
1 files changed, 0 insertions, 66 deletions
diff --git a/make/make_emakefile b/make/make_emakefile deleted file mode 100755 index 56440d9bf0..0000000000 --- a/make/make_emakefile +++ /dev/null @@ -1,66 +0,0 @@ -#!/usr/bin/env perl -# -*- cperl -*- - -use strict; - -my $key; -my @opts; -my @modules; -my $m; -my $o; - -foreach (@ARGV) { - if (/^\-I(.+)/) { - push(@opts,"{i,\"$1\"}"); - $key=0; - } - elsif (/^\-o(.+)/) { - push(@opts,"{outdir,\"$1\"}"); - $key=0; - } - elsif (/^\-D(.+)=(.+)/) { - push(@opts,"{d,\'$1\',$2}"); - $key=0; - } - elsif (/^\-D(.+)/) { - push(@opts,"{d,\'$1\'}"); - $key=0; - } - elsif (/^\+(.+)/) { - push(@opts,$1), - $key=0; - } - elsif (/^(\-(.+))$/) { - $key = $1; - } - elsif ($key eq "\-I") { - push(@opts,"{i,\"$_\"}"); - $key=0; - } - elsif ($key eq "\-o") { - push(@opts,"{outdir,\"$_\"}"); - $key=0; - } - elsif ($key) { - print "Warning: Ignoring invalid option \"$key $_\"\n"; - $key=0; - } - else { - push(@modules,"\'$_\'"), - $key=0; - } -}; - -$m = pop(@modules); -print "{[$m"; -foreach (@modules) { - print ",$_"; -}; - -$o = pop(@opts); -print "],[$o"; -foreach (@opts) { - print ",$_"; -}; - -print "]}.\n"; |