home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / AAKXREF.ZIP / XREF.TYP < prev    next >
Encoding:
Text File  |  1986-04-24  |  1.4 KB  |  43 lines
  1. TYPE
  2.    TitleType     = STRING [  10 ] ;
  3.    option_type   = STRING [   1 ] ;
  4.    switchsettype = set of char;
  5.    state         = (none,symbol,quote,com1,pcom2,com2,pcom2x);
  6.    Output_Type   = ( CRT , PRINTER , Odd_Pages , Even_Pages , DISK , NULL ) ;
  7.  
  8.    Item_Ptr      = ^item;
  9.    item          = record lno: integer;
  10.                        next: Item_Ptr;
  11.                    END ;
  12.  
  13.    Word_Ptr      = ^word;
  14.    word          = record key: string[ch_per_word];
  15.                        first, last: Item_Ptr;
  16.                        left, right: Word_Ptr;
  17.                    END ;
  18.  
  19.    Inc_Ptr       = ^Inc_Rec ;
  20.    Inc_Rec       = RECORD
  21.                       Prev          : Inc_Ptr ;
  22.                       Inc_File_Name : File_Str ;
  23.                       Inc_Title     : TitleType ;
  24.                    END ;
  25.  
  26.    Line_Ptr      = ^Line_Rec ;
  27.    Line_Rec      = RECORD
  28.                       Next : Line_Ptr ;
  29.                       CPL  : INTEGER ;
  30.                       Line : Work_String ;
  31.                    END ; (* Line Record *)
  32.  
  33.    Page_Ptr      = ^Page_Rec ;
  34.    Page_Rec      = RECORD
  35.                       Prev       : Page_Ptr ;
  36.                       Next       : Page_Ptr ;
  37.                       Out_Device : Output_Type ;
  38.                       Max_Cpl    : INTEGER ;
  39.                       Cur_LPP    : INTEGER ;
  40.                       First_Line : Line_Ptr ;
  41.                       Last_Line  : Line_Ptr ;
  42.                    END ;
  43.