# 2.11BSD#431 - /usr/src/new/PORT/perl.1.0.10/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.10/arg.c line 1727
- in /usr/src/new/PORT/perl.1.0.10/stab.c line 242-246(4)
- in /usr/src/new/PORT/perl.1.0.10/str.c line 405-406(2), 423

signame defined in line 52; used 8 times

- in /usr/src/new/PORT/perl.1.0.10/arg.c line 1732
- in /usr/src/new/PORT/perl.1.0.10/stab.c line 248-250(2), 257-268(5)

statusvalue defined in line 54; used 3 times

- in /usr/src/new/PORT/perl.1.0.10/arg.c line 1361-1364(2)
- in /usr/src/new/PORT/perl.1.0.10/stab.c line 103

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.10/perl.h line 49(2)

stio defined in line 23; used 3 times

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

#### Defined macros

IOF_ARGV defined in line 37; used 4 times

- in /usr/src/new/PORT/perl.1.0.10/arg.c line 471, 1377, 1395
- in /usr/src/new/PORT/perl.1.0.10/cmd.c line 254

IOF_FLUSH defined in line 39; used 5 times

- in /usr/src/new/PORT/perl.1.0.10/arg.c line 1645, 1840
- in /usr/src/new/PORT/perl.1.0.10/stab.c line 144, 192-194(2)

IOF_START defined in line 38; used 3 times

- in /usr/src/new/PORT/perl.1.0.10/arg.c line 1378-1379(2), 1400

Nullstab defined in line 41; used 15 times

- in /usr/src/new/PORT/perl.1.0.10/perl.h line 148-155(8)
- in /usr/src/new/PORT/perl.1.0.10/perl.y line 140, 149-155(3), 578-582(2)
- in /usr/src/new/PORT/perl.1.0.10/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.10/stab.c line 170

STAB_GET defined in line 44; used 1 times

- in /usr/src/new/PORT/perl.1.0.10/stab.c line 295

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.10/arg.c line 988, 1278, 1304
- in /usr/src/new/PORT/perl.1.0.10/cmd.c line 197, 212, 231
- in /usr/src/new/PORT/perl.1.0.10/stab.c line 303

#### Usage of this include

stab.h used 1 times

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

Last modified: 1988-02-03 Generated: 2016-12-26 | Generated by src2html V0.67 page hit count: 981 |