I still haven't exactly figured out why but here is some debug info nevertheless:
2117462 <1];%ne> <xtern char> |493641| 1269:SUSPEND(1291)
2117462 <1];%ne> <xtern char> |493642| 1271:CURLYN[62]{0,INFTY}(1289)
|493642| ANYOF[0-9@A-Z_a-z] can match 5 times out of 2147483647...
2117467 <xtern> < char s_zo> |493643| 1289:SUCCEED(0)
|493643| SUCCEED: subpattern success...
2117467 <xtern> < char s_zo> |493641| 1291:SUCCEED(0)
|493641| SUCCEED: subpattern success...
2117467 <xtern> < char s_zo> |493640| 1293:BOUND(1294)
2117467 <xtern> < char s_zo> |493640| 1294:CLOSE61 'identifierpure'(1296)
|493640| END: EVAL trying tail ... (cur_eval=1a8a38ee0)
2117467 <xtern> < char s_zo> |493641| 4017:CLOSE190 'identf'(4019)
2117467 <xtern> < char s_zo> |493641| 4019:LOGICAL[2](4020)
2117467 <xtern> < char s_zo> |493641| 4020:EVAL(4023)
EVAL/GOSUB: Matching embedded REx "" against " char s_zone5_master__trigger_17_0018552c[1];%nextern char s"...
2117467 <xtern> < char s_zo> |493642| 1:NOTHING(2)
2117467 <xtern> < char s_zo> |493642| 2:END(0)
|493642| END: EVAL trying tail ... (cur_eval=1a8a38ee0)
2117467 <xtern> < char s_zo> |493643| 4023:SUSPEND(4029)
2117467 <xtern> < char s_zo> |493644| 4025:STAR(4027)
|493644| POSIXD[\s] can match 1 times out of 2147483647...
2117468 <tern > <char s_zon> |493645| 4027:SUCCEED(0)
|493645| SUCCEED: subpattern success...
2117468 <tern > <char s_zon> |493643| 4029:CLOSE189 'identiiferfast'(4031)
|493643| END: EVAL trying tail ... (cur_eval=1a8a32fa0)
2117468 <tern > <char s_zon> |493644| 4037:LOGICAL[1](4038)
2117468 <tern > <char s_zon> |493644| 4038:EVAL(4041)
2117468 <tern > <char s_zon> |493645| 4041:IFTHEN(4151)
2117468 <tern > <char s_zon> |493645| 4151:CLOSE191 'identifiercompositefast'(4153)
|493645| END: EVAL trying tail ... (cur_eval=100495630)
2117468 <tern > <char s_zon> |493646| 4162:WHILEM[6/15](0)
|493646| WHILEM: matched 55381 out of 0..65535
2117468 <tern > <char s_zon> |493647| 4159:GOSUB191[-128:4031] 'identifiercompositefast'(4162)
2117468 <tern > <char s_zon> |493648| 4031:OPEN191 'identifiercompositefast'(4033)
2117468 <tern > <char s_zon> |493648| 4033:BRANCH(4080)
2117468 <tern > <char s_zon> |493649| 4034:GOSUB189[-30:4004] 'identiiferfast'(4037)
2117468 <tern > <char s_zon> |493650| 4004:OPEN189 'identiiferfast'(4006)
2117468 <tern > <char s_zon> |493650| 4006:SUSPEND(4012)
2117468 <tern > <char s_zon> |493651| 4008:STAR(4010)
|493651| POSIXD[\s] can match 0 times out of 2147483647...
2117468 <tern > <char s_zon> |493652| 4010:SUCCEED(0)
|493652| SUCCEED: subpattern success...
2117468 <tern > <char s_zon> |493650| 4012:OPEN190 'identf'(4014)
2117468 <tern > <char s_zon> |493650| 4014:GOSUB61[-2760:1254] 'identifierpure'(4017)
2117468 <tern > <char s_zon> |493651| 1254:OPEN61 'identifierpure'(1256)
2117468 <tern > <char s_zon> |493651| 1256:BOUND(1257)
2117468 <tern > <char s_zon> |493651| 1257:SUSPEND(1293)
2117468 <tern > <char s_zon> |493652| 1259:ANYOF[A-Z_a-z](1269)
2117469 <ern c> <har s_zone> |493652| 1269:SUSPEND(1291)
2117469 <ern c> <har s_zone> |493653| 1271:CURLYN[62]{0,INFTY}(1289)
|493653| ANYOF[0-9@A-Z_a-z] can match 3 times out of 2147483647...
2117472 < char> < s_zone5_m> |493654| 1289:SUCCEED(0)
|493654| SUCCEED: subpattern success...
2117472 < char> < s_zone5_m> |493652| 1291:SUCCEED(0)
|493652| SUCCEED: subpattern success...
2117472 < char> < s_zone5_m> |493651| 1293:BOUND(1294)
2117472 < char> < s_zone5_m> |493651| 1294:CLOSE61 'identifierpure'(1296)
|493651| END: EVAL trying tail ... (cur_eval=1a8a39510)
2117472 < char> < s_zone5_m> |493652| 4017:CLOSE190 'identf'(4019)
2117472 < char> < s_zone5_m> |493652| 4019:LOGICAL[2](4020)
2117472 < char> < s_zone5_m> |493652| 4020:EVAL(4023)
Program received signal SIGSEGV, Segmentation fault.
0x000000010012e294 in S_save_magic_flags (flags=14680064, sv=0x1a8a38690, mgs_ix=<optimized out>, my_perl=<optimized out>) at mg.c:113
113 mgs->mgs_sv = sv;
The above is on commit:
commit 8290d9dfc2f9409fe4a688c355052cd2bd7ffcdb
Author: Karl Williamson <khw@cpan.org>
Date: Tue Jul 26 15:48:28 2022 -0600
APItest:locale.t: Use proper test for LC_ALL presence
If no LC_ALL, there won't be an LC_ALL() sub. Instead use the string
'LC_ALL" and an explicit check to see if it is there.
Plus my optimisation patch (which btw still cuts around half of the execution time - just FYI)
But it was crashing without it as well (and on blead).
The regex is (the executed part at least):
(?<parens>\s*+(?<openparenf>[(\[])(?<inparen>((?&parens)|(?&stringlit)|[^()\[\]"'])*+)(?&inparen)?+(?(?{$+{openparenf} eq '('})\)|\])\s*+)
(?<brackets>\s*+\{(?<inbrackets>((?&brackets)|(?&stringlit)|[^{}"'])*+)(?&inbrackets)?+\}\s*+)
(?<identiiferfast>\s*+(?<identf>(?&identifierpure))(??{checkfastident})\s*+)
(?<identifiercompositefast>(?&identiiferfast)(?(?{$istaggable})\s*+(?&identifierpure)?+\s*+(?&brackets)?+)|[^\w\[\]\(\){=;]|(?&parens)
|(?=(?<tok>[{=;]))(?{registerfnorobj})(?(?{$+{tok} eq '{'})(?&brackets)
|(?(?{$+{tok} eq '='})=.*?;|;)))
(?<declsfast>(?&identifiercompositefast)*+(?&declsfast)?+)
perl -V:
perl: warning: Setting locale failed.
perl: warning: Please check that your locale settings:
LANGUAGE = (unset),
LC_ALL = (unset),
LC_CTYPE = "UTF-8",
LANG = "C.UTF8"
are supported and installed on your system.
perl: warning: Falling back to a fallback locale ("C.UTF8").
Summary of my perl5 (revision 5 version 37 subversion 5) configuration:
Commit id: 86afe6b06de7f1c961f08890ea7dad6c1acbb0d8
Platform:
osname=linux
osvers=6.0.0-g1501278bb7ba
archname=ppc64-linux-thread-multi
uname='linux localhost 6.0.0-g1501278bb7ba #9 smp sun oct 16 14:51:46 -00 2022 ppc64 ppc970mp, altivec supported powermac11,2 gnulinux '
config_args=''
hint=recommended
useposix=true
d_sigaction=define
useithreads=define
usemultiplicity=define
use64bitint=define
use64bitall=define
uselongdouble=undef
usemymalloc=n
default_inc_excludes_dot=define
Compiler:
cc='cc'
ccflags ='-D_REENTRANT -D_GNU_SOURCE -fwrapv -fno-strict-aliasing -pipe -fstack-protector-strong -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64'
optimize='-g -O2'
cppflags='-D_REENTRANT -D_GNU_SOURCE -fwrapv -fno-strict-aliasing -pipe -fstack-protector-strong -I/usr/local/include'
ccversion=''
gccversion='12.2.0'
gccosandvers=''
intsize=4
longsize=8
ptrsize=8
doublesize=8
byteorder=87654321
doublekind=4
d_longlong=define
longlongsize=8
d_longdbl=define
longdblsize=16
longdblkind=6
ivtype='long'
ivsize=8
nvtype='double'
nvsize=8
Off_t='off_t'
lseeksize=8
alignbytes=8
prototype=define
Linker and Libraries:
ld='cc'
ldflags =' -fstack-protector-strong -L/usr/local/lib'
libpth=/usr/local/lib /usr/lib /lib64 /usr/lib64 /lib /usr/local/lib64
libs=-lpthread -lgdbm -ldl -lm -lcrypt -lutil -lc -lgdbm_compat
perllibs=-lpthread -ldl -lm -lcrypt -lutil -lc
libc=/lib/../lib64/libc.so.6
so=so
useshrplib=false
libperl=libperl.a
gnulibc_version='2.36'
Dynamic Linking:
dlsrc=dl_dlopen.xs
dlext=so
d_dlsymun=undef
ccdlflags='-Wl,-E'
cccdlflags='-fPIC'
lddlflags='-shared -g -O2 -L/usr/local/lib -fstack-protector-strong'
Characteristics of this binary (from libperl):
Compile-time options:
HAS_TIMES
MULTIPLICITY
PERLIO_LAYERS
PERL_COPY_ON_WRITE
PERL_DONT_CREATE_GVSV
PERL_HASH_FUNC_SIPHASH13
PERL_HASH_USE_SBOX32
PERL_MALLOC_WRAP
PERL_OP_PARENT
PERL_PRESERVE_IVUV
PERL_USE_SAFE_PUTENV
USE_64_BIT_ALL
USE_64_BIT_INT
USE_ITHREADS
USE_LARGE_FILES
USE_LOCALE
USE_LOCALE_COLLATE
USE_LOCALE_CTYPE
USE_LOCALE_NUMERIC
USE_LOCALE_TIME
USE_PERLIO
USE_PERL_ATOF
USE_REENTRANT_API
USE_THREAD_SAFE_LOCALE
Built under linux
Compiled at Oct 18 2022 23:10:24
@INC:
/usr/local/lib/perl5/site_perl/5.37.5/ppc64-linux-thread-multi
/usr/local/lib/perl5/site_perl/5.37.5
/usr/local/lib/perl5/5.37.5/ppc64-linux-thread-multi
/usr/local/lib/perl5/5.37.5
/usr/local/lib/perl5/site_perl/5.37.3
/usr/local/lib/perl5/site_perl
It's not my RAM running out because I've 23 GBs
Some more info (with -O0 build):
Program received signal SIGSEGV, Segmentation fault.
0x000000010019c4b8 in S_save_magic_flags (my_perl=0x1005002a0, mgs_ix=-2147452408, sv=0x1071fe810, flags=14680064) at mg.c:113
113 mgs->mgs_sv = sv;
(gdb) p mgs
$1 = (MGS *) 0x7ffe36547a18
(gdb) p *mgs
Cannot access memory at address 0x7ffe36547a18
RetroSearch is an open source project built by @garambo | Open a GitHub Issue
Search and Browse the WWW like it's 1997 | Search results from DuckDuckGo
HTML:
3.2
| Encoding:
UTF-8
| Version:
0.7.4