*copyc clc$ecc_range
?? FMT (FORMAT := OFF) ??

{ This deck (cle$ecc_variable) should no longer be used.
{ Do *copyc's of the decks containing the exception condition codes
{ you need.  Note that the codes defined directly within this deck
{ are no longer produced by the SCL interpreter; they continue to be
{ defined for "compatibility" with previous systems.

  CONST
    clc$min_ecc_variable            = clc$min_ecc + 400,

    cle$expecting_subscript_term    = clc$min_ecc + 410,
    {E Expecting ')' of subscript, found +P.}

    cle$expecting_var_kind_name     = clc$min_ecc + 420,
    {E Expecting variable kind name, found +P.}

    cle$expecting_var_string_size   = clc$min_ecc + 425,
    {E Expecting maximum string size, found +P.}

    cle$improper_variable_reference = clc$min_ecc + 430,
    {E Improper variable reference: +P.}

    cle$only_qualify_string_var     = clc$min_ecc + 450,
    {E Only variable kind STRING can be qualified.}

    cle$undefined_var_attribute     = clc$min_ecc + 467,
    {E The +P attribute is not meaningful for variable +P.}

    cle$unexpected_after_variable   = clc$min_ecc + 470,
    {E Unexpected +P after variable reference.}

    cle$unexpected_field_name       = clc$min_ecc + 475,
    {E Field names (+P) are not defined for variable +P.}

    cle$unknown_variable_field      = clc$min_ecc + 480,
    {E +P is not a field of variable +P.}

    clc$max_ecc_variable            = clc$min_ecc + 499;

?? FMT (FORMAT := ON) ??
*copyc cle$ecc_parsing
*copyc cle$unknown_variable
*copyc cle$var_already_created
