
{ common deck CFE$CYBIL_FORMAT_ERROR_CODES

*copyc cfc$error_codes_formatter_range

  CONST
    cfc$formatter_errors = cfc$min_ecc + 0;

  CONST
    cfe$input_output_same = cfc$formatter_errors + 0,
    {F Input and Output files are the same.

    cfe$unbalanced_block_structure = cfc$formatter_errors + 1,
    {W No matching +P for +P on line +P.

    cfe$unmatched_parens = cfc$formatter_errors + 2,
    {W Unmatched parenthesis on line +P: +N15 +P

    cfe$unmatched_brackets = cfc$formatter_errors + 3,
    {W Unmatched brackets on line +P: +N15 +P

    cfe$expecting_found_error = cfc$formatter_errors + 5,
    {W Expecting +P found +P on line +P: +N15 +P

    cfe$integer_range_error = cfc$formatter_errors + 6,
    {W Expecting +P <= integer value <= +P , found +P on line +P: +N15 +P

    cfe$line_too_long = cfc$formatter_errors + 7,
    {I Line +P is too long for current margin values. +N15 +P

    cfe$illegal_format_option = cfc$formatter_errors + 8,
    {F Undefined format option selected +P.

    cfe$tab_character_error = cfc$formatter_errors + 9,
    {W Length of tab character +P must be <= +P on line +P: +N15 +P

    cfe$unbalanced_range_mess = cfc$formatter_errors + 11,
    {W Unbalanced block structure -- possible +N15 +P missing for +P on line +P or
    {+N15 +P missing for +P on line +P.

    cfe$syntax_error = cfc$formatter_errors + 12,
    {W Syntax error -- identifier too long or unrecognized character on line +P:
    {+N15 +P

    cfe$token_too_long = cfc$formatter_errors + 13;
    {I Token +P +N15 on line +P is too long for current margin values. +N15 +P

  CONST
    cfc$formatter_global_base = cfc$min_ecc + 100,

    cfe$no_central_memory = cfc$formatter_global_base + 0;
    {F Insufficient central memory available.

  CONST
    cfc$formatter_state_base = cfc$min_ecc + 200,

    cfe$token_length_error = cfc$formatter_state_base + 0;
    {I Token beginning with +P on line +P is > +P characters. +N Token truncated
    {to +P characters.
