VMS Help
ADA, Language Topics, TEXT_IO, SKIP_LINE

 *Conan The Librarian

    procedure SKIP_LINE(FILE    : in FILE_TYPE;
                        SPACING : in POSITIVE_COUNT := 1);
    procedure SKIP_LINE(SPACING : in POSITIVE_COUNT := 1);

    Operates on a file of mode IN_FILE.

    For a SPACING of one: Reads and discards all characters until a
    line terminator has been read, and then sets the current column
    number to one. If the line terminator is not immediately followed
    by a page terminator, the current line number is incremented by
    one. Otherwise, if the line terminator is immediately followed
    by a page terminator, then the page terminator is skipped, the
    current page number is incremented by one, and the current line
    number is set to one.

    For a SPACING greater than one, the above actions are performed
    SPACING times.

    The exception MODE_ERROR is raised if the mode is not IN_FILE.
    The exception END_ERROR is raised if an attempt is made to read a
    file terminator.
  Close     Help