Signed-off-by: Jose E. Marchesi <[email protected]>
gcc/ChangeLog
* algol68/a68-parser-attrs.def: New file.
---
gcc/algol68/a68-parser-attrs.def | 366 +++++++++++++++++++++++++++++++
1 file changed, 366 insertions(+)
create mode 100644 gcc/algol68/a68-parser-attrs.def
diff --git a/gcc/algol68/a68-parser-attrs.def b/gcc/algol68/a68-parser-attrs.def
new file mode 100644
index 00000000000..d0090399dcc
--- /dev/null
+++ b/gcc/algol68/a68-parser-attrs.def
@@ -0,0 +1,366 @@
+/* This file contains the definitions and documentation for all the different
+ kind/attributes of Algol 68 parse tree nodes.
+ Copyright (C) 2025 Jose E. Marchesi.
+
+ GCC is free software; you can redistribute it and/or modify it under the
+ terms of the GNU General Public License as published by the Free Software
+ Foundation; either version 3, or (at your option) any later version.
+
+ GCC is distributed in the hope that it will be useful, but WITHOUT ANY
+ WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+ FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
+ details.
+
+ You should have received a copy of the GNU General Public License along with
+ GCC; see the file COPYING3. If not see <http://www.gnu.org/licenses/>. */
+
+/* Please keep the entries in this file sorted alphabetically. */
+
+/* Note that the textual descriptions for the nodes are used in diagnostic
+ messages and debug dumps. Please make sure to write them in a way you would
+ expect to be used in statements like "[...] near ATT". */
+
+A68_ATTR(A68_PATTERN, "transput pattern")
+A68_ATTR(ACTUAL_DECLARER_MARK, "actual declarer mark")
+A68_ATTR(ALT_DO_PART, "alt do part")
+A68_ATTR(ALT_DO_SYMBOL, "alt do symbol")
+A68_ATTR(ALT_EQUALS_SYMBOL, "alt equals symbol")
+A68_ATTR(ALT_FORMAL_BOUNDS_LIST, "alt formal bounds list")
+A68_ATTR(ANDF_SYMBOL, "andf symbol")
+A68_ATTR(AND_FUNCTION, "andf pseudo-operator")
+A68_ATTR(ANONYMOUS, "anonymous")
+A68_ATTR(ARGUMENT, "argument")
+A68_ATTR(ARGUMENT_LIST, "argument list")
+A68_ATTR(ASSERTION, "assertion")
+A68_ATTR(ASSERT_SYMBOL, "assert symbol")
+A68_ATTR(ASSIGNATION, "assignation")
+A68_ATTR(ASSIGN_SYMBOL, "assignation symbol")
+A68_ATTR(ASSIGN_TO_SYMBOL, "assign-to symbol")
+A68_ATTR(AT_SYMBOL, "at symbol")
+A68_ATTR(BEGIN_SYMBOL, "begin symbol")
+A68_ATTR(BITS_C_PATTERN, "bits-c-pattern")
+A68_ATTR(BITS_DENOTATION, "bits-denotation")
+A68_ATTR(BITS_PATTERN, "bits pattern")
+A68_ATTR(BITS_SYMBOL, "bits-symbol")
+A68_ATTR(BOLD_COMMENT_SYMBOL, "comment delimiter")
+A68_ATTR(BOLD_COMMENT_BEGIN_SYMBOL, "comment opening delimiter")
+A68_ATTR(BOLD_COMMENT_END_SYMBOL, "comment closing delimiter")
+A68_ATTR(BOLD_PRAGMAT_SYMBOL, "pragmat-symbol")
+A68_ATTR(BOLD_TAG, "bold tag")
+A68_ATTR(BOOLEAN_PATTERN, "boolean pattern")
+A68_ATTR(BOOL_SYMBOL, "bool-symbol")
+A68_ATTR(BOUND, "actual declarer bound")
+A68_ATTR(BOUNDS, "actual declarer bounds")
+A68_ATTR(BOUNDS_LIST, "actual declarer bounds list")
+A68_ATTR(BRIEF_COMMENT_BEGIN_SYMBOL, "comment opening delimiter")
+A68_ATTR(BRIEF_COMMENT_END_SYMBOL, "comment closing delimiter")
+A68_ATTR(BRIEF_OUSE_PART, "ouse-part")
+A68_ATTR(BRIEF_CONFORMITY_OUSE_PART, "ouse-part")
+A68_ATTR(BRIEF_ELIF_PART, "elif-part")
+A68_ATTR(BRIEF_OPERATOR_DECLARATION, "operator declaration")
+A68_ATTR(BUS_SYMBOL, "bus-symbol")
+A68_ATTR(BYTES_SYMBOL, "bytes-symbol")
+A68_ATTR(BY_PART, "by-part")
+A68_ATTR(BY_SYMBOL, "by-symbol")
+A68_ATTR(CALL, "call")
+A68_ATTR(CASE_CHOICE_CLAUSE, "case choice clause")
+A68_ATTR(CASE_CLAUSE, "case clause")
+A68_ATTR(CASE_IN_PART, "case-in-part")
+A68_ATTR(CASE_OUSE_PART, "case-ouse-part")
+A68_ATTR(CASE_PART, "case-part")
+A68_ATTR(CASE_SYMBOL, "case-symbol")
+A68_ATTR(CAST, "cast")
+A68_ATTR(CHANNEL_SYMBOL, "channel-symbol")
+A68_ATTR(CHAR_C_PATTERN, "char C-like pattern")
+A68_ATTR(CHAR_SYMBOL, "char-symbol")
+A68_ATTR(CHOICE, "choice")
+A68_ATTR(CHOICE_PATTERN, "choice pattern")
+A68_ATTR(CLOSED_CLAUSE, "closed clause")
+A68_ATTR(CLOSE_SYMBOL, "close symbol")
+A68_ATTR(COLLATERAL_CLAUSE, "collateral clause")
+A68_ATTR(COLLECTION, "collection")
+A68_ATTR(COLON_SYMBOL, "colon-symbol")
+A68_ATTR(COMMA_SYMBOL, "comma-symbol")
+A68_ATTR(COMPLEX_PATTERN, "complex pattern")
+A68_ATTR(COMPLEX_SYMBOL, "complex-symbol")
+A68_ATTR(COMPL_SYMBOL, "compl-symbol")
+A68_ATTR(CONDITIONAL_CLAUSE, "conditional clause")
+A68_ATTR(CONFORMITY_CHOICE, "conformity clause choice")
+A68_ATTR(CONFORMITY_CLAUSE, "conformity clause")
+A68_ATTR(CONFORMITY_IN_PART, "conformity clause in-part")
+A68_ATTR(CONFORMITY_OUSE_PART, "conformity clause ouse-part")
+A68_ATTR(CONSTRUCT, "construct")
+A68_ATTR(DECLARATION_LIST, "list of declarations")
+A68_ATTR(DECLARER, "declarer")
+A68_ATTR(DEFINING_IDENTIFIER, "defining identifier")
+A68_ATTR(DEFINING_INDICANT, "defining mode or operator indicant")
+A68_ATTR(DEFINING_OPERATOR, "defining operator")
+A68_ATTR(DENOTATION, "denotation")
+A68_ATTR(DEPROCEDURING, "deproceduring coercion")
+A68_ATTR(DEREFERENCING, "dereferencing coercion")
+A68_ATTR(DO_PART, "do-part")
+A68_ATTR(DO_SYMBOL, "do-symbol")
+A68_ATTR(DYNAMIC_REPLICATOR, "format dynamic replicator")
+A68_ATTR(ELIF_IF_PART, "elif if-part")
+A68_ATTR(ELIF_PART, "elif-part")
+A68_ATTR(ELIF_SYMBOL, "elif-symbol")
+A68_ATTR(ELSE_BAR_SYMBOL, "else-bar-symbol")
+A68_ATTR(ELSE_OPEN_PART, "else-open-part")
+A68_ATTR(ELSE_PART, "else-part")
+A68_ATTR(ELSE_SYMBOL, "else-symbol")
+A68_ATTR(EMPTY_SYMBOL, "empty-symbol")
+A68_ATTR(ENCLOSED_CLAUSE, "enclosed clause")
+A68_ATTR(END_SYMBOL, "end-symbol")
+A68_ATTR(ENQUIRY_CLAUSE, "enquiry clause")
+A68_ATTR(EQUALS_SYMBOL, "equals-symbol")
+A68_ATTR(ERROR, "error node")
+A68_ATTR(ERROR_IDENTIFIER, "error-identifier")
+A68_ATTR(ESAC_SYMBOL, "esac-symbol")
+A68_ATTR(EXIT_SYMBOL, "exit-symbol")
+A68_ATTR(EXPONENT_FRAME, "exponent-frame")
+A68_ATTR(FALSE_SYMBOL, "false-symbol")
+A68_ATTR(FIELD, "struct field")
+A68_ATTR(FIELD_IDENTIFIER, "field-identifier")
+A68_ATTR(FILE_SYMBOL, "file-symbol")
+A68_ATTR(FIRM, "firm context")
+A68_ATTR(FIXED_C_PATTERN, "fixed-c-pattern")
+A68_ATTR(FI_SYMBOL, "fi-symbol")
+A68_ATTR(FLEX_SYMBOL, "flex-symbol")
+A68_ATTR(FLOAT_C_PATTERN, "float C format pattern")
+A68_ATTR(FORMAL_BOUNDS, "formal declarer bounds")
+A68_ATTR(FORMAL_BOUNDS_LIST, "list of formal declarer bounds")
+A68_ATTR(FORMAL_DECLARERS, "formal declarers")
+A68_ATTR(FORMAL_DECLARERS_LIST, "list of formal declarers")
+A68_ATTR(FORMAL_DECLARER_MARK, "formal declarer mark")
+A68_ATTR(FORMULA, "formula")
+A68_ATTR(FOR_PART, "for-part")
+A68_ATTR(FOR_SYMBOL, "for-symbol")
+A68_ATTR(FORMAT_CLOSE_SYMBOL, "format-close-symbol")
+A68_ATTR(FORMAT_DELIMITER_SYMBOL, "format-delimiter-symbol")
+A68_ATTR(FORMAT_IDENTIFIER, "format identifier")
+A68_ATTR(FORMAT_A_FRAME, "format A-frame")
+A68_ATTR(FORMAT_D_FRAME, "format D-frame")
+A68_ATTR(FORMAT_E_FRAME, "format E-frame")
+A68_ATTR(FORMAT_I_FRAME, "format I-frame")
+A68_ATTR(FORMAT_ITEM_A, "format item-A")
+A68_ATTR(FORMAT_ITEM_B, "format item-B")
+A68_ATTR(FORMAT_ITEM_C, "format item-C")
+A68_ATTR(FORMAT_ITEM_D, "format item-D")
+A68_ATTR(FORMAT_ITEM_E, "format item-E")
+A68_ATTR(FORMAT_ITEM_F, "format item-F")
+A68_ATTR(FORMAT_ITEM_G, "format item-G")
+A68_ATTR(FORMAT_ITEM_H, "format item-H")
+A68_ATTR(FORMAT_ITEM_I, "format item-I")
+A68_ATTR(FORMAT_ITEM_J, "format item-J")
+A68_ATTR(FORMAT_ITEM_K, "format item-K")
+A68_ATTR(FORMAT_ITEM_L, "format item-L")
+A68_ATTR(FORMAT_ITEM_M, "format item-M")
+A68_ATTR(FORMAT_ITEM_N, "format item-N")
+A68_ATTR(FORMAT_ITEM_O, "format item-O")
+A68_ATTR(FORMAT_ITEM_P, "format item-P")
+A68_ATTR(FORMAT_ITEM_Q, "format item-Q")
+A68_ATTR(FORMAT_ITEM_R, "format item-R")
+A68_ATTR(FORMAT_ITEM_S, "format item-S")
+A68_ATTR(FORMAT_ITEM_T, "format item-T")
+A68_ATTR(FORMAT_ITEM_U, "format item-U")
+A68_ATTR(FORMAT_ITEM_V, "format item-V")
+A68_ATTR(FORMAT_ITEM_W, "format item-W")
+A68_ATTR(FORMAT_ITEM_X, "format item-X")
+A68_ATTR(FORMAT_ITEM_Y, "format item-Y")
+A68_ATTR(FORMAT_ITEM_Z, "format item-Z")
+A68_ATTR(FORMAT_ITEM_ESCAPE, "format item escape")
+A68_ATTR(FORMAT_ITEM_MINUS, "format item -")
+A68_ATTR(FORMAT_ITEM_PLUS, "format item +")
+A68_ATTR(FORMAT_ITEM_POINT, "format item .")
+A68_ATTR(FORMAT_OPEN_SYMBOL, "format-open-symbol")
+A68_ATTR(FORMAT_PATTERN, "format pattern")
+A68_ATTR(FORMAT_POINT_FRAME, "format point frame")
+A68_ATTR(FORMAT_SYMBOL, "format-symbol")
+A68_ATTR(FORMAT_TEXT, "format text")
+A68_ATTR(FORMAT_Z_FRAME, "format Z frame")
+A68_ATTR(FROM_PART, "from-part")
+A68_ATTR(FROM_SYMBOL, "from-symbol")
+A68_ATTR(GENERAL_C_PATTERN, "general C-like pattern")
+A68_ATTR(GENERAL_PATTERN, "general pattern")
+A68_ATTR(GENERATOR, "generator")
+A68_ATTR(GENERIC_ARGUMENT, "generic argument")
+A68_ATTR(GENERIC_ARGUMENT_LIST, "generic argument list")
+A68_ATTR(GOTO_SYMBOL, "goto-symbol")
+A68_ATTR(GO_SYMBOL, "go-symbol")
+A68_ATTR(GUARDED_CONDITIONAL_CLAUSE, "guarded conditional clause")
+A68_ATTR(GUARDED_LOOP_CLAUSE, "guarded loop clause")
+A68_ATTR(HEAP_SYMBOL, "heap-symbol")
+A68_ATTR(IDENTIFIER, "identifier")
+A68_ATTR(IDENTIFIER_WITH_UNDERSCORES, "identifier with underscores")
+A68_ATTR(IDENTITY_DECLARATION, "identity declaration")
+A68_ATTR(IDENTITY_RELATION, "identity relation")
+A68_ATTR(IF_PART, "if-part")
+A68_ATTR(IF_SYMBOL, "if-symbol")
+A68_ATTR(INDICANT, "indicant")
+A68_ATTR(INITIALISER_SERIES, "initialiser series")
+A68_ATTR(INSERTION, "insertion")
+A68_ATTR(INTEGRAL_C_PATTERN, "integral C-like pattern")
+A68_ATTR(INTEGRAL_MOULD, "integral mould")
+A68_ATTR(INTEGRAL_PATTERN, "integral pattern")
+A68_ATTR(INT_DENOTATION, "integral denotation")
+A68_ATTR(INT_SYMBOL, "int-symbol")
+A68_ATTR(IN_SYMBOL, "in-symbol")
+A68_ATTR(IN_TYPE_MODE, "in type mode")
+A68_ATTR(ISNT_SYMBOL, "isnt-symbol")
+A68_ATTR(IS_SYMBOL, "is-symbol")
+A68_ATTR(JUMP, "jump")
+A68_ATTR(KEYWORD, "keyword")
+A68_ATTR(LABEL, "label")
+A68_ATTR(LABELED_UNIT, "labeled unit")
+A68_ATTR(LABEL_IDENTIFIER, "label identifier")
+A68_ATTR(LABEL_SEQUENCE, "label sequence")
+A68_ATTR(LITERAL, "literal")
+A68_ATTR(LOCAL_LABEL, "local label")
+A68_ATTR(LOC_SYMBOL, "loc-symbol")
+A68_ATTR(LONGETY, "longsety")
+A68_ATTR(LONG_SYMBOL, "long-symbol")
+A68_ATTR(LOOP_CLAUSE, "loop clause")
+A68_ATTR(LOOP_IDENTIFIER, "loop identifier")
+A68_ATTR(MAIN_SYMBOL, "main-symbol")
+A68_ATTR(MEEK, "meek context")
+A68_ATTR(MODE_BITS, "mode bits")
+A68_ATTR(MODE_BOOL, "mode bool")
+A68_ATTR(MODE_BYTES, "mode bytes")
+A68_ATTR(MODE_CHAR, "mode char")
+A68_ATTR(MODE_COMPLEX, "mode complex")
+A68_ATTR(MODE_DECLARATION, "mode declaration")
+A68_ATTR(MODE_FILE, "mode file")
+A68_ATTR(MODE_FORMAT, "mode format")
+A68_ATTR(A68_MODE_INT, "mode int")
+A68_ATTR(MODE_LONG_LONG_BITS, "mode long long bits")
+A68_ATTR(MODE_LONG_LONG_COMPLEX, "mode long long complex")
+A68_ATTR(MODE_LONG_LONG_INT, "mode long long int")
+A68_ATTR(MODE_LONG_LONG_REAL, "mode long long real")
+A68_ATTR(MODE_LONG_BITS, "mode long bits")
+A68_ATTR(MODE_LONG_BYTES, "mode long bytes")
+A68_ATTR(MODE_LONG_COMPLEX, "mode long complex")
+A68_ATTR(MODE_LONG_INT, "mode long int")
+A68_ATTR(MODE_LONG_REAL, "mode long real")
+A68_ATTR(MODE_NO_CHECK, "mode no check")
+A68_ATTR(MODE_REAL, "mode real")
+A68_ATTR(MODE_SYMBOL, "mode-symbol")
+A68_ATTR(MONADIC_FORMULA, "monadic formula")
+A68_ATTR(MONAD_SEQUENCE, "monad sequence")
+A68_ATTR(NIHIL, "nihil")
+A68_ATTR(NIL_SYMBOL, "nil-symbol")
+A68_ATTR(NORMAL_IDENTIFIER, "normal identifier")
+A68_ATTR(NO_SORT, "no sort")
+A68_ATTR(OD_SYMBOL, "od-symbol")
+A68_ATTR(OF_SYMBOL, "of-symbol")
+A68_ATTR(OPEN_PART, "open part")
+A68_ATTR(OPEN_SYMBOL, "open-symbol")
+A68_ATTR(OPERATOR, "operator")
+A68_ATTR(OPERATOR_DECLARATION, "operator declaration")
+A68_ATTR(OPERATOR_PLAN, "operator plan")
+A68_ATTR(OP_SYMBOL, "op-symbol")
+A68_ATTR(ORF_SYMBOL, "orf-symbol")
+A68_ATTR(OR_FUNCTION, "orel pseudo-operator")
+A68_ATTR(OUSE_PART, "ouse-part")
+A68_ATTR(OUSE_SYMBOL, "ouse-symbol")
+A68_ATTR(OUT_PART, "out-part")
+A68_ATTR(OUT_SYMBOL, "out-symbol")
+A68_ATTR(OUT_TYPE_MODE, "out type mode")
+A68_ATTR(PARALLEL_CLAUSE, "parallel clause")
+A68_ATTR(PARAMETER, "parameter")
+A68_ATTR(PARAMETER_IDENTIFIER, "parameter identifier")
+A68_ATTR(PARAMETER_LIST, "parameter list")
+A68_ATTR(PARAMETER_PACK, "parameter pack")
+A68_ATTR(PARTICULAR_PROGRAM, "particular program")
+A68_ATTR(PAR_SYMBOL, "par-symbol")
+A68_ATTR(PICTURE, "format picture")
+A68_ATTR(PICTURE_LIST, "format picture list")
+A68_ATTR(PIPE_SYMBOL, "pipe-symbol")
+A68_ATTR(POINT_SYMBOL, "point-symbol")
+A68_ATTR(PRIMARY, "primary")
+A68_ATTR(PRIORITY, "operator priority")
+A68_ATTR(PRIORITY_DECLARATION, "operator priority declaration")
+A68_ATTR(PRIO_SYMBOL, "prio-symbol")
+A68_ATTR(PROCEDURE_DECLARATION, "procedure declaration")
+A68_ATTR(PROCEDURE_VARIABLE_DECLARATION, "procedure variable declaration")
+A68_ATTR(PROCEDURING, "proceduring coercion")
+A68_ATTR(PROC_SYMBOL, "proc-symbol")
+A68_ATTR(QUALIFIER, "qualifier")
+A68_ATTR(RADIX_FRAME, "radix frame")
+A68_ATTR(REAL_DENOTATION, "real denotation")
+A68_ATTR(REAL_PATTERN, "real pattern")
+A68_ATTR(REAL_SYMBOL, "real-symbol")
+A68_ATTR(REF_SYMBOL, "ref-symbol")
+A68_ATTR(REPLICATOR, "format replicator")
+A68_ATTR(ROUTINE_TEXT, "routine text")
+A68_ATTR(ROUTINE_UNIT, "routine unit")
+A68_ATTR(ROWING, "rowing coercion")
+A68_ATTR(ROWS_SYMBOL, "rows-symbol")
+A68_ATTR(ROW_CHAR_DENOTATION, "row of chars denotation")
+A68_ATTR(ROW_SYMBOL, "row-symbol")
+A68_ATTR(SECONDARY, "secondary")
+A68_ATTR(SELECTION, "selection")
+A68_ATTR(SELECTOR, "selector")
+A68_ATTR(SEMA_SYMBOL, "sema-symbol")
+A68_ATTR(SEMI_SYMBOL, "semi-symbol")
+A68_ATTR(SERIAL_CLAUSE, "serial clause")
+A68_ATTR(SERIES_MODE, "series mode")
+A68_ATTR(SHORTETY, "shortsety")
+A68_ATTR(SHORT_SYMBOL, "short-symbol")
+A68_ATTR(SIGN_MOULD, "sign mould")
+A68_ATTR(SKIP, "skip unit")
+A68_ATTR(SKIP_SYMBOL, "skip-symbol")
+A68_ATTR(SLICE, "slice")
+A68_ATTR(SOFT, "soft context")
+A68_ATTR(SOME_CLAUSE, "some clause")
+A68_ATTR(SPECIFICATION, "specification")
+A68_ATTR(SPECIFIED_UNIT, "specified unit")
+A68_ATTR(SPECIFIED_UNIT_LIST, "specified unit list")
+A68_ATTR(SPECIFIED_UNIT_UNIT, "specified unit unit")
+A68_ATTR(SPECIFIER, "specifier")
+A68_ATTR(SPECIFIER_IDENTIFIER, "specifier identifier")
+A68_ATTR(STANDARD, "standard")
+A68_ATTR(STATIC_REPLICATOR, "static replicator")
+A68_ATTR(STOWED_MODE, "stowed mode")
+A68_ATTR(STRING_C_PATTERN, "string C-like pattern")
+A68_ATTR(STRING_PATTERN, "string pattern")
+A68_ATTR(STRING_SYMBOL, "string-symbol")
+A68_ATTR(STRONG, "strong context")
+A68_ATTR(STRUCTURED_FIELD, "structured field")
+A68_ATTR(STRUCTURED_FIELD_LIST, "structured field list")
+A68_ATTR(STRUCTURE_PACK, "structure pack")
+A68_ATTR(STRUCT_SYMBOL, "struct-symbol")
+A68_ATTR(STYLE_II_COMMENT_SYMBOL, "comment delimiter")
+A68_ATTR(STYLE_I_COMMENT_SYMBOL, "comment delimiter")
+A68_ATTR(STYLE_I_PRAGMAT_SYMBOL, "pragmat-symbol")
+A68_ATTR(SUB_SYMBOL, "sub-symbol")
+A68_ATTR(SUB_UNIT, "sub unit")
+A68_ATTR(TERTIARY, "tertiary")
+A68_ATTR(THEN_BAR_SYMBOL, "then-bar-symbol")
+A68_ATTR(THEN_PART, "then-part")
+A68_ATTR(THEN_SYMBOL, "then-symbol")
+A68_ATTR(TO_PART, "to-part")
+A68_ATTR(TO_SYMBOL, "to-symbol")
+A68_ATTR(TRIMMER, "trimmer")
+A68_ATTR(TRUE_SYMBOL, "true-symbol")
+A68_ATTR(UNION_DECLARER_LIST, "union declarer list")
+A68_ATTR(UNION_PACK, "union pack")
+A68_ATTR(UNION_SYMBOL, "union-symbol")
+A68_ATTR(UNIT, "unit")
+A68_ATTR(UNITING, "uniting coercion")
+A68_ATTR(UNIT_LIST, "unit list")
+A68_ATTR(UNIT_SERIES, "unit series")
+A68_ATTR(VARIABLE_DECLARATION, "variable declaration")
+A68_ATTR(VIRTUAL_DECLARER_MARK, "virtual declarer mark")
+A68_ATTR(VOIDING, "voiding coercion")
+A68_ATTR(VOID_SYMBOL, "void-symbol")
+A68_ATTR(WEAK, "weak context")
+A68_ATTR(WHILE_PART, "while-part")
+A68_ATTR(WHILE_SYMBOL, "while-symbol")
+A68_ATTR(WIDENING, "widening coercion")
+A68_ATTR(WILDCARD, "wildcard")
+
+/*
+Local variables:
+mode:c
+End:
+*/
--
2.30.2
