From emmanuel at seyman.fr Mon Jun 10 00:37:48 2024 From: emmanuel at seyman.fr (Emmanuel Seyman) Date: Mon, 10 Jun 2024 00:37:48 +0200 Subject: [Perl] Sortie de Perl 5.40.0 Message-ID: La toute dernière version de Perl est maintenant la version 5.40.0 : https://metacpan.org/release/HAARG/perl-5.40.0/ Ça arrive à temps pour la Perl and Raku Conference qui se déroulera du 24 au 28 juin à Las Vegas : https://tprc.us/tprc-2024-las/ Emmanuel From kai.carver at gmail.com Tue Jun 11 10:04:02 2024 From: kai.carver at gmail.com (Kai Carver) Date: Tue, 11 Jun 2024 10:04:02 +0200 Subject: [Perl] Sortie de Perl 5.40.0 In-Reply-To: References: Message-ID: pour ceux qui savent pas, il y a des infos sur ce qui a changé dans perldelta : Perl 5.40.0 represents approximately 11 months of development since Perl 5.38.0 and contains approximately 160,000 lines of changes across 1,500 files from 75 authors. https://metacpan.org/release/HAARG/perl-5.40.0/view/pod/perldelta.pod On Mon, 10 Jun 2024 at 00:37, Emmanuel Seyman wrote: > > La toute dernière version de Perl est maintenant la version 5.40.0 : > https://metacpan.org/release/HAARG/perl-5.40.0/ > > Ça arrive à temps pour la Perl and Raku Conference qui se déroulera du > 24 au 28 juin à Las Vegas : > https://tprc.us/tprc-2024-las/ > > Emmanuel > _______________________________________________ > Perl mailing list > Perl at mongueurs.net > http://listes.mongueurs.net/mailman/listinfo/perl > Attention, les archives sont publiques > -------------- section suivante -------------- Une pièce jointe HTML a été nettoyée... URL: From pdupre at gmx.com Tue Jun 11 20:48:08 2024 From: pdupre at gmx.com (Patrick Dupre) Date: Tue, 11 Jun 2024 20:48:08 +0200 Subject: [Perl] Tk:Zinc Message-ID: Bonsoir, J'essaie de compiler le package Tk-Zinc-3.306.tar.gz Je fais cpanspec puis rpmbuild -bb perl-Tk-Zinc.spec Mais j'ai des erreurs de compilation cp zinc-demos ../blib/script/zinc-demos "/usr/bin/perl" -MExtUtils::MY -e 'MY->fixin(shift)' -- ../blib/script/zinc-demos Manifying 1 pod document make[1]: Leaving directory '/home/pdupre/rpmbuild/BUILD/Tk-Zinc-3.306_PD/demos' tkZinc.c: In function ?InitRendering2?: tkZinc.c:1086:25: warning: unused variable ?gl_context? [-Wunused-variable] 1086 | ZnGLContext gl_context; | ^~~~~~~~~~ In file included from /usr/lib64/perl5/vendor_perl/Tk/pTk/Lang.h:19, from /usr/lib64/perl5/vendor_perl/Tk/pTk/tkPort.h:24, from /usr/lib64/perl5/vendor_perl/Tk/pTk/tk.h:87, from Types.h:47, from tkZinc.c:33: tkZinc.c: In function ?ZnTagSearchScan?: tkZinc.c:2059:53: warning: cast to pointer from integer of different size [-Wint-to-pointer-cast] 2059 | entry = Tcl_FindHashEntry(wi->id_table, (char *) id); | ^ /usr/lib64/perl5/vendor_perl/Tk/pTk/tcl.h:1394:45: note: in definition of macro ?Tcl_FindHashEntry? 1394 | (*((tablePtr)->findProc))(tablePtr, key) | ^~~ tkZinc.c: In function ?ZnTagSearchFirst?: tkZinc.c:2261:55: warning: cast to pointer from integer of different size [-Wint-to-pointer-cast] 2261 | entry = Tcl_FindHashEntry(search->wi->id_table, (char *) search->id); | ^ /usr/lib64/perl5/vendor_perl/Tk/pTk/tcl.h:1394:45: note: in definition of macro ?Tcl_FindHashEntry? 1394 | (*((tablePtr)->findProc))(tablePtr, key) | ^~~ tkZinc.c: In function ?ScrollFractions?: tkZinc.c:2786:10: warning: unused variable ?buffer? [-Wunused-variable] 2786 | char buffer[2*TCL_DOUBLE_SPACE+2]; | ^~~~~~ tkZinc.c: In function ?UpdateScrollbars?: tkZinc.c:2848:18: warning: unused variable ?fractions? [-Wunused-variable] 2848 | Tcl_Obj *fractions; | ^~~~~~~~~ tkZinc.c: In function ?WidgetObjCmd?: tkZinc.c:4368:49: warning: cast to pointer from integer of different size [-Wint-to-pointer-cast] 4368 | entry = Tcl_FindHashEntry(wi->id_table, (char *) id); | ^ /usr/lib64/perl5/vendor_perl/Tk/pTk/tcl.h:1394:45: note: in definition of macro ?Tcl_FindHashEntry? 1394 | (*((tablePtr)->findProc))(tablePtr, key) | ^~~ tkZinc.c: In function ?Configure?: tkZinc.c:7006:49: warning: cast to pointer from integer of different size [-Wint-to-pointer-cast] 7006 | entry = Tcl_FindHashEntry(wi->id_table, (char *) wi->om_group_id); | ^ /usr/lib64/perl5/vendor_perl/Tk/pTk/tcl.h:1394:45: note: in definition of macro ?Tcl_FindHashEntry? 1394 | (*((tablePtr)->findProc))(tablePtr, key) | ^~~ tkZinc.c: In function ?Event?: tkZinc.c:7204:41: warning: pointer targets in passing argument 6 of ?XlibVptr->V_XQueryTree? differ in signedness [-Wpointer-sign] 7204 | &children, &num_children); | ^~~~~~~~~~~~~ | | | int * tkZinc.c:7204:41: note: expected ?unsigned int *? but argument is of type ?int *? tkZinc.c: In function ?SelectTo?: tkZinc.c:7907:38: warning: variable ?old_field? set but not used [-Wunused-but-set-variable] 7907 | int old_first, old_last, old_field; | ^~~~~~~~~ tkZinc.c: In function ?InitZinc?: tkZinc.c:8949:33: warning: pointer targets in passing argument 3 of ?TkdeclsVptr->V_Tk_DefineBitmap? differ in signedness [-Wpointer-sign] 8949 | SYMBOLS_BITS[i], SYMBOL_WIDTH, SYMBOL_HEIGHT); | ~~~~~~~~~~~~^~~ | | | unsigned char * tkZinc.c:8949:33: note: expected ?const char *? but argument is of type ?unsigned char *? tkZinc.c:9002:59: error: passing argument 3 of ?gluTessCallback? from incompatible pointer type [-Wincompatible-pointer-types] 9002 | gluTessCallback(ZnTesselator.tess, GLU_TESS_BEGIN_DATA, ZnTessBegin); | ^~~~~~~~~~~ | | | void (*)(GLenum, void *) {aka void (*)(unsigned int, void *)} In file included from tkZinc.h:27, from tkZinc.c:38: /usr/include/GL/glu.h:336:87: note: expected ?_GLUfuncptr? {aka ?void (*)(void)?} but argument is of type ?void (*)(GLenum, void *)? {aka ?void (*)(unsigned int, void *)?} 336 | GLAPI void GLAPIENTRY gluTessCallback (GLUtesselator* tess, GLenum which, _GLUfuncptr CallBackFunc); | ~~~~~~~~~~~~^~~~~~~~~~~~ tkZinc.c:9003:60: error: passing argument 3 of ?gluTessCallback? from incompatible pointer type [-Wincompatible-pointer-types] 9003 | gluTessCallback(ZnTesselator.tess, GLU_TESS_VERTEX_DATA, ZnTessVertex); | ^~~~~~~~~~~~ | | | void (*)(void *, void *) /usr/include/GL/glu.h:336:87: note: expected ?_GLUfuncptr? {aka ?void (*)(void)?} but argument is of type ?void (*)(void *, void *)? Parce que le code de respect las les bonnes pratique, mais je ne veux pas corriger le code source. Est-ce qu'il y aurait un moyen d'enlever l'option -Wincompatible-pointer-type par exemple, en editant le Makefile.PL ? Merci =========================================================================== Patrick DUPRÉ | | email: pdupre at gmx.com =========================================================================== From pdupre at gmx.com Thu Jun 13 23:13:34 2024 From: pdupre at gmx.com (Patrick Dupre) Date: Thu, 13 Jun 2024 23:13:34 +0200 Subject: [Perl] perl.h Message-ID: J'ai des routines .xs qui me permettaient d'interfacer du c avec du perl Avec la nouvelle version de gcc ou de perl This is perl 5, version 38, subversion 2 (v5.38.2) built for x86_64-linux-thread-multi gcc version 14.1.1 20240607 (Red Hat 14.1.1-5) (GCC) cela ne passe plus gcc -c -I. -I/usr/local/lib64/perl5/5.38/PDL/Core -Wextra -Wunused -Wno-incompatible-pointer-types -g -DVERSION=\"\" -DXS_VERSION=\"\" -fPIC "-I/usr/lib64/perl5/CORE" lines.c In file included from lines.c:8: /usr/lib64/perl5/CORE/perl.h:3356:22: error: unknown type name ?off64_t?; did you mean ?off_t?? 3356 | # define Off_t off64_t | ^~~~~~~ /usr/lib64/perl5/CORE/perlio.h:252:15: note: in expansion of macro ?Off_t? 252 | PERL_CALLCONV Off_t PerlIO_tell(PerlIO *); | ^~~~~ On dirait qu'il y a un bug dans /usr/lib64/perl5/CORE/perl.h =========================================================================== Patrick DUPRÉ | | email: pdupre at gmx.com =========================================================================== From philippe.bruhat at free.fr Fri Jun 14 10:40:02 2024 From: philippe.bruhat at free.fr (Philippe Bruhat (BooK)) Date: Fri, 14 Jun 2024 10:40:02 +0200 Subject: [Perl] perl.h In-Reply-To: References: Message-ID: Bonjour, On Thu, Jun 13, 2024 at 11:13:34PM +0200, Patrick Dupre wrote: > J'ai des routines .xs qui me permettaient d'interfacer du c avec du perl > > Avec la nouvelle version de gcc ou de perl > This is perl 5, version 38, subversion 2 (v5.38.2) built for x86_64-linux-thread-multi > gcc version 14.1.1 20240607 (Red Hat 14.1.1-5) (GCC) > > cela ne passe plus > > gcc -c -I. -I/usr/local/lib64/perl5/5.38/PDL/Core -Wextra -Wunused -Wno-incompatible-pointer-types -g -DVERSION=\"\" -DXS_VERSION=\"\" -fPIC "-I/usr/lib64/perl5/CORE" lines.c > In file included from lines.c:8: > /usr/lib64/perl5/CORE/perl.h:3356:22: error: unknown type name ?off64_t?; did you mean ?off_t?? > 3356 | # define Off_t off64_t > | ^~~~~~~ > /usr/lib64/perl5/CORE/perlio.h:252:15: note: in expansion of macro ?Off_t? > 252 | PERL_CALLCONV Off_t PerlIO_tell(PerlIO *); > | ^~~~~ > > > On dirait qu'il y a un bug dans > /usr/lib64/perl5/CORE/perl.h Une possibilité serait de faire un git bisect sur perl.git, pour trouver le moment où le bug est apparu. Regarde en particulier `git bisect run`, qui permet d'aller faire la sièste pendant que git travaille. -- Philippe Bruhat (BooK) Putting beauty before brains is the surest way to wind up with neither. (Moral from Groo The Wanderer #24 (Epic))