1 <!--===- docs/Parsing.md
3 Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 See https://llvm.org/LICENSE.txt for license information.
5 SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
16 This program source code implements a parser for the Fortran programming
19 The draft ISO standard for Fortran 2018 dated July 2017 was used as the
20 primary definition of the language. The parser also accepts many features
21 from previous versions of the standard that are no longer part of the Fortran
24 It also accepts many features that have never been part of any version
25 of the standard Fortran language but have been supported by previous
26 implementations and are known or suspected to remain in use. As a
27 general principle, we want to recognize and implement any such feature
28 so long as it does not conflict with requirements of the current standard
31 The parser is implemented in standard ISO C++ and requires the 2017
32 edition of the language and library. The parser constitutes a reentrant
33 library with no mutable or constructed static data. Best modern C++
34 programming practices are observed to ensure that the ownership of
35 dynamic memory is clear, that value rather than object semantics are
36 defined for the data structures, that most functions are free from
37 invisible side effects, and that the strictest available type checking
38 is enforced by the C++ compiler when the Fortran parser is built.
39 Class inheritance is rare and dynamic polymorphism is avoided in favor
40 of modern discriminated unions. To the furthest reasonable extent, the
41 parser has been implemented in a declarative fashion that corresponds
42 closely to the text of the Fortran language standard.
44 The several major modules of the Fortran parser are composed into a
45 top-level Parsing class, by means of which one may drive the parsing of a
46 source file and receive its parse tree and error messages. The interfaces
47 of the Parsing class correspond to the two major passes of the parser,
48 which are described below.
50 ## Prescanning and Preprocessing
52 The first pass is performed by an instance of the Prescanner class,
53 with help from an instance of Preprocessor.
55 The prescanner generates the "cooked character stream", implemented
56 by a CookedSource class instance, in which:
57 * line ends have been normalized to single ASCII LF characters (UNIX newlines)
58 * all `INCLUDE` files have been expanded
59 * all continued Fortran source lines have been unified
60 * all comments and insignificant spaces have been removed
61 * fixed form right margins have been clipped
62 * extra blank card columns have been inserted into character literals
63 and Hollerith constants
64 * preprocessing directives have been implemented
65 * preprocessing macro invocations have been expanded
66 * legacy `D` lines in fixed form source have been omitted or included
67 * except for the payload in character literals, Hollerith constants,
68 and character and Hollerith edit descriptors, all letters have been
69 normalized to lower case
70 * all original non-ASCII characters in Hollerith constants have been
71 decoded and re-encoded into UTF-8
73 Lines in the cooked character stream can be of arbitrary length.
75 The purpose of the cooked character stream is to enable the implementation
76 of a parser whose sole concern is the recognition of the Fortran language
77 from productions that closely correspond to the grammar that is presented
78 in the Fortran standard, without having to deal with the complexity of
79 all of the source-level concerns in the preceding list.
81 The implementation of the preprocessor interacts with the prescanner by
82 means of _token sequences_. These are partitionings of input lines into
83 contiguous virtual blocks of characters, and are the only place in this
84 Fortran compiler in which we have reified a tokenization of the program
85 source; the parser proper does not have a tokenizer. The prescanner
86 builds these token sequences out of source lines and supplies them
87 to the preprocessor, which interprets directives and expands macro
88 invocations. The token sequences returned by the preprocessor are then
89 marshaled to constitute the cooked character stream that is the output of
92 The preprocessor and prescanner can both instantiate new temporary
93 instances of the Prescanner class to locate, open, and process any
96 The tight interaction and mutual design of the prescanner and preprocessor
97 enable a principled implementation of preprocessing for the Fortran
98 language that implements a reasonable facsimile of the C language
99 preprocessor that is fully aware of Fortran's source forms, line
100 continuation mechanisms, case insensitivity, token syntax, &c.
102 The preprocessor always runs. There's no good reason for it not to.
104 The content of the cooked character stream is available and useful
105 for debugging, being as it is a simple value forwarded from the first major
106 pass of the compiler to the second.
110 The prescanner constructs a chronicle of every file that is read by the
111 parser, viz. the original source file and all others that it directly
112 or indirectly includes. One copy of the content of each of these files
113 is mapped or read into the address space of the parser. Memory mapping
114 is used initially, but files with DOS line breaks or a missing terminal
115 newline are immediately normalized in a buffer when necessary.
117 The virtual input stream, which marshals every appearance of every file
118 and every expansion of every macro invocation, is not materialized as
119 an actual stream of bytes. There is, however, a mapping from each byte
120 position in this virtual input stream back to whence it came (maintained
121 by an instance of the AllSources class). Offsets into this virtual input
122 stream constitute values of the Provenance class. Provenance values,
123 and contiguous ranges thereof, are used to describe and delimit source
124 positions for messaging.
126 Further, every byte in the cooked character stream supplied by the
127 prescanner to the parser can be inexpensively mapped to its provenance.
128 Simple `const char *` pointers to characters in the cooked character
129 stream, or to contiguous ranges thereof, are used as source position
130 indicators within the parser and in the parse tree.
134 Message texts, and snprintf-like formatting strings for constructing
135 messages, are instantiated in the various components of the parser with
136 C++ user defined character literals tagged with `_err_en_US`, `_warn_en_US`,
137 `port_en_US`, `because_en_US`, `todo_en_US`, and `_en_US` to signify severity
139 The default language is the dialect of English used in the United States.
141 All "fatal" errors that do not immediately abort compilation but do
142 prevent the generation of binary and module files are `_err_en_US`.
143 Warnings about detected flaws in the program that probably indicate
144 problems worth attention are `_warn_en_US`.
145 Non-conforming extensions, legacy features, and obsolescent or deleted
146 features will raise `_port_en_US` messages when those are enabled.
147 Messages that are explanatory attachments to others are `_because_en_US`.
148 Messages signifying an incomplete compiler feature are `_todo_en_US`.
149 Other messages have a simple `_en_US` suffix.
151 As described above, messages are associated with
152 source code positions by means of provenance values.
156 Each of the ca. 450 numbered requirement productions in the standard
157 Fortran language grammar, as well as the productions implied by legacy
158 extensions and preserved obsolescent features, maps to a distinct class
159 in the parse tree so as to maximize the efficacy of static type checking
162 A transcription of the Fortran grammar appears with production requirement
163 numbers in the commentary before these class definitions, so that one
164 may easily refer to the standard (or to the parse tree definitions while
165 reading that document).
167 Three paradigms collectively implement most of the parse tree classes:
168 * *wrappers*, in which a single data member `v` has been encapsulated
170 * *tuples* (or product types), in which several values of arbitrary
171 types have been encapsulated in a single data member `t` whose type
172 is an instance of `std::tuple<>`
173 * *discriminated unions* (or sum types), in which one value whose type is
174 a dynamic selection from a set of distinct types is saved in a data
175 member `u` whose type is an instance of `std::variant<>`
177 The use of these patterns is a design convenience, and exceptions to them
178 are not uncommon wherever it made better sense to write custom definitions.
180 Parse tree entities should be viewed as values, not objects; their
181 addresses should not be abused for purposes of identification. They are
182 assembled with C++ move semantics during parse tree construction.
183 Their default and copy constructors are deliberately deleted in their
186 The std::list<> data type is used in the parse tree to reliably store pointers
187 to other relevant entries in the tree. Since the tree lists are moved and
188 spliced at certain points std::list<> provides the necessary guarantee of the
189 stability of pointers into these lists.
191 There is a general purpose library by means of which parse trees may
196 This compiler attempts to recognize the entire cooked character stream
197 (see above) as a Fortran program. It records the reductions made during
198 a successful recognition as a parse tree value. The recognized grammar
199 is that of a whole source file, not just of its possible statements,
200 so the parser has no global state that tracks the subprogram hierarchy
201 or the structure of their nested block constructs. The parser performs
202 no semantic analysis along the way, deferring all of that work to the
203 next pass of the compiler.
205 The resulting parse tree therefore necessarily contains ambiguous parses
206 that cannot be resolved without recourse to a symbol table. Most notably,
207 leading assignments to array elements can be misrecognized as statement
208 function definitions, and array element references can be misrecognized
209 as function calls. The semantic analysis phase of the compiler performs
210 local rewrites of the parse tree once it can be disambiguated by symbols
213 Formally speaking, this parser is based on recursive descent with
214 localized backtracking (specifically, it will not backtrack into a
215 successful reduction to try its other alternatives). It is not generated
216 as a table or code from a specification of the Fortran grammar; rather, it
217 _is_ the grammar, as declaratively respecified in C++ constant expressions
218 using a small collection of basic token recognition objects and a library
219 of "parser combinator" template functions that compose them to form more
220 complicated recognizers and their correspondences to the construction
221 of parse tree values.
225 Parse trees can be converted back into free form Fortran source code.
226 This formatter is not really a classical "pretty printer", but is
227 more of a data structure dump whose output is suitable for compilation
228 by another compiler. It is also used for testing the parser, since a
229 reparse of an unparsed parse tree should be an identity function apart from