[comp.lang.perl] problem in stab.h

rbp@investor.pgh.pa.us (Bob Peirce #305) (01/09/90)

My mail to lwall@jpl-devvax.jpl.nasa.gov got bounced.  The address
is not in my paths file and, apparently, not in the path of anybody
upstream.  At any rate, the message I was trying to send Larry said:

Dear Larry,

Everything went together and tested out perfectly -- even yacc worked! 

I did encounter one Configure problem in the stio struct in stab.h.  On
my system, an Altos 3068, Sys 5.2, DIR is a struct in /usr/include/ndir.h.
However, while I have that header file, I do not have the associated BSD
directory functions.  Configure correctly picked that up and found that
I did have sys/dir.h, so it defined I_SYSDIR.  However, my sys/dir.h
does not have DIR.  Furthermore, since all the tests passed, it does not
seem to need DIR!

I don't know if this is a bug or a failing of my system.  At any rate, I
thought you should know.

Thanks for a very nice program.

struct stio {
    FILE	*ifp;		/* ifp and ofp are normally the same */
    FILE	*ofp;		/* but sockets need separate streams */
/*  RBP  01-04-90:  Not on my system!
#if defined(I_DIRENT) || defined(I_SYSDIR)
*/
#if defined(I_DIRENT)
    DIR		*dirp;		/* for opendir, readdir, etc */
#endif
    long	lines;		/* $. */
    long	page;		/* $% */
    long	page_len;	/* $= */
    long	lines_left;	/* $- */
    char	*top_name;	/* $^ */
    STAB	*top_stab;	/* $^ */
    char	*fmt_name;	/* $~ */
    STAB	*fmt_stab;	/* $~ */
    short	subprocess;	/* -| or |- */
    char	type;
    char	flags;
};

-- 
Bob Peirce, Pittsburgh, PA				  412-471-5320
...!uunet!pitt!investor!rbp			rbp@investor.pgh.pa.us