[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
branch master updated: * tp/maintain/lib/libintl-perl/: synchronize with
From: |
Patrice Dumas |
Subject: |
branch master updated: * tp/maintain/lib/libintl-perl/: synchronize with code archive by removing generated files and adding files that were not present. None of the added/removed files are used/installed in Texinfo. |
Date: |
Fri, 03 Sep 2021 13:28:35 -0400 |
This is an automated email from the git hooks/post-receive script.
pertusus pushed a commit to branch master
in repository texinfo.
The following commit(s) were added to refs/heads/master by this push:
new 359bb1e * tp/maintain/lib/libintl-perl/: synchronize with code
archive by removing generated files and adding files that were not present.
None of the added/removed files are used/installed in Texinfo.
359bb1e is described below
commit 359bb1e895cb43ad19183598305729cdb66a6291
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Fri Sep 3 19:28:26 2021 +0200
* tp/maintain/lib/libintl-perl/: synchronize with code archive
by removing generated files and adding files that were not present.
None of the added/removed files are used/installed in Texinfo.
---
ChangeLog | 6 +
tp/TODO | 6 +-
tp/maintain/lib/libintl-perl/MYMETA.json | 55 --
tp/maintain/lib/libintl-perl/MYMETA.yml | 30 -
.../lib/libintl-perl/gettext_xs/MYMETA.json | 42 --
tp/maintain/lib/libintl-perl/gettext_xs/MYMETA.yml | 23 -
.../lib/libintl-perl/gettext_xs/gettext_xs.bs | 0
.../lib/libintl-perl/gettext_xs/gettext_xs.c | 768 ---------------------
tp/maintain/lib/libintl-perl/gettext_xs/pm_to_blib | 0
tp/maintain/lib/libintl-perl/pm_to_blib | 0
.../lib/libintl-perl/sample/simplecal/po/Makefile | 84 +++
tp/maintain/lib/libintl-perl/tests/po/Makefile | 47 ++
tp/maintain/lib/libintl-perl/xs_disabled | 0
13 files changed, 139 insertions(+), 922 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 06ca7f2..0c55504 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,11 @@
2021-09-03 Patrice Dumas <pertusus@free.fr>
+ * tp/maintain/lib/libintl-perl/: synchronize with code archive
+ by removing generated files and adding files that were not present.
+ None of the added/removed files are used/installed in Texinfo.
+
+2021-09-03 Patrice Dumas <pertusus@free.fr>
+
* tp/Texinfo/Convert/Converter.pm, tp/Texinfo/Convert/DocBook.pm,
tp/Texinfo/Convert/HTML.pm, tp/Texinfo/Convert/TexinfoXML.pm,
tp/init/chm.pm, tp/init/html32.pm, util/txixml2texi.pl: replace
diff --git a/tp/TODO b/tp/TODO
index 19efb24..4b4aaf7 100644
--- a/tp/TODO
+++ b/tp/TODO
@@ -20,15 +20,13 @@ Rename _set_global_multiple_commands
Real API for Texinfo::Config used in html32.pm.
-remettre libint-perl
-
-
check @{$converter_options->{'INCLUDE_DIRECTORIES'}} with more
than one output file
FIXME isn't that done for each output file?
+Move code around:
-COmmon.pm float_name_caption to Convert::Common
+Common.pm float_name_caption to Convert::Common
sub definition_category($$) to Convert::Common
expand_today to Convert::Common
translated_command_tree Convert::Common
diff --git a/tp/maintain/lib/libintl-perl/MYMETA.json
b/tp/maintain/lib/libintl-perl/MYMETA.json
deleted file mode 100644
index d2e5c3f..0000000
--- a/tp/maintain/lib/libintl-perl/MYMETA.json
+++ /dev/null
@@ -1,55 +0,0 @@
-{
- "abstract" : "High-Level Interface to Uniforum Message Translation",
- "author" : [
- "Guido Flohr <guido.flohr@cantanea.com>"
- ],
- "dynamic_config" : 0,
- "generated_by" : "ExtUtils::MakeMaker version 7.44, CPAN::Meta::Converter
version 2.150010",
- "license" : [
- "unknown"
- ],
- "meta-spec" : {
- "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec",
- "version" : "2"
- },
- "name" : "libintl-perl",
- "no_index" : {
- "directory" : [
- "t",
- "inc"
- ]
- },
- "prereqs" : {
- "build" : {
- "requires" : {
- "ExtUtils::MakeMaker" : "0"
- }
- },
- "configure" : {
- "requires" : {
- "ExtUtils::MakeMaker" : "0"
- }
- },
- "runtime" : {
- "recommends" : {
- "File::ShareDir" : "0"
- },
- "requires" : {
- "File::Spec" : "0",
- "version" : "0.77"
- }
- }
- },
- "release_status" : "stable",
- "resources" : {
- "bugtracker" : {
- "web" : "https://github.com/gflohr/libintl-perl/issues"
- },
- "homepage" : "http://www.guido-flohr.net/en/projects/",
- "repository" : {
- "url" : "https://github.com/gflohr/libintl-perl.git"
- }
- },
- "version" : "1.32",
- "x_serialization_backend" : "JSON::PP version 2.27400_02"
-}
diff --git a/tp/maintain/lib/libintl-perl/MYMETA.yml
b/tp/maintain/lib/libintl-perl/MYMETA.yml
deleted file mode 100644
index 1008f8e..0000000
--- a/tp/maintain/lib/libintl-perl/MYMETA.yml
+++ /dev/null
@@ -1,30 +0,0 @@
----
-abstract: 'High-Level Interface to Uniforum Message Translation'
-author:
- - 'Guido Flohr <guido.flohr@cantanea.com>'
-build_requires:
- ExtUtils::MakeMaker: '0'
-configure_requires:
- ExtUtils::MakeMaker: '0'
-dynamic_config: 0
-generated_by: 'ExtUtils::MakeMaker version 7.44, CPAN::Meta::Converter version
2.150010'
-license: unknown
-meta-spec:
- url: http://module-build.sourceforge.net/META-spec-v1.4.html
- version: '1.4'
-name: libintl-perl
-no_index:
- directory:
- - t
- - inc
-recommends:
- File::ShareDir: '0'
-requires:
- File::Spec: '0'
- version: '0.77'
-resources:
- bugtracker: https://github.com/gflohr/libintl-perl/issues
- homepage: http://www.guido-flohr.net/en/projects/
- repository: https://github.com/gflohr/libintl-perl.git
-version: '1.32'
-x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff --git a/tp/maintain/lib/libintl-perl/gettext_xs/MYMETA.json
b/tp/maintain/lib/libintl-perl/gettext_xs/MYMETA.json
deleted file mode 100644
index cec595e..0000000
--- a/tp/maintain/lib/libintl-perl/gettext_xs/MYMETA.json
+++ /dev/null
@@ -1,42 +0,0 @@
-{
- "abstract" : "XS Interface to Uniforum Message Translation",
- "author" : [
- "Guido Flohr <guido.flohr@cantanea.com>"
- ],
- "dynamic_config" : 0,
- "generated_by" : "ExtUtils::MakeMaker version 7.24, CPAN::Meta::Converter
version 2.150010",
- "license" : [
- "unknown"
- ],
- "meta-spec" : {
- "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec",
- "version" : "2"
- },
- "name" : "Locale-gettext_xs",
- "no_index" : {
- "directory" : [
- "t",
- "inc"
- ]
- },
- "prereqs" : {
- "build" : {
- "requires" : {
- "ExtUtils::MakeMaker" : "0"
- }
- },
- "configure" : {
- "requires" : {
- "ExtUtils::MakeMaker" : "0"
- }
- },
- "runtime" : {
- "requires" : {
- "File::Spec" : "0"
- }
- }
- },
- "release_status" : "stable",
- "version" : "1.32",
- "x_serialization_backend" : "JSON::PP version 2.27400_02"
-}
diff --git a/tp/maintain/lib/libintl-perl/gettext_xs/MYMETA.yml
b/tp/maintain/lib/libintl-perl/gettext_xs/MYMETA.yml
deleted file mode 100644
index 05b6f9d..0000000
--- a/tp/maintain/lib/libintl-perl/gettext_xs/MYMETA.yml
+++ /dev/null
@@ -1,23 +0,0 @@
----
-abstract: 'XS Interface to Uniforum Message Translation'
-author:
- - 'Guido Flohr <guido.flohr@cantanea.com>'
-build_requires:
- ExtUtils::MakeMaker: '0'
-configure_requires:
- ExtUtils::MakeMaker: '0'
-dynamic_config: 0
-generated_by: 'ExtUtils::MakeMaker version 7.24, CPAN::Meta::Converter version
2.150010'
-license: unknown
-meta-spec:
- url: http://module-build.sourceforge.net/META-spec-v1.4.html
- version: '1.4'
-name: Locale-gettext_xs
-no_index:
- directory:
- - t
- - inc
-requires:
- File::Spec: '0'
-version: '1.32'
-x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff --git a/tp/maintain/lib/libintl-perl/gettext_xs/gettext_xs.bs
b/tp/maintain/lib/libintl-perl/gettext_xs/gettext_xs.bs
deleted file mode 100644
index e69de29..0000000
diff --git a/tp/maintain/lib/libintl-perl/gettext_xs/gettext_xs.c
b/tp/maintain/lib/libintl-perl/gettext_xs/gettext_xs.c
deleted file mode 100644
index 60c756d..0000000
--- a/tp/maintain/lib/libintl-perl/gettext_xs/gettext_xs.c
+++ /dev/null
@@ -1,768 +0,0 @@
-/*
- * This file was generated automatically by ExtUtils::ParseXS version 3.34
from the
- * contents of gettext_xs.xs. Do not edit this file, edit gettext_xs.xs
instead.
- *
- * ANY CHANGES MADE HERE WILL BE LOST!
- *
- */
-
-#line 1 "gettext_xs.xs"
-/* -*- C -*- */
-/*
-# Perl binding for Uniforum message translation.
-# Copyright (C) 2002-2017 Guido Flohr <guido.flohr@cantanea.com>,
-# all rights reserved.
-
-# This program is free software: you can redistribute it and/or modify
-# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 3 of the License, or
-# (at your option) any later version.
-
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-# GNU General Public License for more details.
-
-# You should have received a copy of the GNU General Public License
-# along with this program. If not, see <http://www.gnu.org/licenses/>. */
-
-#include "EXTERN.h"
-#include "perl.h"
-#include "XSUB.h"
-#include <string.h>
-#include <locale.h>
-#include <libintl.h>
-/* Handle the case that we link against GNU libintl but include a non
- * GNU libintl.h. */
-#ifndef __USE_GNU_GETTEXT
-# error "<libintl.h> is not GNU gettext. Maybe you have to adjust your
include path."
-#endif
-
-#line 42 "gettext_xs.c"
-#ifndef PERL_UNUSED_VAR
-# define PERL_UNUSED_VAR(var) if (0) var = var
-#endif
-
-#ifndef dVAR
-# define dVAR dNOOP
-#endif
-
-
-/* This stuff is not part of the API! You have been warned. */
-#ifndef PERL_VERSION_DECIMAL
-# define PERL_VERSION_DECIMAL(r,v,s) (r*1000000 + v*1000 + s)
-#endif
-#ifndef PERL_DECIMAL_VERSION
-# define PERL_DECIMAL_VERSION \
- PERL_VERSION_DECIMAL(PERL_REVISION,PERL_VERSION,PERL_SUBVERSION)
-#endif
-#ifndef PERL_VERSION_GE
-# define PERL_VERSION_GE(r,v,s) \
- (PERL_DECIMAL_VERSION >= PERL_VERSION_DECIMAL(r,v,s))
-#endif
-#ifndef PERL_VERSION_LE
-# define PERL_VERSION_LE(r,v,s) \
- (PERL_DECIMAL_VERSION <= PERL_VERSION_DECIMAL(r,v,s))
-#endif
-
-/* XS_INTERNAL is the explicit static-linkage variant of the default
- * XS macro.
- *
- * XS_EXTERNAL is the same as XS_INTERNAL except it does not include
- * "STATIC", ie. it exports XSUB symbols. You probably don't want that
- * for anything but the BOOT XSUB.
- *
- * See XSUB.h in core!
- */
-
-
-/* TODO: This might be compatible further back than 5.10.0. */
-#if PERL_VERSION_GE(5, 10, 0) && PERL_VERSION_LE(5, 15, 1)
-# undef XS_EXTERNAL
-# undef XS_INTERNAL
-# if defined(__CYGWIN__) && defined(USE_DYNAMIC_LOADING)
-# define XS_EXTERNAL(name) __declspec(dllexport) XSPROTO(name)
-# define XS_INTERNAL(name) STATIC XSPROTO(name)
-# endif
-# if defined(__SYMBIAN32__)
-# define XS_EXTERNAL(name) EXPORT_C XSPROTO(name)
-# define XS_INTERNAL(name) EXPORT_C STATIC XSPROTO(name)
-# endif
-# ifndef XS_EXTERNAL
-# if defined(HASATTRIBUTE_UNUSED) && !defined(__cplusplus)
-# define XS_EXTERNAL(name) void name(pTHX_ CV* cv __attribute__unused__)
-# define XS_INTERNAL(name) STATIC void name(pTHX_ CV* cv
__attribute__unused__)
-# else
-# ifdef __cplusplus
-# define XS_EXTERNAL(name) extern "C" XSPROTO(name)
-# define XS_INTERNAL(name) static XSPROTO(name)
-# else
-# define XS_EXTERNAL(name) XSPROTO(name)
-# define XS_INTERNAL(name) STATIC XSPROTO(name)
-# endif
-# endif
-# endif
-#endif
-
-/* perl >= 5.10.0 && perl <= 5.15.1 */
-
-
-/* The XS_EXTERNAL macro is used for functions that must not be static
- * like the boot XSUB of a module. If perl didn't have an XS_EXTERNAL
- * macro defined, the best we can do is assume XS is the same.
- * Dito for XS_INTERNAL.
- */
-#ifndef XS_EXTERNAL
-# define XS_EXTERNAL(name) XS(name)
-#endif
-#ifndef XS_INTERNAL
-# define XS_INTERNAL(name) XS(name)
-#endif
-
-/* Now, finally, after all this mess, we want an ExtUtils::ParseXS
- * internal macro that we're free to redefine for varying linkage due
- * to the EXPORT_XSUB_SYMBOLS XS keyword. This is internal, use
- * XS_EXTERNAL(name) or XS_INTERNAL(name) in your code if you need to!
- */
-
-#undef XS_EUPXS
-#if defined(PERL_EUPXS_ALWAYS_EXPORT)
-# define XS_EUPXS(name) XS_EXTERNAL(name)
-#else
- /* default to internal */
-# define XS_EUPXS(name) XS_INTERNAL(name)
-#endif
-
-#ifndef PERL_ARGS_ASSERT_CROAK_XS_USAGE
-#define PERL_ARGS_ASSERT_CROAK_XS_USAGE assert(cv); assert(params)
-
-/* prototype to pass -Wmissing-prototypes */
-STATIC void
-S_croak_xs_usage(const CV *const cv, const char *const params);
-
-STATIC void
-S_croak_xs_usage(const CV *const cv, const char *const params)
-{
- const GV *const gv = CvGV(cv);
-
- PERL_ARGS_ASSERT_CROAK_XS_USAGE;
-
- if (gv) {
- const char *const gvname = GvNAME(gv);
- const HV *const stash = GvSTASH(gv);
- const char *const hvname = stash ? HvNAME(stash) : NULL;
-
- if (hvname)
- Perl_croak_nocontext("Usage: %s::%s(%s)", hvname, gvname, params);
- else
- Perl_croak_nocontext("Usage: %s(%s)", gvname, params);
- } else {
- /* Pants. I don't think that it should be possible to get here. */
- Perl_croak_nocontext("Usage: CODE(0x%" UVxf ")(%s)", PTR2UV(cv),
params);
- }
-}
-#undef PERL_ARGS_ASSERT_CROAK_XS_USAGE
-
-#define croak_xs_usage S_croak_xs_usage
-
-#endif
-
-/* NOTE: the prototype of newXSproto() is different in versions of perls,
- * so we define a portable version of newXSproto()
- */
-#ifdef newXS_flags
-#define newXSproto_portable(name, c_impl, file, proto) newXS_flags(name,
c_impl, file, proto, 0)
-#else
-#define newXSproto_portable(name, c_impl, file, proto) (PL_Sv=(SV*)newXS(name,
c_impl, file), sv_setpv(PL_Sv, proto), (CV*)PL_Sv)
-#endif /* !defined(newXS_flags) */
-
-#if PERL_VERSION_LE(5, 21, 5)
-# define newXS_deffile(a,b) Perl_newXS(aTHX_ a,b,file)
-#else
-# define newXS_deffile(a,b) Perl_newXS_deffile(aTHX_ a,b)
-#endif
-
-#line 186 "gettext_xs.c"
-
-XS_EUPXS(XS_Locale__gettext_xs___gettext_xs_version); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs___gettext_xs_version)
-{
- dVAR; dXSARGS;
- if (items != 0)
- croak_xs_usage(cv, "");
- {
- char * RETVAL;
- dXSTARG;
-#line 39 "gettext_xs.xs"
- RETVAL = (VERSION);
-#line 199 "gettext_xs.c"
- sv_setpv(TARG, RETVAL); XSprePUSH; PUSHTARG;
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs_LC_CTYPE); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs_LC_CTYPE)
-{
- dVAR; dXSARGS;
- if (items != 0)
- croak_xs_usage(cv, "");
- {
- double RETVAL;
- dXSTARG;
-#line 46 "gettext_xs.xs"
- RETVAL = (double) LC_CTYPE;
-#line 217 "gettext_xs.c"
- XSprePUSH; PUSHn((double)RETVAL);
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs_LC_NUMERIC); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs_LC_NUMERIC)
-{
- dVAR; dXSARGS;
- if (items != 0)
- croak_xs_usage(cv, "");
- {
- double RETVAL;
- dXSTARG;
-#line 53 "gettext_xs.xs"
- RETVAL = (double) LC_NUMERIC;
-#line 235 "gettext_xs.c"
- XSprePUSH; PUSHn((double)RETVAL);
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs_LC_TIME); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs_LC_TIME)
-{
- dVAR; dXSARGS;
- if (items != 0)
- croak_xs_usage(cv, "");
- {
- double RETVAL;
- dXSTARG;
-#line 60 "gettext_xs.xs"
- RETVAL = (double) LC_TIME;
-#line 253 "gettext_xs.c"
- XSprePUSH; PUSHn((double)RETVAL);
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs_LC_COLLATE); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs_LC_COLLATE)
-{
- dVAR; dXSARGS;
- if (items != 0)
- croak_xs_usage(cv, "");
- {
- double RETVAL;
- dXSTARG;
-#line 67 "gettext_xs.xs"
- RETVAL = (double) LC_COLLATE;
-#line 271 "gettext_xs.c"
- XSprePUSH; PUSHn((double)RETVAL);
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs_LC_MONETARY); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs_LC_MONETARY)
-{
- dVAR; dXSARGS;
- if (items != 0)
- croak_xs_usage(cv, "");
- {
- double RETVAL;
- dXSTARG;
-#line 74 "gettext_xs.xs"
- RETVAL = (double) LC_MONETARY;
-#line 289 "gettext_xs.c"
- XSprePUSH; PUSHn((double)RETVAL);
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs_LC_MESSAGES); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs_LC_MESSAGES)
-{
- dVAR; dXSARGS;
- if (items != 0)
- croak_xs_usage(cv, "");
- {
- double RETVAL;
- dXSTARG;
-#line 81 "gettext_xs.xs"
- RETVAL = (double) LC_MESSAGES;
-#line 307 "gettext_xs.c"
- XSprePUSH; PUSHn((double)RETVAL);
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs_LC_ALL); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs_LC_ALL)
-{
- dVAR; dXSARGS;
- if (items != 0)
- croak_xs_usage(cv, "");
- {
- double RETVAL;
- dXSTARG;
-#line 88 "gettext_xs.xs"
- RETVAL = (double) LC_ALL;
-#line 325 "gettext_xs.c"
- XSprePUSH; PUSHn((double)RETVAL);
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs_gettext); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs_gettext)
-{
- dVAR; dXSARGS;
- if (items != 1)
- croak_xs_usage(cv, "msgid");
- {
- char* msgid = (char *)SvPV_nolen(ST(0))
-;
- char * RETVAL;
- dXSTARG;
-#line 97 "gettext_xs.xs"
- RETVAL = (char*) gettext (msgid);
-#line 345 "gettext_xs.c"
- sv_setpv(TARG, RETVAL); XSprePUSH; PUSHTARG;
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs_dgettext); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs_dgettext)
-{
- dVAR; dXSARGS;
- if (items != 2)
- croak_xs_usage(cv, "domainname, msgid");
- {
- char* domainname = (char *)SvPV_nolen(ST(0))
-;
- char* msgid = (char *)SvPV_nolen(ST(1))
-;
- char * RETVAL;
- dXSTARG;
-#line 107 "gettext_xs.xs"
- RETVAL = (char*) dgettext (domainname, msgid);
-#line 367 "gettext_xs.c"
- sv_setpv(TARG, RETVAL); XSprePUSH; PUSHTARG;
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs_dcgettext); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs_dcgettext)
-{
- dVAR; dXSARGS;
- if (items != 3)
- croak_xs_usage(cv, "domainname, msgid, category");
- {
- char* domainname = (char *)SvPV_nolen(ST(0))
-;
- char* msgid = (char *)SvPV_nolen(ST(1))
-;
- int category = (int)SvIV(ST(2))
-;
- char * RETVAL;
- dXSTARG;
-#line 118 "gettext_xs.xs"
- RETVAL = (char*) dcgettext (domainname, msgid, category);
-#line 391 "gettext_xs.c"
- sv_setpv(TARG, RETVAL); XSprePUSH; PUSHTARG;
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs_ngettext); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs_ngettext)
-{
- dVAR; dXSARGS;
- if (items != 3)
- croak_xs_usage(cv, "msgid1, msgid2, n");
- {
- char* msgid1 = (char *)SvPV_nolen(ST(0))
-;
- char* msgid2 = (char *)SvPV_nolen(ST(1))
-;
- unsigned long n = (unsigned long)SvUV(ST(2))
-;
- char * RETVAL;
- dXSTARG;
-#line 129 "gettext_xs.xs"
- RETVAL = (char*) ngettext (msgid1, msgid2, n);
-#line 415 "gettext_xs.c"
- sv_setpv(TARG, RETVAL); XSprePUSH; PUSHTARG;
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs_dngettext); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs_dngettext)
-{
- dVAR; dXSARGS;
- if (items != 4)
- croak_xs_usage(cv, "domainname, msgid1, msgid2, n");
- {
- char* domainname = (char *)SvPV_nolen(ST(0))
-;
- char* msgid1 = (char *)SvPV_nolen(ST(1))
-;
- char* msgid2 = (char *)SvPV_nolen(ST(2))
-;
- unsigned long n = (unsigned long)SvUV(ST(3))
-;
- char * RETVAL;
- dXSTARG;
-#line 141 "gettext_xs.xs"
- RETVAL = (char*) dngettext (domainname, msgid1, msgid2, n);
-#line 441 "gettext_xs.c"
- sv_setpv(TARG, RETVAL); XSprePUSH; PUSHTARG;
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs_dcngettext); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs_dcngettext)
-{
- dVAR; dXSARGS;
- if (items != 5)
- croak_xs_usage(cv, "domainname, msgid1, msgid2, n, category");
- {
- char* domainname = (char *)SvPV_nolen(ST(0))
-;
- char* msgid1 = (char *)SvPV_nolen(ST(1))
-;
- char* msgid2 = (char *)SvPV_nolen(ST(2))
-;
- unsigned long n = (unsigned long)SvUV(ST(3))
-;
- int category = (int)SvIV(ST(4))
-;
- char * RETVAL;
- dXSTARG;
-#line 154 "gettext_xs.xs"
- RETVAL = (char*) dcngettext (domainname, msgid1, msgid2, n, category);
-#line 469 "gettext_xs.c"
- sv_setpv(TARG, RETVAL); XSprePUSH; PUSHTARG;
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs__pgettext_aux); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs__pgettext_aux)
-{
- dVAR; dXSARGS;
- if (items != 4)
- croak_xs_usage(cv, "domain, msg_ctxt_id, msgid, category");
- {
- char* domain = (char *)SvPV_nolen(ST(0))
-;
- char* msg_ctxt_id = (char *)SvPV_nolen(ST(1))
-;
- char* msgid = (char *)SvPV_nolen(ST(2))
-;
- int category = (int)SvIV(ST(3))
-;
-#line 166 "gettext_xs.xs"
- char* translation;
-#line 493 "gettext_xs.c"
- char * RETVAL;
- dXSTARG;
-#line 168 "gettext_xs.xs"
- /* Treat empty or undefined strings as NULL. */
- if (!domain || domain[0] == '\000')
- domain = NULL;
- /* Treat -1 as null, and default to LC_MESSAGES */
- if (category == -1)
- category = LC_MESSAGES;
- /* reimplemented from gettext-0.17 */
- translation = (char*) dcgettext (domain, msg_ctxt_id, category);
- if (translation == msg_ctxt_id)
- RETVAL = msgid;
- else
- RETVAL = translation;
-#line 509 "gettext_xs.c"
- sv_setpv(TARG, RETVAL); XSprePUSH; PUSHTARG;
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs__npgettext_aux); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs__npgettext_aux)
-{
- dVAR; dXSARGS;
- if (items != 6)
- croak_xs_usage(cv, "domain, msg_ctxt_id, msgid1, msgid2, n, category");
- {
- char* domain = (char *)SvPV_nolen(ST(0))
-;
- char* msg_ctxt_id = (char *)SvPV_nolen(ST(1))
-;
- char* msgid1 = (char *)SvPV_nolen(ST(2))
-;
- char* msgid2 = (char *)SvPV_nolen(ST(3))
-;
- unsigned long n = (unsigned long)SvUV(ST(4))
-;
- int category = (int)SvIV(ST(5))
-;
-#line 193 "gettext_xs.xs"
- char* translation;
-#line 537 "gettext_xs.c"
- char * RETVAL;
- dXSTARG;
-#line 195 "gettext_xs.xs"
- /* Treat empty or undefined strings as NULL. */
- if (!domain || domain[0] == '\000')
- domain = NULL;
- /* Treat -1 as null, and default to LC_MESSAGES */
- if (category == -1)
- category = LC_MESSAGES;
- translation = (char*) dcngettext (domain, msg_ctxt_id, msgid2, n,
category);
- if (translation == msg_ctxt_id || translation == msgid2)
- RETVAL = (n == 1 ? msgid1 : msgid2);
- else
- RETVAL = translation;
-#line 552 "gettext_xs.c"
- sv_setpv(TARG, RETVAL); XSprePUSH; PUSHTARG;
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs__textdomain); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs__textdomain)
-{
- dVAR; dXSARGS;
- if (items != 1)
- croak_xs_usage(cv, "domain");
- {
- char* domain = (char *)SvPV_nolen(ST(0))
-;
- char * RETVAL;
- dXSTARG;
-#line 216 "gettext_xs.xs"
- /* Treat empty or undefined strings as NULL. */
- if (!domain || domain[0] == '\000')
- domain = NULL;
- RETVAL = (char*) textdomain (domain);
- if (!RETVAL || RETVAL[0] == '\000') {
- XSRETURN_UNDEF;
- }
-#line 578 "gettext_xs.c"
- sv_setpv(TARG, RETVAL); XSprePUSH; PUSHTARG;
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs__nl_putenv); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs__nl_putenv)
-{
- dVAR; dXSARGS;
- if (items != 1)
- croak_xs_usage(cv, "str");
- {
- char* str = (char *)SvPV_nolen(ST(0))
-;
- int RETVAL;
- dXSTARG;
-#line 233 "gettext_xs.xs"
-#if defined (WIN32)
- RETVAL = _putenv (str);
-#else
- RETVAL = 0;
-#endif
-#line 602 "gettext_xs.c"
- XSprePUSH; PUSHi((IV)RETVAL);
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs__bindtextdomain); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs__bindtextdomain)
-{
- dVAR; dXSARGS;
- if (items < 0 || items > 2)
- croak_xs_usage(cv, "domain = NULL, dirname = NULL");
- {
- char* domain;
- char* dirname;
- char * RETVAL;
- dXSTARG;
-
- if (items < 1)
- domain = NULL;
- else {
- domain = (char *)SvPV_nolen(ST(0))
-;
- }
-
- if (items < 2)
- dirname = NULL;
- else {
- dirname = (char *)SvPV_nolen(ST(1))
-;
- }
-#line 247 "gettext_xs.xs"
- /* Treat empty or undefined strings as NULL. */
- if (!domain || domain[0] == '\000')
- XSRETURN_UNDEF;
- if (!dirname || dirname[0] == '\000')
- dirname = NULL;
- RETVAL = (char*) bindtextdomain (domain, dirname);
- if (!RETVAL || RETVAL[0] == '\000') {
- XSRETURN_UNDEF;
- }
-
-#line 645 "gettext_xs.c"
- sv_setpv(TARG, RETVAL); XSprePUSH; PUSHTARG;
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs_bind_textdomain_codeset); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs_bind_textdomain_codeset)
-{
- dVAR; dXSARGS;
- if (items != 2)
- croak_xs_usage(cv, "domainname, codeset");
- {
- char* domainname = (char *)SvPV_nolen(ST(0))
-;
- char* codeset = (char *)SvPV_nolen(ST(1))
-;
- char * RETVAL;
- dXSTARG;
-#line 267 "gettext_xs.xs"
- /* Treat empty or undefined strings as NULL. */
- if (!domainname || domainname[0] == '\000')
- domainname = NULL;
- if (!codeset || codeset[0] == '\000')
- codeset = NULL;
- RETVAL = (char*) bind_textdomain_codeset (domainname, codeset);
- if (!RETVAL || RETVAL[0] == '\000') {
- XSRETURN_UNDEF;
- }
-
-#line 676 "gettext_xs.c"
- sv_setpv(TARG, RETVAL); XSprePUSH; PUSHTARG;
- }
- XSRETURN(1);
-}
-
-
-XS_EUPXS(XS_Locale__gettext_xs_setlocale); /* prototype to pass
-Wmissing-prototypes */
-XS_EUPXS(XS_Locale__gettext_xs_setlocale)
-{
- dVAR; dXSARGS;
- if (items < 1 || items > 2)
- croak_xs_usage(cv, "category, locale = NULL");
- {
- int category = (int)SvIV(ST(0))
-;
- char * locale;
- char * RETVAL;
- dXSTARG;
-
- if (items < 2)
- locale = NULL;
- else {
- locale = (char *)SvPV_nolen(ST(1))
-;
- }
-#line 285 "gettext_xs.xs"
- RETVAL = (char*) setlocale (category, locale);
-#line 704 "gettext_xs.c"
- sv_setpv(TARG, RETVAL); XSprePUSH; PUSHTARG;
- }
- XSRETURN(1);
-}
-
-#ifdef __cplusplus
-extern "C"
-#endif
-XS_EXTERNAL(boot_Locale__gettext_xs); /* prototype to pass
-Wmissing-prototypes */
-XS_EXTERNAL(boot_Locale__gettext_xs)
-{
-#if PERL_VERSION_LE(5, 21, 5)
- dVAR; dXSARGS;
-#else
- dVAR; dXSBOOTARGSXSAPIVERCHK;
-#endif
-#if (PERL_REVISION == 5 && PERL_VERSION < 9)
- char* file = __FILE__;
-#else
- const char* file = __FILE__;
-#endif
-
- PERL_UNUSED_VAR(file);
-
- PERL_UNUSED_VAR(cv); /* -W */
- PERL_UNUSED_VAR(items); /* -W */
-#if PERL_VERSION_LE(5, 21, 5)
- XS_VERSION_BOOTCHECK;
-# ifdef XS_APIVERSION_BOOTCHECK
- XS_APIVERSION_BOOTCHECK;
-# endif
-#endif
-
- (void)newXSproto_portable("Locale::gettext_xs::__gettext_xs_version",
XS_Locale__gettext_xs___gettext_xs_version, file, "");
- (void)newXSproto_portable("Locale::gettext_xs::LC_CTYPE",
XS_Locale__gettext_xs_LC_CTYPE, file, "");
- (void)newXSproto_portable("Locale::gettext_xs::LC_NUMERIC",
XS_Locale__gettext_xs_LC_NUMERIC, file, "");
- (void)newXSproto_portable("Locale::gettext_xs::LC_TIME",
XS_Locale__gettext_xs_LC_TIME, file, "");
- (void)newXSproto_portable("Locale::gettext_xs::LC_COLLATE",
XS_Locale__gettext_xs_LC_COLLATE, file, "");
- (void)newXSproto_portable("Locale::gettext_xs::LC_MONETARY",
XS_Locale__gettext_xs_LC_MONETARY, file, "");
- (void)newXSproto_portable("Locale::gettext_xs::LC_MESSAGES",
XS_Locale__gettext_xs_LC_MESSAGES, file, "");
- (void)newXSproto_portable("Locale::gettext_xs::LC_ALL",
XS_Locale__gettext_xs_LC_ALL, file, "");
- (void)newXSproto_portable("Locale::gettext_xs::gettext",
XS_Locale__gettext_xs_gettext, file, "$");
- (void)newXSproto_portable("Locale::gettext_xs::dgettext",
XS_Locale__gettext_xs_dgettext, file, "$$");
- (void)newXSproto_portable("Locale::gettext_xs::dcgettext",
XS_Locale__gettext_xs_dcgettext, file, "$$$");
- (void)newXSproto_portable("Locale::gettext_xs::ngettext",
XS_Locale__gettext_xs_ngettext, file, "$$$");
- (void)newXSproto_portable("Locale::gettext_xs::dngettext",
XS_Locale__gettext_xs_dngettext, file, "$$$$");
- (void)newXSproto_portable("Locale::gettext_xs::dcngettext",
XS_Locale__gettext_xs_dcngettext, file, "$$$$$");
- (void)newXSproto_portable("Locale::gettext_xs::_pgettext_aux",
XS_Locale__gettext_xs__pgettext_aux, file, "$$$$");
- (void)newXSproto_portable("Locale::gettext_xs::_npgettext_aux",
XS_Locale__gettext_xs__npgettext_aux, file, "$$$$$$");
- (void)newXSproto_portable("Locale::gettext_xs::_textdomain",
XS_Locale__gettext_xs__textdomain, file, "$");
- (void)newXSproto_portable("Locale::gettext_xs::_nl_putenv",
XS_Locale__gettext_xs__nl_putenv, file, "$");
- (void)newXSproto_portable("Locale::gettext_xs::_bindtextdomain",
XS_Locale__gettext_xs__bindtextdomain, file, "$;$");
-
(void)newXSproto_portable("Locale::gettext_xs::bind_textdomain_codeset",
XS_Locale__gettext_xs_bind_textdomain_codeset, file, "$;$");
- (void)newXSproto_portable("Locale::gettext_xs::setlocale",
XS_Locale__gettext_xs_setlocale, file, "$;$");
-#if PERL_VERSION_LE(5, 21, 5)
-# if PERL_VERSION_GE(5, 9, 0)
- if (PL_unitcheckav)
- call_list(PL_scopestack_ix, PL_unitcheckav);
-# endif
- XSRETURN_YES;
-#else
- Perl_xs_boot_epilog(aTHX_ ax);
-#endif
-}
-
diff --git a/tp/maintain/lib/libintl-perl/gettext_xs/pm_to_blib
b/tp/maintain/lib/libintl-perl/gettext_xs/pm_to_blib
deleted file mode 100644
index e69de29..0000000
diff --git a/tp/maintain/lib/libintl-perl/pm_to_blib
b/tp/maintain/lib/libintl-perl/pm_to_blib
deleted file mode 100644
index e69de29..0000000
diff --git a/tp/maintain/lib/libintl-perl/sample/simplecal/po/Makefile
b/tp/maintain/lib/libintl-perl/sample/simplecal/po/Makefile
new file mode 100644
index 0000000..f6263ff
--- /dev/null
+++ b/tp/maintain/lib/libintl-perl/sample/simplecal/po/Makefile
@@ -0,0 +1,84 @@
+# Makefile for various po files.
+
+srcdir = .
+libdir = ../lib
+
+MSGMERGE = msgmerge
+MSGFMT = msgfmt
+XGETTEXT = xgettext
+CATOBJEXT = .po
+PERL = perl
+
+include PACKAGE
+
+MO_FILES = $(addsuffix .gmo, $(LINGUAS))
+
+TD = $(strip $(TEXTDOMAIN))
+
+default: help
+
+all: $(TD).pot update-po update-mo install
+
+help:
+ @echo "Available targets:"
+ @echo " pot - remake master catalog"
+ @echo " update-po - merge po files"
+ @echo " update-mo - regenerate mo files"
+ @echo " install - install mo files"
+ @echo " all - all of the above"
+
+POTFILES = $(srcdir)/POTFILES \
+ $(shell cat $(srcdir)/POTFILES)
+
+pot: $(TD).pot
+
+clean:
+ rm -f *~ *.bak *.gmo
+
+$(TD).pot: $(POTFILES)
+ $(XGETTEXT) --output=$(srcdir)/$(TD).pox --from-code=utf-8 \
+ --add-comments=TRANSLATORS: --files-from=$(srcdir)/POTFILES \
+ --copyright-holder="$(COPYRIGHT_HOLDER)" \
+ --msgid-bugs-address="$(MSGID_BUGS_ADDRESS)" \
+ `$(PERL) -MLocale::TextDomain \
+ -e "print Locale::TextDomain->options"` && \
+ rm -f $@ && mv $(TD).pox $@
+
+install: $(MO_FILES)
+ cd $(srcdir); \
+ targetdir='$(libdir)/LocaleData'; \
+ languages='$(LINGUAS)'; \
+ for lang in $$languages; do \
+ mkdir -p "$$targetdir/$$lang/LC_MESSAGES" || exit 1; \
+ dest="$$targetdir/$$lang/LC_MESSAGES/$(TD).mo"; \
+ cat="$$lang.gmo"; \
+ echo "installing $$cat as $$dest"; \
+ cp -f $$cat $$dest && chmod 644 $$dest || exit 1; \
+ done
+
+update-mo: $(MO_FILES)
+
+update-po:
+ $(MAKE) $(TD).pot
+ cd $(srcdir); \
+ catalogs='$(LINGUAS)'; \
+ for cat in $$catalogs; do \
+ cat=`basename $$cat`; \
+ lang=`echo $$cat | sed 's/\$(CATOBJEXT)$$//'`; \
+ mv $$lang.po $$lang.old.po; \
+ echo "$$lang:"; \
+ if $(MSGMERGE) $$lang.old.po $(TD).pot -o $$lang.po; then \
+ rm -f $$lang.old.po; \
+ else \
+ echo "msgmerge for $$cat failed!"; \
+ rm -f $$lang.po; \
+ mv $$lang.old.po $$lang.po; \
+ fi; \
+ done
+
+.SUFFIXES:
+.SUFFIXES: .po .gmo
+
+.po.gmo:
+ $(MSGFMT) --check --statistics --verbose -o $@ $<
+
diff --git a/tp/maintain/lib/libintl-perl/tests/po/Makefile
b/tp/maintain/lib/libintl-perl/tests/po/Makefile
new file mode 100644
index 0000000..77c42fb
--- /dev/null
+++ b/tp/maintain/lib/libintl-perl/tests/po/Makefile
@@ -0,0 +1,47 @@
+# Makefile for various po files. This Makefile is intended for the
+# maintainer. No problem if you cannot run it on your system.
+
+srcdir = .
+top_srcdir = ..
+
+LINGUAS = de de_AT xy xy_XY
+PACKAGES = existing additional
+
+#CATALOGS = $(addsuffix .po, LINGUAS)
+CATALOGS = $(LINGUAS)
+MO_FILES = $(foreach pkg,$(PACKAGES), $(addprefix $(pkg)., $(addsuffix .mo,
$(LINGUAS))))
+
+MSGMERGE = msgmerge
+MSGFMT = msgfmt
+CATOBJEXT = .po
+
+all: default
+
+default: install
+
+install: $(MO_FILES)
+ cd $(srcdir); \
+ targetdir='$(top_srcdir)/LocaleData'; \
+ languages='$(LINGUAS)'; \
+ packages='$(PACKAGES)'; \
+ for package in $$packages; do \
+ for lang in $$languages; do \
+ dest="$$targetdir/$$lang/LC_MESSAGES/$$package.mo"; \
+ cat="$$package.$$lang.mo"; \
+ echo "installing $$cat as $$dest"; \
+ cp -f $$cat $$dest && chmod 644 $$dest || exit 1; \
+ done; \
+ done
+
+update-mo: $(MO_FILES)
+ @echo "MO-FILES: $(MO_FILES)"
+
+clean:
+ rm -f $(MO_FILES) *~
+
+.SUFFIXES:
+.SUFFIXES: .po .mo
+
+.po.mo:
+ $(MSGFMT) --check --statistics --verbose -o $@ $<
+
diff --git a/tp/maintain/lib/libintl-perl/xs_disabled
b/tp/maintain/lib/libintl-perl/xs_disabled
deleted file mode 100644
index e69de29..0000000
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- branch master updated: * tp/maintain/lib/libintl-perl/: synchronize with code archive by removing generated files and adding files that were not present. None of the added/removed files are used/installed in Texinfo.,
Patrice Dumas <=
- Prev by Date:
branch master updated: * tp/Texinfo/Convert/Converter.pm, tp/Texinfo/Convert/DocBook.pm, tp/Texinfo/Convert/HTML.pm, tp/Texinfo/Convert/TexinfoXML.pm, tp/init/chm.pm, tp/init/html32.pm, util/txixml2texi.pl: replace commands_formatting with no_arg_commands_formatting to be more precise.
- Next by Date:
branch master updated: * tp/Texinfo/Config.pm (texinfo_register_no_arg_command_formatting) (GNUT_get_no_arg_command_formatting) (texinfo_register_style_command_formatting) (GNUT_get_style_command_formatting), tp/Texinfo/Convert/HTML.pm, tp/init/chm.pm, tp/init/html32.pm: setup an API for registering formatting of no_arg_commands and style_commands.
- Previous by thread:
branch master updated: * tp/Texinfo/Convert/Converter.pm, tp/Texinfo/Convert/DocBook.pm, tp/Texinfo/Convert/HTML.pm, tp/Texinfo/Convert/TexinfoXML.pm, tp/init/chm.pm, tp/init/html32.pm, util/txixml2texi.pl: replace commands_formatting with no_arg_commands_formatting to be more precise.
- Next by thread:
branch master updated: * tp/Texinfo/Config.pm (texinfo_register_no_arg_command_formatting) (GNUT_get_no_arg_command_formatting) (texinfo_register_style_command_formatting) (GNUT_get_style_command_formatting), tp/Texinfo/Convert/HTML.pm, tp/init/chm.pm, tp/init/html32.pm: setup an API for registering formatting of no_arg_commands and style_commands.
- Index(es):