Welcome to mirror list, hosted at ThFree Co, Russian Federation.

github.com/lexborisov/perl-html-myhtml.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'Makefile.PL')
-rwxr-xr-xMakefile.PL49
1 files changed, 2 insertions, 47 deletions
diff --git a/Makefile.PL b/Makefile.PL
index dc4546c..96652cf 100755
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -1,39 +1,12 @@
-package MYINSTALLER;
-
use strict;
use utf8;
use FindBin;
-use File::Find;
use ExtUtils::MakeMaker;
my $myhtml_source_dir = $FindBin::Bin ."/source";
-our ($LIST_COMPILE, $LIST_OBJECTS);
-
-sub find_all_obj_files {
- my ($dir_name) = @_;
-
- my @list;
- my @obj_list;
-
- my $search = sub {
- return unless $_ =~ /\.c$/;
-
- my $obj_name = $_; #$File::Find::name;
- $obj_name =~ s/\.c$/.o/;
-
- push @obj_list, "source/$obj_name";
- push @list, "-o source/$obj_name ". $File::Find::name;
- };
-
- find({ wanted => $search, follow => 1 }, "$dir_name/myhtml");
-
- return (\@list, \@obj_list);
-}
-($LIST_COMPILE, $LIST_OBJECTS) = find_all_obj_files($myhtml_source_dir);
-
-my $fdfdf = WriteMakefile(
+WriteMakefile(
AUTHOR => 'Alexander Borisov <lex.borisov@gmail.com>',
ABSTRACT => 'Fast HTML Parser using Threads with no outside dependencies',
VERSION_FROM => 'MyHTML.pm',
@@ -41,24 +14,6 @@ my $fdfdf = WriteMakefile(
LICENSE => 'Apache 2.0',
LINKTYPE => 'dynamic',
LIBS => ["-lpthread"],
- LDFROM => join(" ", @$LIST_OBJECTS, "MyHTML.o"),
+ CCFLAGS => "--std=c99",
INC => "-I$myhtml_source_dir",
- #MYEXTLIB => "$myhtml_source_dir/myhtml/myhtml.o",
- clean => {FILES => "$myhtml_source_dir/myhtml/*libmyhtml* $myhtml_source_dir/*.o $myhtml_source_dir/myhtml/*.o $myhtml_source_dir/myhtml/utils/*.o"}
);
-
-package MY;
-use Config;
-
-sub postamble {
- my $self = shift;
- my @list;
-
- foreach my $name (@{$MYINSTALLER::LIST_COMPILE}) {
- push @list, "\t". '$(CC) -Wall -Werror -O2 -fPIC --std=c99 -D_POSIX_C_SOURCE=199309L -pthread $(INC) -c '. $name;
- }
-
- return join "\n", @list;
-}
-
-