[Tcsh] tcsh on Z/OS

[Christos Zoulas]

Compile with SYSMALLOC. This should fix the out of memory issue.
Then we can look at the job control issue.

christos

> On Oct 2, 2019, at 7:20 AM, H.Merijn Brand <h.m.brand at xs4all.nl> wrote:
> 
> Signed PGP part
> 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/
> 
>