# 2.11BSD#431 - /usr/src/new/PORT/perl.1.0.16/stab.h

##### Variables

    envname           X
    signame           X
    statusvalue       X
    subsvalue         X

##### Macros

    IOF_ARGV          X
    IOF_FLUSH         X
    IOF_START         X
    Nullstab          X
    SF_VMAGIC         X
    STAB_GET          X
    STAB_GNUM         X
    STAB_STR          X

##### struct's

    stab              X
    stio              X

       1: /* $Header: stab.h,v 1.0 87/12/18 13:06:18 root Exp $
       2:  *
       3:  * $Log:	stab.h,v $
       4:  * Revision 1.0  87/12/18  13:06:18  root
       5:  * Initial revision
       6:  *
       7:  */
       8:
       9: struct stab {
      10:     struct stab *stab_next;
      11:     char    *stab_name;
      12:     STR     *stab_val;
      13:     struct stio *stab_io;
      14:     FCMD    *stab_form;
      15:     ARRAY   *stab_array;
      16:     HASH    *stab_hash;
      17:     CMD     *stab_sub;
      18:     char    stab_flags;
      19: };
      20:
      21: #define SF_VMAGIC 1     /* call routine to dereference STR val */
      22:
      23: struct stio {
      24:     FILE    *fp;
      25:     long    lines;
      26:     long    page;
      27:     long    page_len;
      28:     long    lines_left;
      29:     char    *top_name;
      30:     STAB    *top_stab;
      31:     char    *fmt_name;
      32:     STAB    *fmt_stab;
      33:     char    type;
      34:     char    flags;
      35: };
      36:
      37: #define IOF_ARGV 1  /* this fp iterates over ARGV */
      38: #define IOF_START 2 /* check for null ARGV and substitute '-' */
      39: #define IOF_FLUSH 4 /* this fp wants a flush after write op */
      40:
      41: #define Nullstab Null(STAB*)
      42:
      43: #define STAB_STR(s) (tmpstab = (s), tmpstab->stab_flags & SF_VMAGIC ? stab_str(tmpstab) : tmpstab->stab_val)
      44: #define STAB_GET(s) (tmpstab = (s), str_get(tmpstab->stab_flags & SF_VMAGIC ? stab_str(tmpstab) : tmpstab->stab_val))
      45: #define STAB_GNUM(s) (tmpstab = (s), str_gnum(tmpstab->stab_flags & SF_VMAGIC ? stab_str(tmpstab) : tmpstab->stab_val))
      46:
      47: EXT STAB *tmpstab;
      48:
      49: EXT STAB *stab_index[128];
      50:
      51: EXT char *envname;  /* place for ENV name being assigned--gross cheat */
      52: EXT char *signame;  /* place for SIG name being assigned--gross cheat */
      53:
      54: EXT int statusvalue;
      55: EXT int subsvalue;
      56:
      57: STAB *aadd();
      58: STAB *hadd();

#### Defined variables

envname defined in line 51; used 8 times

- in /usr/src/new/PORT/perl.1.0.16/arg.c line 1746
- in /usr/src/new/PORT/perl.1.0.16/stab.c line 251-255(4)
- in /usr/src/new/PORT/perl.1.0.16/str.c line 405-406(2), 423

signame defined in line 52; used 8 times

- in /usr/src/new/PORT/perl.1.0.16/arg.c line 1751
- in /usr/src/new/PORT/perl.1.0.16/stab.c line 257-259(2), 266-277(5)

statusvalue defined in line 54; used 3 times

- in /usr/src/new/PORT/perl.1.0.16/arg.c line 1380-1383(2)
- in /usr/src/new/PORT/perl.1.0.16/stab.c line 106

subsvalue defined in line 55; never used

#### Defined struct's

stab defined in line 9; used 4 times

- in line 10(2)
- in /usr/src/new/PORT/perl.1.0.16/perl.h line 49(2)

stio defined in line 23; used 3 times

- in line 13
- in /usr/src/new/PORT/perl.1.0.16/perl.h line 50(2)

#### Defined macros

IOF_ARGV defined in line 37; used 4 times

- in /usr/src/new/PORT/perl.1.0.16/arg.c line 490, 1396, 1414
- in /usr/src/new/PORT/perl.1.0.16/cmd.c line 254

IOF_FLUSH defined in line 39; used 5 times

- in /usr/src/new/PORT/perl.1.0.16/arg.c line 1664, 1859
- in /usr/src/new/PORT/perl.1.0.16/stab.c line 147, 201-203(2)

IOF_START defined in line 38; used 3 times

- in /usr/src/new/PORT/perl.1.0.16/arg.c line 1397-1398(2), 1419

Nullstab defined in line 41; used 15 times

- in /usr/src/new/PORT/perl.1.0.16/perl.h line 148-155(8)
- in /usr/src/new/PORT/perl.1.0.16/perl.y line 139, 148-154(3), 577-581(2)
- in /usr/src/new/PORT/perl.1.0.16/str.c line 250

SF_VMAGIC defined in line 21; used 4 times

- in line 43-45(3)
- in /usr/src/new/PORT/perl.1.0.16/stab.c line 173

STAB_GET defined in line 44; used 1 times

- in /usr/src/new/PORT/perl.1.0.16/stab.c line 304

STAB_GNUM defined in line 45; never used
STAB_STR defined in line 43; used 7 times

- in /usr/src/new/PORT/perl.1.0.16/arg.c line 1007, 1297, 1323
- in /usr/src/new/PORT/perl.1.0.16/cmd.c line 197, 212, 231
- in /usr/src/new/PORT/perl.1.0.16/stab.c line 312

#### Usage of this include

stab.h used 1 times

- in /usr/src/new/PORT/perl.1.0.16/perl.h line 57

Last modified: 2002-12-19 Generated: 2016-12-26 | Generated by src2html V0.67 page hit count: 1173 |