我尝试将某些Google URL Library功能公开为perl模块。基于此处和其他地方的一些帖子,看起来XSPP可能是一个很好的起点。这是我迄今为止创建的内容(从googleurl lib的编译版本开始):
我创建了这个xspp文件(为简洁起见省略了一些方法):
#include "gurl.h"
%typemap{std::string};
%typemap{bool};
%module{Google::URL};
class GURL
{
%name{new} GURL(std::string& url);
~GURL();
bool is_valid();
bool is_empty();
std::string spec();
std::string possibly_invalid_spec();
std::string scheme();
std::string username();
std::string password();
std::string host();
std::string port();
std::string path();
std::string query();
std::string ref();
bool has_scheme();
bool has_username();
bool has_password();
bool has_host();
bool has_port();
bool has_path();
bool has_query();
bool has_ref();
};
我创建了这个Makefile.PL文件:
use 5.012;
use Module::Build::WithXSpp;
my $build = Module::Build::WithXSpp->new(
module_name => 'Google::URL::GURL',
license => 'perl',
extra_typemap_modules => {
'ExtUtils::Typemap::Default' => '0.01',
'ExtUtils::Typemap::STL' => '0.01',
},
extra_linker_flags => '-L../googleurl -lgoogleurl',
extra_compiler_flags => '-I. -I.. -I../googleurl -I../googleurl/base -I../googleurl/src',
);
然后我跑:
perl Makefile.PL && ./Build
..并收到以下错误:
WARNING: the following files are missing in your kit:
GURL.xs
Please inform the author.
Created MYMETA.yml and MYMETA.json
Creating new 'Build' script for 'Google-URL-GURL' version '0.01'
Building Google-URL-GURL
Processing XS typemap files...
Multiple definition of ctype 'std::string' in TYPEMAP section at ~/lib/perlbrew/perls/perl-5.14.2/lib/site_perl/5.14.2/ExtUtils/Typemaps.pm line 819.
有没有xspp经验的人知道可能导致此错误的原因是什么?我可以在上面的GURL.xsp文件中成功运行xspp,它会产生对我来说合理的输出。
答案 0 :(得分:6)
ExtUtils::Typemaps::Default的文档清楚地表明它已包含ExtUtils::Typemaps::STL。如果您从extra_typemaps
中删除后者,则一切正常。