我试图将某些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,它会产生对我来说合理的输出。

最佳答案

ExtUtils::Typemaps::Default的文档明确表示它已经包含ExtUtils::Typemaps::STL。如果您从extra_typemaps中删除后者,则应该可以正常工作。

09-25 17:01