[Tcsh] tcsh on Z/OS

[H.Merijn Brand]

On Wed, 2 Oct 2019 12:55:26 +0200, "H.Merijn Brand"
<h.m.brand at xs4all.nl> wrote:

> > $ ./tcsh  
> 
> A dbx trace when compiled with -g3
> 
> (dbx64) where
> CEEOSIGG() at 0x5e1bef0, PPA1 at 0x5e1e824, stack at 0x1c5a1638
> CEEOKILL() at 0x5dc72b8, PPA1 at 0x5dc7888, stack at 0x1c5a1538
> pthread_kill() at 0x1bf84938, PPA1 at 0x1bf87eb0, stack at 0x1c65b140
> abort() at 0x1bdc37e8, PPA1 at 0x1bdc3d88, stack at 0x1c65b200
> malloc.$b3, line 220 in "tc.alloc.c"
> malloc(nbytes = 48), line 220 in "tc.alloc.c"
> strsave(s = "List file name wildcard matches"), line 82 in "sh.misc.c"
> editinit(), line 1386 in "ed.defns.c"
> nlsinit(), line 2701 in "sh.func.c"

If I disable NLS

$ ./tcsh
Warning: no access to tty (EDC5128I No such device.).
Thus no job control in this shell.
tcsh current memory allocation:
free:       0  118   10   27    1    7    3    1    0    1    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0
used:       0   10  118  101   15    9    1    1    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0
        Total in use: 16160, total free: 12512
        Allocated memory from 0x1b727028 to 0xffffffff.  Real top at 0x1b72e400
nbytes=8208: Out of memory

$ (dbx64) where
CEEOSIGG() at 0x5e1bef0, PPA1 at 0x5e1e824, stack at 0x1c58f638
CEEOKILL() at 0x5dc72b8, PPA1 at 0x5dc7888, stack at 0x1c58f538
pthread_kill() at 0x1bf72180, PPA1 at 0x1bf756f8, stack at 0x1c647ba0
abort() at 0x1bdb1030, PPA1 at 0x1bdb15d0, stack at 0x1c647c60
malloc.$b3, line 220 in "tc.alloc.c"
malloc(nbytes = 8208), line 220 in "tc.alloc.c"
calloc(i = 8192, j = 2), line 355 in "tc.alloc.c"
balloc.$b180, line 1552 in "sh.lex.c"
balloc(buf = 0), line 1552 in "sh.lex.c"
bgetc.$b190.$b193, line 1690 in "sh.lex.c"
bgetc.$b190, line 1690 in "sh.lex.c"
bgetc(), line 1690 in "sh.lex.c"
readc.$b164, line 1435 in "sh.lex.c"
readc(wanteof = 0), line 1435 in "sh.lex.c"
lex(hp = 0x1C660358), line 160 in "sh.lex.c"
process.$b96.$b97, line 2059 in "sh.c"
process.$b96, line 2059 in "sh.c"
process(catch = 0), line 2059 in "sh.c"
srcunit(unit = 6, onlyown = 0, hflg = 0, av = 0x0), line 1761 in "sh.c"
srcfile(f = "/etc/csh.cshrc", onlyown = 0, flag = 0, av = 0x0), line 1553 in "sh.c"
main.$b39.$b40, line 1334 in "sh.c"
main.$b39, line 1334 in "sh.c"
main(argc = 0, argv = 0x1C58B800), line 1334 in "sh.c"


-- 
H.Merijn Brand  http://tux.nl   Perl Monger  http://amsterdam.pm.org/
using perl5.00307 .. 5.31      porting perl5 on HP-UX, AIX, and Linux
https://useplaintext.email  https://tux.nl  http://www.test-smoke.org
http://qa.perl.org   http://www.goldmark.org/jeff/stupid-disclaimers/
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 488 bytes
Desc: OpenPGP digital signature
URL: <https://mailman.astron.com/pipermail/tcsh/attachments/20191002/ceec6cf4/attachment-0001.asc>