DataMuseum.dk

top - metrics - download

    Length: 2283 (0x8eb)
    Types: TextFile
    Names: »V«

└─⟦180fe333a⟧ Bits:30000405 8mm tape, Rational 1000, SW CATALOG, 10_20_0
└─⟦180fe333a⟧ Bits:30000537 8mm tape, Rational 1000, SW Catalog 10_20_0
    └─⟦5cb1d1d7f⟧ »DATA« 
        └─⟦3b1ee7bd8⟧ 
            └─⟦this⟧ 

TextFile

with Parserdeclarations;  -- declarations for the Parser
with Host_Dependencies;  -- Host dependents constants

package Lex is
    --| perform lexical analysis

    --| Overview
    --|
    --| This package is used to identify tokens in the source file and
    --| return them to subprogram Parser.
    --|
    --| The useful reference is Chapter 2 of the Ada (Trade Mark) LRM.

    --| Effects
    --|
    --| The subprograms in package Lex are used to sequentially read
    --| a source file and identify lexical units (tokens) in the file.
    --| Comments and error messages are saved for use by the lister.

    package Hd renames Host_Dependencies;
    package Pd renames Parserdeclarations;
    -- other package renames are in the package body

    ------------------------------------------------------------------
    -- Subprogram Declarations Global to Package Lex
    ------------------------------------------------------------------

    procedure Initialization;  --| Initializes the lexer

    --| Effects
    --|
    --| This subprogram initializes the lexer.

    ------------------------------------------------------------------

    function Getnextnoncommenttoken --| returns next non-comment token
                --| in source file.
                return Pd.Parsestackelement;

    --| Effects
    --|
    --| This subprogram scans the source file for the next token not
    --| including comment tokens.

    --| Requires
    --|
    --| This subprogram requires an opened source file,
    --| and the state information internal to the package body.

    ------------------------------------------------------------------

    function Getnextsourcetoken --| returns next token in source file.
                return Pd.Parsestackelement;

    --| Effects
    --|
    --| This subprogram scans the source file for the next token.
    --| The tokens returned include any comment literal tokens.

    --| Requires
    --|
    --| This subprogram requires an opened source file,
    --| and the state information internal to the package body.

    ------------------------------------------------------------------

    function Show_Current_Line return Hd.Source_Line;

    --| Effects
    --|
    --| Returns the current line number being processed

end Lex;