It's a strange syntax anyway !
With this applied internal commands sort of work but executing external
commands fails and "set" likewise shows there is some kind of variable space
corruption problem to pin down first
{
register FILE f;
- (f = standin)->fdes = -1;
+ f = standin;
+ f->fdes = -1;
f->fend = length(s) + (f->fnxt = (char *)s);/*FIXME review */
f->flin = 1;
return (f->feof = (s == 0));
{
register FILE f;
- (f = af)->fstak = standin;
+ f = af;
+ f->fstak = standin;
f->feof = 0;
f->feval = 0;
standin = f;
{
register FILE f;
- if ((f = standin)->fstak) {
+ f = standin;
+ if (f->fstak) {
if (f->fdes >= 0)
close(f->fdes);
standin = f->fstak;