This is an automated email from the git hooks/post-receive script. xguimard-guest pushed a commit to branch master in repository libcrypt-u2f-server-perl.
commit 0ce44c1196e24fa0d9f47c0367684006d64912d8 Author: Xavier Guimard <Xavier Guimard [email protected]> Date: Mon Sep 25 21:25:44 2017 +0200 Error in spelling patch --- debian/patches/spelling-errors.patch | 150 ----------------------------------- 1 file changed, 150 deletions(-) diff --git a/debian/patches/spelling-errors.patch b/debian/patches/spelling-errors.patch index 84f6fc5..00f174a 100644 --- a/debian/patches/spelling-errors.patch +++ b/debian/patches/spelling-errors.patch @@ -68,153 +68,3 @@ Last-Update: 2017-09-25 my $challenge = $auth->authenticationChallenge(); ---- /dev/null -+++ b/const-c.inc -@@ -0,0 +1,55 @@ -+#define PERL_constant_NOTFOUND 1 -+#define PERL_constant_NOTDEF 2 -+#define PERL_constant_ISIV 3 -+#define PERL_constant_ISNO 4 -+#define PERL_constant_ISNV 5 -+#define PERL_constant_ISPV 6 -+#define PERL_constant_ISPVN 7 -+#define PERL_constant_ISSV 8 -+#define PERL_constant_ISUNDEF 9 -+#define PERL_constant_ISUV 10 -+#define PERL_constant_ISYES 11 -+ -+#ifndef NVTYPE -+typedef double NV; /* 5.6 and later define NVTYPE, and typedef NV to it. */ -+#endif -+#ifndef aTHX_ -+#define aTHX_ /* 5.6 or later define this for threading support. */ -+#endif -+#ifndef pTHX_ -+#define pTHX_ /* 5.6 or later define this for threading support. */ -+#endif -+ -+static int -+constant (pTHX_ const char *name, STRLEN len) { -+ /* Initially switch on the length of the name. */ -+ /* When generated this function returned values for the list of names given -+ in this section of perl code. Rather than manually editing these functions -+ to add or remove constants, which would result in this comment and section -+ of code becoming inaccurate, we recommend that you edit this section of -+ code, and use it to regenerate a new set of constant functions which you -+ then use to replace the originals. -+ -+ Regenerate these constant functions by feeding this entire source file to -+ perl -x -+ -+#!/usr/bin/perl -w -+use ExtUtils::Constant qw (constant_types C_constant XS_constant); -+ -+my $types = {map {($_, 1)} qw()}; -+my @names = (qw()); -+ -+print constant_types(), "\n"; # macro defs -+foreach (C_constant ("Crypt::U2F::Server", 'constant', 'IV', $types, undef, 3, @names) ) { -+ print $_, "\n"; # C constant subs -+} -+print "\n#### XS Section:\n"; -+print XS_constant ("Crypt::U2F::Server", $types); -+__END__ -+ */ -+ -+ switch (len) { -+ } -+ return PERL_constant_NOTFOUND; -+} -+ ---- /dev/null -+++ b/const-xs.inc -@@ -0,0 +1,89 @@ -+void -+constant(sv) -+ PREINIT: -+#ifdef dXSTARG -+ dXSTARG; /* Faster if we have it. */ -+#else -+ dTARGET; -+#endif -+ STRLEN len; -+ int type; -+ /* IV iv; Uncomment this if you need to return IVs */ -+ /* NV nv; Uncomment this if you need to return NVs */ -+ /* const char *pv; Uncomment this if you need to return PVs */ -+ INPUT: -+ SV * sv; -+ const char * s = SvPV(sv, len); -+ PPCODE: -+ type = constant(aTHX_ s, len); -+ /* Return 1 or 2 items. First is error message, or undef if no error. -+ Second, if present, is found value */ -+ switch (type) { -+ case PERL_constant_NOTFOUND: -+ sv = -+ sv_2mortal(newSVpvf("%s is not a valid Crypt::U2F::Server macro", s)); -+ PUSHs(sv); -+ break; -+ case PERL_constant_NOTDEF: -+ sv = sv_2mortal(newSVpvf( -+ "Your vendor has not defined Crypt::U2F::Server macro %s, used", -+ s)); -+ PUSHs(sv); -+ break; -+ /* Uncomment this if you need to return IVs -+ case PERL_constant_ISIV: -+ EXTEND(SP, 1); -+ PUSHs(&PL_sv_undef); -+ PUSHi(iv); -+ break; */ -+ /* Uncomment this if you need to return NOs -+ case PERL_constant_ISNO: -+ EXTEND(SP, 1); -+ PUSHs(&PL_sv_undef); -+ PUSHs(&PL_sv_no); -+ break; */ -+ /* Uncomment this if you need to return NVs -+ case PERL_constant_ISNV: -+ EXTEND(SP, 1); -+ PUSHs(&PL_sv_undef); -+ PUSHn(nv); -+ break; */ -+ /* Uncomment this if you need to return PVs -+ case PERL_constant_ISPV: -+ EXTEND(SP, 1); -+ PUSHs(&PL_sv_undef); -+ PUSHp(pv, strlen(pv)); -+ break; */ -+ /* Uncomment this if you need to return PVNs -+ case PERL_constant_ISPVN: -+ EXTEND(SP, 1); -+ PUSHs(&PL_sv_undef); -+ PUSHp(pv, iv); -+ break; */ -+ /* Uncomment this if you need to return SVs -+ case PERL_constant_ISSV: -+ EXTEND(SP, 1); -+ PUSHs(&PL_sv_undef); -+ PUSHs(sv); -+ break; */ -+ /* Uncomment this if you need to return UNDEFs -+ case PERL_constant_ISUNDEF: -+ break; */ -+ /* Uncomment this if you need to return UVs -+ case PERL_constant_ISUV: -+ EXTEND(SP, 1); -+ PUSHs(&PL_sv_undef); -+ PUSHu((UV)iv); -+ break; */ -+ /* Uncomment this if you need to return YESs -+ case PERL_constant_ISYES: -+ EXTEND(SP, 1); -+ PUSHs(&PL_sv_undef); -+ PUSHs(&PL_sv_yes); -+ break; */ -+ default: -+ sv = sv_2mortal(newSVpvf( -+ "Unexpected return type %d while processing Crypt::U2F::Server macro %s, used", -+ type, s)); -+ PUSHs(sv); -+ } -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libcrypt-u2f-server-perl.git _______________________________________________ Pkg-perl-cvs-commits mailing list [email protected] http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits
