-# Raw AST node hierarchy.
-# This file was generated by SableCC (http://www.sablecc.org/).
-package parser_nodes
+# This file is part of NIT ( http://www.nitlanguage.org ).
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+# http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
-# Root of the AST hierarchy
-abstract class PNode
+# AST nodes of the Nit language
+# Was previously based on parser_abs.nit.
+module parser_nodes
+
+import location
+
+# Root of the AST class-hierarchy
+abstract class ANode
+ # Location is set during AST building. Once built, location cannon be null.
+ # However, manual instantiated nodes may need more care.
+ var location: Location is writable, noinit
+
+ # The location of the important part of the node (identifier or whatever)
+ fun hot_location: Location do return location
+
+ # Display a message for the colored location of the node
+ fun debug(message: String)
+ do
+ sys.stderr.write "{hot_location} {self.class_name}: {message}\n{hot_location.colored_line("0;32")}\n"
+ end
+
+ # Parent of the node in the AST
+ var parent: nullable ANode = null
+
+ # The topmost ancestor of the element
+ # This just apply `parent` until the first one
+ fun root: ANode
+ do
+ var res = self
+ loop
+ var p = res.parent
+ if p == null then return res
+ res = p
+ end
+ end
+
+ # The most specific common parent between `self` and `other`
+ # Return null if the two node are unrelated (distinct root)
+ fun common_parent(other: ANode): nullable ANode
+ do
+ # First, get the same depth
+ var s: nullable ANode = self
+ var o: nullable ANode = other
+ var d = s.depth - o.depth
+ while d > 0 do
+ s = s.parent
+ d -= 1
+ end
+ while d < 0 do
+ o = o.parent
+ d += 1
+ end
+ assert o.depth == s.depth
+ # Second, go up until same in found
+ while s != o do
+ s = s.parent
+ o = o.parent
+ end
+ return s
+ end
+
+ # Number of nodes between `self` and the `root` of the AST
+ # ENSURE `self == self.root implies result == 0 `
+ # ENSURE `self != self.root implies result == self.parent.depth + 1`
+ fun depth: Int
+ do
+ var n = self
+ var res = 0
+ loop
+ var p = n.parent
+ if p == null then return res
+ n = p
+ res += 1
+ end
+ end
+
+ # Replace a child with an other node in the AST
+ private fun replace_child(old_child: ANode, new_child: nullable ANode) is abstract
+
+ # Detach a node from its parent
+ # Aborts if the node is not detachable. use `replace_with` instead
+ # REQUIRE: parent != null
+ # REQUIRE: is_detachable
+ # ENDURE: parent == null
+ fun detach
+ do
+ assert parent != null
+ parent.replace_child(self, null)
+ parent = null
+ end
+
+ # Replace itself with an other node in the AST
+ # REQUIRE: parent != null
+ # ENSURE: node.parent == old(parent)
+ # ENSURE: parent == null
+ fun replace_with(node: ANode)
+ do
+ assert parent != null
+ parent.replace_child(self, node)
+ parent = null
+ end
+
+ # Visit all nodes in order.
+ # Thus, call `v.enter_visit(e)` for each child `e`
+ fun visit_all(v: Visitor) is abstract
+end
+
+# A sequence of nodes
+# It is a specific class (instead of using a Array) to track the parent/child relation when nodes are added or removed
+class ANodes[E: ANode]
+ super Sequence[E]
+ private var parent: ANode
+ private var items = new Array[E]
+ redef fun iterator do return items.iterator
+ redef fun length do return items.length
+ redef fun is_empty do return items.is_empty
+ redef fun push(e)
+ do
+ hook_add(e)
+ items.push(e)
+ end
+ redef fun pop
+ do
+ var res = items.pop
+ hook_remove(res)
+ return res
+ end
+ redef fun unshift(e)
+ do
+ hook_add(e)
+ items.unshift(e)
+ end
+ redef fun shift
+ do
+ var res = items.shift
+ hook_remove(res)
+ return res
+ end
+ redef fun has(e)
+ do
+ return items.has(e)
+ end
+ redef fun [](index)
+ do
+ return items[index]
+ end
+ redef fun []=(index, e)
+ do
+ hook_remove(self[index])
+ hook_add(e)
+ items[index]=e
+ end
+ redef fun remove_at(index)
+ do
+ hook_remove(items[index])
+ items.remove_at(index)
+ end
+ private fun hook_add(e: E)
+ do
+ #assert e.parent == null
+ e.parent = parent
+ end
+ private fun hook_remove(e: E)
+ do
+ assert e.parent == parent
+ e.parent = null
+ end
+
+ # Used in parent constructor to fill elements
+ private fun unsafe_add_all(nodes: Collection[Object])
+ do
+ var parent = self.parent
+ for n in nodes do
+ assert n isa E
+ add n
+ n.parent = parent
+ end
+ end
+
+ private fun replace_child(old_child: ANode, new_child: nullable ANode): Bool
+ do
+ var parent = self.parent
+ for i in [0..length[ do
+ if self[i] == old_child then
+ if new_child != null then
+ assert new_child isa E
+ self[i] = new_child
+ new_child.parent = parent
+ else
+ self.remove_at(i)
+ end
+ return true
+ end
+ end
+ return false
+ end
+
+ private fun visit_all(v: Visitor)
+ do
+ for n in self do v.enter_visit(n)
+ end
end
# Ancestor of all tokens
+# A token is a node that has a `text` but no children.
abstract class Token
-special PNode
+ super ANode
+
+ # The raw content on the token
+ fun text: String is abstract
+
+ # The raw content on the token
+ fun text=(text: String) is abstract
+
+ # The previous token in the Lexer.
+ # May have disappeared in the AST
+ var prev_token: nullable Token = null
+
+ # The next token in the Lexer.
+ # May have disappeared in the AST
+ var next_token: nullable Token = null
+
+ # The verbatim blank text between `prev_token` and `self`
+ fun blank_before: String
+ do
+ if prev_token == null then return ""
+ var from = prev_token.location.pend+1
+ var to = location.pstart
+ return location.file.string.substring(from,to-from)
+ end
+
+ redef fun to_s: String do
+ return "'{text}'"
+ end
+
+ redef fun visit_all(v: Visitor) do end
+ redef fun replace_child(old_child: ANode, new_child: nullable ANode) do end
+end
+
+redef class SourceFile
+ # The first token parser by the lexer
+ # May have disappeared in the final AST
+ var first_token: nullable Token = null
+
+ # The first token parser by the lexer
+ # May have disappeared in the final AST
+ var last_token: nullable Token = null
end
# Ancestor of all productions
+# A production is a node without text but that usually has children.
abstract class Prod
-special PNode
+ super ANode
+
+ # All the annotations attached directly to the node
+ var n_annotations: nullable AAnnotations = null is writable
+
+ redef fun replace_with(n: ANode)
+ do
+ super
+ assert n isa Prod
+ if not isset n._location and isset _location then n._location = _location
+ end
end
+
+# Abstract standard visitor on the AST
+abstract class Visitor
+ # What the visitor do when a node is visited
+ # Concrete visitors should implement this method.
+ # @toimplement
+ protected fun visit(e: ANode) is abstract
+
+ # Ask the visitor to visit a given node.
+ # Usually automatically called by visit_all* methods.
+ # This method should not be redefined
+ fun enter_visit(e: nullable ANode)
+ do
+ if e == null then return
+ var old = _current_node
+ _current_node = e
+ visit(e)
+ _current_node = old
+ end
+
+ # The current visited node
+ var current_node: nullable ANode = null is writable
+end
+
+# Token of end of line (basically `\n`)
class TEol
-special Token
+ super Token
+ redef fun to_s
+ do
+ return "end of line"
+ end
end
+
+# Token of a line of comments
+# Starts with the `#` and contains the final end-of-line (if any)
class TComment
-special Token
+ super Token
end
+
+# A token associated with a keyword
+abstract class TokenKeyword
+ super Token
+ redef fun to_s
+ do
+ return "keyword '{text}'"
+ end
+end
+
+# The deprecated keyword `package`.
class TKwpackage
-special Token
+ super TokenKeyword
end
+
+# The keyword `module`
+class TKwmodule
+ super TokenKeyword
+end
+
+# The keyword `import`
class TKwimport
-special Token
+ super TokenKeyword
end
+
+# The keyword `class`
class TKwclass
-special Token
+ super TokenKeyword
end
+
+# The keyword `abstract`
class TKwabstract
-special Token
+ super TokenKeyword
end
+
+# The keyword `interface`
class TKwinterface
-special Token
+ super TokenKeyword
end
-class TKwuniversal
-special Token
-end
-class TKwspecial
-special Token
+
+# The keywords `enum` ane `universal`
+class TKwenum
+ super TokenKeyword
end
+
+# The keyword `end`
class TKwend
-special Token
+ super TokenKeyword
end
+
+# The keyword `fun`
class TKwmeth
-special Token
+ super TokenKeyword
end
+
+# The keyword `type`
class TKwtype
-special Token
-end
-class TKwattr
-special Token
+ super TokenKeyword
end
+
+# The keyword `init`
class TKwinit
-special Token
+ super TokenKeyword
end
+
+# The keyword `redef`
class TKwredef
-special Token
+ super TokenKeyword
end
+
+# The keyword `is`
class TKwis
-special Token
+ super TokenKeyword
end
+
+# The keyword `do`
class TKwdo
-special Token
-end
-class TKwreadable
-special Token
-end
-class TKwwritable
-special Token
+ super TokenKeyword
end
+
+# The keyword `var`
class TKwvar
-special Token
-end
-class TKwintern
-special Token
+ super TokenKeyword
end
+
+# The keyword `extern`
class TKwextern
-special Token
+ super TokenKeyword
+end
+
+# The keyword `public`
+class TKwpublic
+ super TokenKeyword
end
+
+# The keyword `protected`
class TKwprotected
-special Token
+ super TokenKeyword
end
+
+# The keyword `private`
class TKwprivate
-special Token
+ super TokenKeyword
end
+
+# The keyword `intrude`
class TKwintrude
-special Token
+ super TokenKeyword
end
+
+# The keyword `if`
class TKwif
-special Token
+ super TokenKeyword
end
+
+# The keyword `then`
class TKwthen
-special Token
+ super TokenKeyword
end
+
+# The keyword `else`
class TKwelse
-special Token
+ super TokenKeyword
end
+
+# The keyword `while`
class TKwwhile
-special Token
+ super TokenKeyword
+end
+
+# The keyword `loop`
+class TKwloop
+ super TokenKeyword
end
+
+# The keyword `for`
class TKwfor
-special Token
+ super TokenKeyword
end
+
+# The keyword `in`
class TKwin
-special Token
+ super TokenKeyword
end
+
+# The keyword `and`
class TKwand
-special Token
+ super TokenKeyword
end
+
+# The keyword `or`
class TKwor
-special Token
+ super TokenKeyword
+end
+
+# The keyword `implies`
+class TKwimplies
+ super TokenKeyword
end
+
+# The keyword `not`
class TKwnot
-special Token
+ super TokenKeyword
end
+
+# The keyword `return`
class TKwreturn
-special Token
+ super TokenKeyword
end
+
+# The keyword `continue`
class TKwcontinue
-special Token
+ super TokenKeyword
end
+
+# The keyword `break`
class TKwbreak
-special Token
+ super TokenKeyword
end
+
+# The keyword `abort`
class TKwabort
-special Token
+ super TokenKeyword
end
+
+# The keyword `assert`
class TKwassert
-special Token
+ super TokenKeyword
end
+
+# The keyword `new`
class TKwnew
-special Token
+ super TokenKeyword
end
+
+# The keyword `isa`
class TKwisa
-special Token
+ super TokenKeyword
end
+
+# The keyword `once`
class TKwonce
-special Token
+ super TokenKeyword
end
+
+# The keyword `super`
class TKwsuper
-special Token
+ super TokenKeyword
end
+
+# The keyword `self`
class TKwself
-special Token
+ super TokenKeyword
end
+
+# The keyword `true`
class TKwtrue
-special Token
+ super TokenKeyword
end
+
+# The keyword `false`
class TKwfalse
-special Token
+ super TokenKeyword
end
+
+# The keyword `null`
class TKwnull
-special Token
+ super TokenKeyword
end
+
+# The keyword `as`
class TKwas
-special Token
+ super TokenKeyword
+end
+
+# The keyword `nullable`
+class TKwnullable
+ super TokenKeyword
+end
+
+# The keyword `isset`
+class TKwisset
+ super TokenKeyword
+end
+
+# The keyword `label`
+class TKwlabel
+ super TokenKeyword
end
+
+# The special keyword `__DEBUG__`
+class TKwdebug
+ super Token
+end
+
+# The symbol `(`
class TOpar
-special Token
+ super Token
end
+
+# The symbol `)`
class TCpar
-special Token
+ super Token
end
+
+# The symbol `[`
class TObra
-special Token
+ super Token
end
+
+# The symbol `]`
class TCbra
-special Token
+ super Token
end
+
+# The symbol `,`
class TComma
-special Token
+ super Token
end
+
+# The symbol `:`
class TColumn
-special Token
+ super Token
end
+
+# The symbol `::`
class TQuad
-special Token
+ super Token
end
+
+# The symbol `=`
class TAssign
-special Token
+ super Token
end
+
+# A token associated with an operator (and other lookalike symbols)
+abstract class TokenOperator
+ super Token
+ redef fun to_s
+ do
+ return "operator '{text}'"
+ end
+end
+
+# The operator `+=`
class TPluseq
-special Token
+ super TokenOperator
end
+
+# The operator `-=`
class TMinuseq
-special Token
+ super TokenOperator
end
+
+# The symbol `...`
class TDotdotdot
-special Token
+ super Token
end
+
+# The symbol `..`
class TDotdot
-special Token
+ super Token
end
+
+# The symbol `.`
class TDot
-special Token
+ super Token
end
+
+# The operator `+`
class TPlus
-special Token
+ super TokenOperator
end
+
+# The operator `-`
class TMinus
-special Token
+ super TokenOperator
end
+
+# The operator `*`
class TStar
-special Token
+ super TokenOperator
+end
+
+# The operator `**`
+class TStarstar
+ super TokenOperator
end
+
+# The operator `/`
class TSlash
-special Token
+ super TokenOperator
end
+
+# The operator `+%
class TPercent
-special Token
+ super TokenOperator
end
+
+# The operator `==`
class TEq
-special Token
+ super TokenOperator
end
+
+# The operator `!=`
class TNe
-special Token
+ super TokenOperator
end
+
+# The operator `<`
class TLt
-special Token
+ super TokenOperator
end
+
+# The operator `<=`
class TLe
-special Token
+ super TokenOperator
end
+
+# The operator `<<`
+class TLl
+ super TokenOperator
+end
+
+# The operator `>`
class TGt
-special Token
+ super TokenOperator
end
+
+# The operator `>=`
class TGe
-special Token
+ super TokenOperator
end
+
+# The operator `>>`
+class TGg
+ super TokenOperator
+end
+
+# The operator `<=>`
class TStarship
-special Token
+ super TokenOperator
end
+
+# The operator `!`
+class TBang
+ super TokenOperator
+end
+
+# The symbol `@`
+class TAt
+ super Token
+end
+
+# A class (or formal type) identifier. They start with an uppercase.
class TClassid
-special Token
+ super Token
+ redef fun to_s
+ do
+ do return "type identifier '{text}'"
+ end
end
+
+# A standard identifier (variable, method...). They start with a lowercase.
class TId
-special Token
+ super Token
+ redef fun to_s
+ do
+ do return "identifier '{text}'"
+ end
end
+
+# An attribute identifier. They start with an underscore.
class TAttrid
-special Token
+ super Token
+ redef fun to_s
+ do
+ do return "attribute '{text}'"
+ end
+end
+
+# A token of a literal value (string, integer, etc).
+abstract class TokenLiteral
+ super Token
+ redef fun to_s
+ do
+ do return "literal value '{text}'"
+ end
end
+
+# A literal decimal integer
class TNumber
-special Token
+ super TokenLiteral
+end
+
+# A literal hexadecimal integer
+class THexNumber
+ super TokenLiteral
end
+
+# A literal floating point number
class TFloat
-special Token
+ super TokenLiteral
end
+
+# A literal character
class TChar
-special Token
+ super TokenLiteral
end
+
+# A literal string
class TString
-special Token
+ super TokenLiteral
end
+
+# The starting part of a super string (between `"` and `{`)
class TStartString
-special Token
+ super TokenLiteral
end
+
+# The middle part of a super string (between `}` and `{`)
class TMidString
-special Token
+ super TokenLiteral
end
+
+# The final part of a super string (between `}` and `"`)
class TEndString
-special Token
-end
-class EOF
-special Token
-end
-class PError
-special EOF
-end
-
-class PModule special Prod end
-class PPackagedecl special Prod end
-class PImport special Prod end
-class PVisibility special Prod end
-class PClassdef special Prod end
-class PClasskind special Prod end
-class PFormaldef special Prod end
-class PSuperclass special Prod end
-class PPropdef special Prod
- readable writable attr _n_doc: PDoc
-end
-class PAble special Prod
- readable writable attr _n_kwredef: TKwredef
-end
-class PMethid special Prod end
-class PSignature special Prod end
-class PParam
-special Prod
- readable writable attr _n_id: TId
- readable writable attr _n_type: PType
-end
-class PType special Prod end
-class PExpr special Prod end
-class PAssignOp special Prod end
-class PQualified special Prod end
-class PDoc special Prod end
+ super TokenLiteral
+end
+
+# A malformed string
+class TBadString
+ super Token
+ redef fun to_s
+ do
+ do return "malformed string {text}"
+ end
+end
+
+# A malformed char
+class TBadChar
+ super Token
+ redef fun to_s
+ do
+ do return "malformed character {text}"
+ end
+end
+
+# A extern code block
+class TExternCodeSegment
+ super Token
+end
+
+# A end of file
+class EOF
+ super Token
+ redef fun to_s
+ do
+ return "end of file"
+ end
+end
+
+# A mark of an error
+class AError
+ super EOF
+end
+# A lexical error (unexpected character)
+class ALexerError
+ super AError
+end
+# A syntactic error (unexpected token)
+class AParserError
+ super AError
+end
+# The main node of a Nit source-file
class AModule
-special PModule
- readable writable attr _n_packagedecl: PPackagedecl
- readable writable attr _n_imports: List[PImport]
- readable writable attr _n_classdefs: List[PClassdef]
-end
-class APackagedecl
-special PPackagedecl
- readable writable attr _n_doc: PDoc
- readable writable attr _n_kwpackage: TKwpackage
- readable writable attr _n_id: TId
-end
-class AImport
-special PImport
- readable writable attr _n_visibility: PVisibility
- readable writable attr _n_kwimport: TKwimport
- readable writable attr _n_id: TId
+ super Prod
+
+ var n_moduledecl: nullable AModuledecl = null is writable
+ var n_imports = new ANodes[AImport](self)
+ var n_extern_code_blocks = new ANodes[AExternCodeBlock](self)
+ var n_classdefs = new ANodes[AClassdef](self)
+end
+
+# The declaration of the module with the documentation, name, and annotations
+class AModuledecl
+ super Prod
+ var n_doc: nullable ADoc = null is writable
+ var n_kwredef: nullable TKwredef = null is writable
+ var n_visibility: AVisibility is writable, noinit
+ var n_kwmodule: TKwmodule is writable, noinit
+ var n_name: AModuleName is writable, noinit
+end
+
+# A import clause of a module
+abstract class AImport
+ super Prod
+end
+
+# A standard import clause. eg `import x`
+class AStdImport
+ super AImport
+ var n_visibility: AVisibility is writable, noinit
+ var n_kwimport: TKwimport is writable, noinit
+ var n_name: AModuleName is writable, noinit
end
+
+# The special import clause of the kernel module. eg `import end`
class ANoImport
-special PImport
- readable writable attr _n_visibility: PVisibility
- readable writable attr _n_kwimport: TKwimport
- readable writable attr _n_kwend: TKwend
+ super AImport
+ var n_visibility: AVisibility is writable, noinit
+ var n_kwimport: TKwimport is writable, noinit
+ var n_kwend: TKwend is writable, noinit
+end
+
+# A visibility modifier
+#
+# The public visibility is an empty production (no keyword).
+#
+# Note: even if some visibilities are only valid on some placse (for instance, no `protected` class or no `intrude` method)
+# the parser has no such a restriction, therefore the semantic phases has to check that the visibilities make sense.
+abstract class AVisibility
+ super Prod
end
+
+# An implicit or explicit public visibility modifier
class APublicVisibility
-special PVisibility
+ super AVisibility
+ var n_kwpublic: nullable TKwpublic is writable
end
+# An explicit private visibility modifier
class APrivateVisibility
-special PVisibility
- readable writable attr _n_kwprivate: TKwprivate
+ super AVisibility
+ var n_kwprivate: TKwprivate is writable, noinit
end
+# An explicit protected visibility modifier
class AProtectedVisibility
-special PVisibility
- readable writable attr _n_kwprotected: TKwprotected
+ super AVisibility
+ var n_kwprotected: TKwprotected is writable, noinit
end
+# An explicit intrude visibility modifier
class AIntrudeVisibility
-special PVisibility
- readable writable attr _n_kwintrude: TKwintrude
-end
-class AClassdef
-special PClassdef
- readable writable attr _n_doc: PDoc
- readable writable attr _n_kwredef: TKwredef
- readable writable attr _n_visibility: PVisibility
- readable writable attr _n_classkind: PClasskind
- readable writable attr _n_id: TClassid
- readable writable attr _n_formaldefs: List[PFormaldef]
- readable writable attr _n_superclasses: List[PSuperclass]
- readable writable attr _n_propdefs: List[PPropdef]
+ super AVisibility
+ var n_kwintrude: TKwintrude is writable, noinit
end
+
+# A class definition
+# While most definition are `AStdClassdef`
+# There is tow special case of class definition
+abstract class AClassdef
+ super Prod
+ var n_propdefs = new ANodes[APropdef](self)
+end
+
+# A standard class definition with a name, superclasses and properties
+class AStdClassdef
+ super AClassdef
+ var n_doc: nullable ADoc = null is writable
+ var n_kwredef: nullable TKwredef = null is writable
+ var n_visibility: AVisibility is writable, noinit
+ var n_classkind: AClasskind is writable, noinit
+ var n_id: nullable TClassid = null is writable
+ var n_formaldefs = new ANodes[AFormaldef](self)
+ var n_extern_code_block: nullable AExternCodeBlock = null is writable
+ var n_superclasses = new ANodes[ASuperclass](self)
+ var n_kwend: TKwend is writable, noinit
+ redef fun hot_location do return n_id.location
+end
+
+# The implicit class definition of the implicit main method
class ATopClassdef
-special PClassdef
- readable writable attr _n_propdefs: List[PPropdef]
+ super AClassdef
end
+
+# The implicit class definition of the top-level methods
class AMainClassdef
-special PClassdef
- readable writable attr _n_propdefs: List[PPropdef]
+ super AClassdef
+end
+
+# The modifier for the kind of class (abstract, interface, etc.)
+abstract class AClasskind
+ super Prod
end
+
+# A default, or concrete class modifier (just `class`)
class AConcreteClasskind
-special PClasskind
- readable writable attr _n_kwclass: TKwclass
+ super AClasskind
+ var n_kwclass: TKwclass is writable, noinit
end
+
+# An abstract class modifier (`abstract class`)
class AAbstractClasskind
-special PClasskind
- readable writable attr _n_kwabstract: TKwabstract
- readable writable attr _n_kwclass: TKwclass
+ super AClasskind
+ var n_kwabstract: TKwabstract is writable, noinit
+ var n_kwclass: TKwclass is writable, noinit
end
+
+# An interface class modifier (`interface`)
class AInterfaceClasskind
-special PClasskind
- readable writable attr _n_kwinterface: TKwinterface
+ super AClasskind
+ var n_kwinterface: TKwinterface is writable, noinit
+end
+
+# An enum/universal class modifier (`enum class`)
+class AEnumClasskind
+ super AClasskind
+ var n_kwenum: TKwenum is writable, noinit
end
-class AUniversalClasskind
-special PClasskind
- readable writable attr _n_kwuniversal: TKwuniversal
+
+# An extern class modifier (`extern class`)
+class AExternClasskind
+ super AClasskind
+ var n_kwextern: TKwextern is writable, noinit
+ var n_kwclass: nullable TKwclass = null is writable
end
+
+# The definition of a formal generic parameter type. eg `X: Y`
class AFormaldef
-special PFormaldef
- readable writable attr _n_id: TClassid
- readable writable attr _n_type: PType
+ super Prod
+ var n_id: TClassid is writable, noinit
+ # The bound of the parameter type
+ var n_type: nullable AType = null is writable
end
+
+# A super-class. eg `super X`
class ASuperclass
-special PSuperclass
- readable writable attr _n_kwspecial: TKwspecial
- readable writable attr _n_type: PType
+ super Prod
+ var n_kwsuper: TKwsuper is writable, noinit
+ var n_type: AType is writable, noinit
end
+
+# The definition of a property
+abstract class APropdef
+ super Prod
+ var n_doc: nullable ADoc = null is writable
+ var n_kwredef: nullable TKwredef = null is writable
+ var n_visibility: nullable AVisibility = null is writable
+end
+
+# A definition of an attribute
+# For historical reason, old-syle and new-style attributes use the same `ANode` sub-class
class AAttrPropdef
-special PPropdef
- readable writable attr _n_kwredef: TKwredef
- readable writable attr _n_visibility: PVisibility
- readable writable attr _n_kwattr: TKwattr
- readable writable attr _n_id: TAttrid
- readable writable attr _n_type: PType
- readable writable attr _n_readable: PAble
- readable writable attr _n_writable: PAble
- readable writable attr _n_expr: PExpr
+ super APropdef
+ var n_kwvar: TKwvar is writable, noinit
+
+ # The identifier for a new-style attribute (null if old-style)
+ var n_id2: TId is writable, noinit
+
+ var n_type: nullable AType = null is writable
+
+ # The initial value, if any
+ var n_expr: nullable AExpr = null is writable
+ redef fun hot_location
+ do
+ return n_id2.location
+ end
end
+
+# A definition of all kind of method (including constructors)
class AMethPropdef
-special PPropdef
- readable writable attr _n_kwredef: TKwredef
- readable writable attr _n_visibility: PVisibility
- readable writable attr _n_methid: PMethid
- readable writable attr _n_signature: PSignature
-end
-class ADeferredMethPropdef
-special AMethPropdef
- readable writable attr _n_kwmeth: TKwmeth
-end
-class AInternMethPropdef
-special AMethPropdef
- readable writable attr _n_kwmeth: TKwmeth
-end
-class AExternMethPropdef
-special AMethPropdef
- readable writable attr _n_kwmeth: TKwmeth
- readable writable attr _n_extern: TString
-end
-class AConcreteMethPropdef
-special AMethPropdef
- readable writable attr _n_kwmeth: TKwmeth
- readable writable attr _n_block: PExpr
-end
-class AConcreteInitPropdef
-special AConcreteMethPropdef
- readable writable attr _n_kwinit: TKwinit
+ super APropdef
+ var n_kwmeth: nullable TKwmeth = null is writable
+ var n_kwinit: nullable TKwinit = null is writable
+ var n_kwnew: nullable TKwnew = null is writable
+ var n_methid: nullable AMethid = null is writable
+ var n_signature: nullable ASignature = null is writable
+ var n_block: nullable AExpr = null is writable
+ var n_extern_calls: nullable AExternCalls = null is writable
+ var n_extern_code_block: nullable AExternCodeBlock = null is writable
+ redef fun hot_location
+ do
+ if n_methid != null then
+ return n_methid.location
+ else if n_kwinit != null then
+ return n_kwinit.location
+ else if n_kwnew != null then
+ return n_kwnew.location
+ else
+ return location
+ end
+ end
end
+
+# The implicit main method
class AMainMethPropdef
-special AConcreteMethPropdef
+ super AMethPropdef
end
-class ATypePropdef
-special PPropdef
- readable writable attr _n_kwredef: TKwredef
- readable writable attr _n_visibility: PVisibility
- readable writable attr _n_kwtype: TKwtype
- readable writable attr _n_id: TClassid
- readable writable attr _n_type: PType
+
+# Declaration of callbacks for extern methods
+class AExternCalls
+ super Prod
+ var n_kwimport: TKwimport is writable, noinit
+ var n_extern_calls: ANodes[AExternCall] = new ANodes[AExternCall](self)
+end
+
+# A single callback declaration
+abstract class AExternCall
+ super Prod
end
-class AReadAble
-special PAble
- readable writable attr _n_kwreadable: TKwreadable
+
+# A single callback declaration on a method
+abstract class APropExternCall
+ super AExternCall
end
-class AWriteAble
-special PAble
- readable writable attr _n_kwwritable: TKwwritable
+
+# A single callback declaration on a method on the current receiver
+class ALocalPropExternCall
+ super APropExternCall
+ var n_methid: AMethid is writable, noinit
+end
+
+# A single callback declaration on a method on an explicit receiver type.
+class AFullPropExternCall
+ super APropExternCall
+ var n_type: AType is writable, noinit
+ var n_dot: nullable TDot = null is writable
+ var n_methid: AMethid is writable, noinit
+end
+
+# A single callback declaration on a method on a constructor
+class AInitPropExternCall
+ super APropExternCall
+ var n_type: AType is writable, noinit
+end
+
+# A single callback declaration on a `super` call
+class ASuperExternCall
+ super AExternCall
+ var n_kwsuper: TKwsuper is writable, noinit
+end
+
+# A single callback declaration on a cast
+abstract class ACastExternCall
+ super AExternCall
end
+
+# A single callback declaration on a cast to a given type
+class ACastAsExternCall
+ super ACastExternCall
+ var n_from_type: AType is writable, noinit
+ var n_dot: nullable TDot = null is writable
+ var n_kwas: TKwas is writable, noinit
+ var n_to_type: AType is writable, noinit
+end
+
+# A single callback declaration on a cast to a nullable type
+class AAsNullableExternCall
+ super ACastExternCall
+ var n_type: AType is writable, noinit
+ var n_kwas: TKwas is writable, noinit
+ var n_kwnullable: TKwnullable is writable, noinit
+end
+
+# A single callback declaration on a cast to a non-nullable type
+class AAsNotNullableExternCall
+ super ACastExternCall
+ var n_type: AType is writable, noinit
+ var n_kwas: TKwas is writable, noinit
+ var n_kwnot: TKwnot is writable, noinit
+ var n_kwnullable: TKwnullable is writable, noinit
+end
+
+# A definition of a virtual type
+class ATypePropdef
+ super APropdef
+ var n_kwtype: TKwtype is writable, noinit
+ var n_id: TClassid is writable, noinit
+ var n_type: AType is writable, noinit
+end
+
+# The identifier of a method in a method declaration.
+# There is a specific class because of operator and setters.
+abstract class AMethid
+ super Prod
+end
+
+# A method name with a simple identifier
class AIdMethid
-special PMethid
- readable writable attr _n_id: TId
+ super AMethid
+ var n_id: TId is writable, noinit
end
+
+# A method name `+`
class APlusMethid
-special PMethid
- readable writable attr _n_plus: TPlus
+ super AMethid
+ var n_plus: TPlus is writable, noinit
end
+
+# A method name `-`
class AMinusMethid
-special PMethid
- readable writable attr _n_minus: TMinus
+ super AMethid
+ var n_minus: TMinus is writable, noinit
end
+
+# A method name `*`
class AStarMethid
-special PMethid
- readable writable attr _n_star: TStar
+ super AMethid
+ var n_star: TStar is writable, noinit
end
+
+# A method name `**`
+class AStarstarMethid
+ super AMethid
+ var n_starstar: TStarstar is writable, noinit
+end
+
+# A method name `/`
class ASlashMethid
-special PMethid
- readable writable attr _n_slash: TSlash
+ super AMethid
+ var n_slash: TSlash is writable, noinit
end
+
+# A method name `%`
class APercentMethid
-special PMethid
- readable writable attr _n_percent: TPercent
+ super AMethid
+ var n_percent: TPercent is writable, noinit
end
+
+# A method name `==`
class AEqMethid
-special PMethid
- readable writable attr _n_eq: TEq
+ super AMethid
+ var n_eq: TEq is writable, noinit
end
+
+# A method name `!=`
class ANeMethid
-special PMethid
- readable writable attr _n_ne: TNe
+ super AMethid
+ var n_ne: TNe is writable, noinit
end
+
+# A method name `<=`
class ALeMethid
-special PMethid
- readable writable attr _n_le: TLe
+ super AMethid
+ var n_le: TLe is writable, noinit
end
+
+# A method name `>=`
class AGeMethid
-special PMethid
- readable writable attr _n_ge: TGe
+ super AMethid
+ var n_ge: TGe is writable, noinit
end
+
+# A method name `<`
class ALtMethid
-special PMethid
- readable writable attr _n_lt: TLt
+ super AMethid
+ var n_lt: TLt is writable, noinit
end
+
+# A method name `>`
class AGtMethid
-special PMethid
- readable writable attr _n_gt: TGt
+ super AMethid
+ var n_gt: TGt is writable, noinit
end
+
+# A method name `<<`
+class ALlMethid
+ super AMethid
+ var n_ll: TLl is writable, noinit
+end
+
+# A method name `>>`
+class AGgMethid
+ super AMethid
+ var n_gg: TGg is writable, noinit
+end
+
+# A method name `[]`
class ABraMethid
-special PMethid
- readable writable attr _n_obra: TObra
- readable writable attr _n_cbra: TCbra
+ super AMethid
+ var n_obra: TObra is writable, noinit
+ var n_cbra: TCbra is writable, noinit
end
+
+# A method name `<=>`
class AStarshipMethid
-special PMethid
- readable writable attr _n_starship: TStarship
+ super AMethid
+ var n_starship: TStarship is writable, noinit
end
+
+# A setter method name with a simple identifier (with a `=`)
class AAssignMethid
-special PMethid
- readable writable attr _n_id: TId
- readable writable attr _n_assign: TAssign
+ super AMethid
+ var n_id: TId is writable, noinit
+ var n_assign: TAssign is writable, noinit
end
+
+# A method name `[]=`
class ABraassignMethid
-special PMethid
- readable writable attr _n_obra: TObra
- readable writable attr _n_cbra: TCbra
- readable writable attr _n_assign: TAssign
+ super AMethid
+ var n_obra: TObra is writable, noinit
+ var n_cbra: TCbra is writable, noinit
+ var n_assign: TAssign is writable, noinit
end
+
+# A signature in a method definition. eg `(x,y:X,z:Z):T`
class ASignature
-special PSignature
- readable writable attr _n_params: List[PParam]
- readable writable attr _n_type: PType
+ super Prod
+ var n_opar: nullable TOpar = null is writable
+ var n_params = new ANodes[AParam](self)
+ var n_cpar: nullable TCpar = null is writable
+ var n_type: nullable AType = null is writable
end
+
+# A parameter definition in a signature. eg `x:X`
class AParam
-special PParam
- readable writable attr _n_dotdotdot: TDotdotdot
+ super Prod
+ var n_id: TId is writable, noinit
+ var n_type: nullable AType = null is writable
+ var n_dotdotdot: nullable TDotdotdot = null is writable
end
+
+# A static type. eg `nullable X[Y]`
class AType
-special PType
- readable writable attr _n_id: TClassid
- readable writable attr _n_types: List[PType]
+ super Prod
+ var n_kwnullable: nullable TKwnullable = null is writable
+
+ # The name of the class or of the formal type
+ var n_id: TClassid is writable, noinit
+
+ # Type arguments for a generic type
+ var n_types = new ANodes[AType](self)
end
+# A label at the end of a block or in a break/continue statement. eg `label x`
+class ALabel
+ super Prod
+ var n_kwlabel: TKwlabel is writable, noinit
+ var n_id: nullable TId is writable
+end
+# Expression and statements
+# From a AST point of view there is no distinction between statement and expressions (even if the parser has to distinguish them)
+abstract class AExpr
+ super Prod
+end
+# A sequence of `AExpr` (usually statements)
+# The last `AExpr` gives the value of the whole block
class ABlockExpr
-special PExpr
- readable writable attr _n_expr: List[PExpr]
+ super AExpr
+ var n_expr = new ANodes[AExpr](self)
+ var n_kwend: nullable TKwend = null is writable
end
+
+# A declaration of a local variable. eg `var x: X = y`
class AVardeclExpr
-special PExpr
- readable writable attr _n_kwvar: TKwvar
- readable writable attr _n_id: TId
- readable writable attr _n_type: PType
- readable writable attr _n_assign: TAssign
- readable writable attr _n_expr: PExpr
+ super AExpr
+ var n_kwvar: TKwvar is writable, noinit
+ var n_id: TId is writable, noinit
+ var n_type: nullable AType = null is writable
+ var n_assign: nullable TAssign = null is writable
+
+ # The initial value, if any
+ var n_expr: nullable AExpr = null is writable
end
+
+# A `return` statement. eg `return x`
class AReturnExpr
-special PExpr
- readable writable attr _n_kwreturn: TKwreturn
- readable writable attr _n_expr: PExpr
+ super AExpr
+ var n_kwreturn: nullable TKwreturn = null is writable
+ var n_expr: nullable AExpr = null is writable
end
+
+# Something that has a label.
+abstract class ALabelable
+ super Prod
+ var n_label: nullable ALabel = null is writable
+end
+
+# A `break` statement.
class ABreakExpr
-special PExpr
- readable writable attr _n_kwbreak: TKwbreak
+ super AExpr
+ super ALabelable
+ var n_kwbreak: TKwbreak is writable, noinit
+ var n_expr: nullable AExpr = null is writable
end
+
+# An `abort` statement
class AAbortExpr
-special PExpr
- readable writable attr _n_kwabort: TKwabort
+ super AExpr
+ var n_kwabort: TKwabort is writable, noinit
end
+
+# A `continue` statement
class AContinueExpr
-special PExpr
- readable writable attr _n_kwcontinue: TKwcontinue
+ super AExpr
+ super ALabelable
+ var n_kwcontinue: nullable TKwcontinue = null is writable
+ var n_expr: nullable AExpr = null is writable
end
+
+# A `do` statement
class ADoExpr
-special PExpr
- readable writable attr _n_kwdo: TKwdo
- readable writable attr _n_block: PExpr
+ super AExpr
+ super ALabelable
+ var n_kwdo: TKwdo is writable, noinit
+ var n_block: nullable AExpr = null is writable
end
+
+# A `if` statement
class AIfExpr
-special PExpr
- readable writable attr _n_kwif: TKwif
- readable writable attr _n_expr: PExpr
- readable writable attr _n_then: PExpr
- readable writable attr _n_else: PExpr
+ super AExpr
+ var n_kwif: TKwif is writable, noinit
+ var n_expr: AExpr is writable, noinit
+ var n_then: nullable AExpr = null is writable
+ var n_else: nullable AExpr = null is writable
end
+
+# A `if` expression
class AIfexprExpr
-special PExpr
- readable writable attr _n_kwif: TKwif
- readable writable attr _n_expr: PExpr
- readable writable attr _n_kwthen: TKwthen
- readable writable attr _n_then: PExpr
- readable writable attr _n_kwelse: TKwelse
- readable writable attr _n_else: PExpr
+ super AExpr
+ var n_kwif: TKwif is writable, noinit
+ var n_expr: AExpr is writable, noinit
+ var n_kwthen: TKwthen is writable, noinit
+ var n_then: AExpr is writable, noinit
+ var n_kwelse: TKwelse is writable, noinit
+ var n_else: AExpr is writable, noinit
end
+
+# A `while` statement
class AWhileExpr
-special PExpr
- readable writable attr _n_kwwhile: TKwwhile
- readable writable attr _n_expr: PExpr
- readable writable attr _n_kwdo: TKwdo
- readable writable attr _n_block: PExpr
+ super AExpr
+ super ALabelable
+ var n_kwwhile: TKwwhile is writable, noinit
+ var n_expr: AExpr is writable, noinit
+ var n_kwdo: TKwdo is writable, noinit
+ var n_block: nullable AExpr = null is writable
end
-class AForExpr
-special PExpr
- readable writable attr _n_vardecl: PExpr
- readable writable attr _n_kwdo: TKwdo
- readable writable attr _n_block: PExpr
+
+# A `loop` statement
+class ALoopExpr
+ super AExpr
+ super ALabelable
+ var n_kwloop: TKwloop is writable, noinit
+ var n_block: nullable AExpr = null is writable
end
-class AForVardeclExpr
-special PExpr
- readable writable attr _n_kwfor: TKwfor
- readable writable attr _n_id: TId
- readable writable attr _n_expr: PExpr
+
+# A `for` statement
+class AForExpr
+ super AExpr
+ super ALabelable
+ var n_kwfor: TKwfor is writable, noinit
+ var n_ids = new ANodes[TId](self)
+ var n_expr: AExpr is writable, noinit
+ var n_kwdo: TKwdo is writable, noinit
+ var n_block: nullable AExpr = null is writable
end
+
+# An `assert` statement
class AAssertExpr
-special PExpr
- readable writable attr _n_kwassert: TKwassert
- readable writable attr _n_id: TId
- readable writable attr _n_expr: PExpr
+ super AExpr
+ var n_kwassert: TKwassert is writable, noinit
+ var n_id: nullable TId = null is writable
+ var n_expr: AExpr is writable, noinit
+ var n_else: nullable AExpr = null is writable
end
-class AAssignFormExpr
-special PExpr
- readable writable attr _n_assign: TAssign
- readable writable attr _n_value: PExpr
+
+# Whatever is a simple assignment. eg `= something`
+abstract class AAssignFormExpr
+ super AExpr
+ var n_assign: TAssign is writable, noinit
+ var n_value: AExpr is writable, noinit
end
-class AReassignFormExpr
-special PExpr
- readable writable attr _n_assign_op: PAssignOp
- readable writable attr _n_value: PExpr
+
+# Whatever is a combined assignment. eg `+= something`
+abstract class AReassignFormExpr
+ super AExpr
+ var n_assign_op: AAssignOp is writable, noinit
+ var n_value: AExpr is writable, noinit
end
+
+# A `once` expression. eg `once x`
class AOnceExpr
-special AProxyExpr
- readable writable attr _n_kwonce: TKwonce
+ super AProxyExpr
+ var n_kwonce: TKwonce is writable, noinit
end
-class ASendExpr
-special PExpr
- readable writable attr _n_expr: PExpr
+
+# A polymorphic invocation of a method
+# The form of the invocation (name, arguments, etc.) are specific
+abstract class ASendExpr
+ super AExpr
+ # The receiver of the method invocation
+ var n_expr: AExpr is writable, noinit
end
-class ABinopExpr
-special ASendExpr
- readable writable attr _n_expr2: PExpr
+
+# A binary operation on a method
+abstract class ABinopExpr
+ super ASendExpr
+ # The second operand of the operation
+ # Note: the receiver (`n_expr`) is the first operand
+ var n_expr2: AExpr is writable, noinit
end
-class ABoolExpr
-special PExpr
+
+# Something that is boolean expression
+abstract class ABoolExpr
+ super AExpr
end
+
+# A `or` expression
class AOrExpr
-special ABoolExpr
- readable writable attr _n_expr: PExpr
- readable writable attr _n_expr2: PExpr
+ super ABoolExpr
+ var n_expr: AExpr is writable, noinit
+ var n_expr2: AExpr is writable, noinit
end
+
+# A `and` expression
class AAndExpr
-special ABoolExpr
- readable writable attr _n_expr: PExpr
- readable writable attr _n_expr2: PExpr
+ super ABoolExpr
+ var n_expr: AExpr is writable, noinit
+ var n_expr2: AExpr is writable, noinit
+end
+
+# A `or else` expression
+class AOrElseExpr
+ super ABoolExpr
+ var n_expr: AExpr is writable, noinit
+ var n_expr2: AExpr is writable, noinit
+end
+
+# A `implies` expression
+class AImpliesExpr
+ super ABoolExpr
+ var n_expr: AExpr is writable, noinit
+ var n_expr2: AExpr is writable, noinit
end
+
+# A `not` expression
class ANotExpr
-special ABoolExpr
- readable writable attr _n_kwnot: TKwnot
- readable writable attr _n_expr: PExpr
+ super ABoolExpr
+ var n_kwnot: TKwnot is writable, noinit
+ var n_expr: AExpr is writable, noinit
end
+
+# A `==` expression
class AEqExpr
-special ABinopExpr
-end
-class AEeExpr
-special ABoolExpr
- readable writable attr _n_expr: PExpr
- readable writable attr _n_expr2: PExpr
+ super ABinopExpr
end
+
+# A `!=` expression
class ANeExpr
-special ABinopExpr
+ super ABinopExpr
end
+
+# A `<` expression
class ALtExpr
-special ABinopExpr
+ super ABinopExpr
end
+
+# A `<=` expression
class ALeExpr
-special ABinopExpr
+ super ABinopExpr
+end
+
+# A `<<` expression
+class ALlExpr
+ super ABinopExpr
end
+
+# A `>` expression
class AGtExpr
-special ABinopExpr
+ super ABinopExpr
end
+
+# A `>=` expression
class AGeExpr
-special ABinopExpr
+ super ABinopExpr
+end
+
+# A `>>` expression
+class AGgExpr
+ super ABinopExpr
end
+
+# A type-ckeck expression. eg `x isa T`
class AIsaExpr
-special ABoolExpr
- readable writable attr _n_expr: PExpr
- readable writable attr _n_type: PType
+ super ABoolExpr
+ var n_expr: AExpr is writable, noinit
+ var n_type: AType is writable, noinit
end
+
+# A `+` expression
class APlusExpr
-special ABinopExpr
+ super ABinopExpr
end
+
+# A `-` expression
class AMinusExpr
-special ABinopExpr
+ super ABinopExpr
end
+
+# A `<=>` expression
class AStarshipExpr
-special ABinopExpr
+ super ABinopExpr
end
+
+# A `*` expression
class AStarExpr
-special ABinopExpr
+ super ABinopExpr
end
+
+# A `**` expression
+class AStarstarExpr
+ super ABinopExpr
+end
+
+# A `/` expression
class ASlashExpr
-special ABinopExpr
+ super ABinopExpr
end
+
+# A `%` expression
class APercentExpr
-special ABinopExpr
+ super ABinopExpr
end
+
+# A unary minus expression. eg `-x`
class AUminusExpr
-special ASendExpr
- readable writable attr _n_minus: TMinus
+ super ASendExpr
+ var n_minus: TMinus is writable, noinit
end
+
+# An explicit instantiation. eg `new T`
class ANewExpr
-special PExpr
- readable writable attr _n_kwnew: TKwnew
- readable writable attr _n_type: PType
- readable writable attr _n_id: TId
- readable writable attr _n_args: List[PExpr]
+ super AExpr
+ var n_kwnew: TKwnew is writable, noinit
+ var n_type: AType is writable, noinit
+
+ # The name of the named-constructor, if any
+ var n_id: nullable TId = null is writable
+ var n_args: AExprs is writable, noinit
end
-class AAttrFormExpr
-special PExpr
- readable writable attr _n_expr: PExpr
- readable writable attr _n_id: TAttrid
+
+# Whatever is a old-style attribute access
+abstract class AAttrFormExpr
+ super AExpr
+
+ # The receiver of the attribute
+ var n_expr: AExpr is writable, noinit
+
+ # The name of the attribute
+ var n_id: TAttrid is writable, noinit
+
end
+
+# The read of an attribute. eg `x._a`
class AAttrExpr
-special AAttrFormExpr
+ super AAttrFormExpr
end
+
+# The assignment of an attribute. eg `x._a=y`
class AAttrAssignExpr
-special AAttrFormExpr
-special AAssignFormExpr
+ super AAttrFormExpr
+ super AAssignFormExpr
end
-class ACallFormExpr
-special ASendExpr
- readable writable attr _n_id: TId
- readable writable attr _n_args: List[PExpr]
+
+# Whatever looks-like a call with a standard method and any number of arguments.
+abstract class ACallFormExpr
+ super ASendExpr
+
+ # The name of the method
+ var n_id: TId is writable, noinit
+
+ # The arguments of the call
+ var n_args: AExprs is writable, noinit
end
+
+# A complex setter call (standard or brackets)
+abstract class ASendReassignFormExpr
+ super ASendExpr
+ super AReassignFormExpr
+end
+
+# A complex attribute assignment. eg `x._a+=y`
class AAttrReassignExpr
-special PExpr
-special AAttrFormExpr
-special AReassignFormExpr
+ super AAttrFormExpr
+ super AReassignFormExpr
end
+
+# A call with a standard method-name and any number of arguments. eg `x.m(y)`. OR just a simple id
+# Note: because the parser cannot distinguish a variable read with a method call with an implicit receiver and no arguments, it always returns a `ACallExpr`.
+# Semantic analysis have to transform them to instance of `AVarExpr`.
class ACallExpr
-special ACallFormExpr
+ super ACallFormExpr
end
+
+# A setter call with a standard method-name and any number of arguments. eg `x.m(y)=z`. OR just a simple assignment.
+# Note: because the parser cannot distinguish a variable write with a setter call with an implicit receiver and no arguments, it always returns a `ACallAssignExpr`.
+# Semantic analysis have to transform them to instance of `AVarAssignExpr`.
class ACallAssignExpr
-special ACallFormExpr
-special AAssignFormExpr
+ super ACallFormExpr
+ super AAssignFormExpr
end
+
+# A complex setter call with a standard method-name and any number of arguments. eg `x.m(y)+=z`. OR just a simple complex assignment.
+# Note: because the parser cannot distinguish a variable write with a complex setter call with an implicit receiver and no arguments, it always returns a `ACallReassignExpr`.
+# Semantic analysis have to transform them to instance of `AVarReassignExpr`.
class ACallReassignExpr
-special PExpr
-special ACallFormExpr
-special AReassignFormExpr
+ super ACallFormExpr
+ super ASendReassignFormExpr
end
+
+# A call to `super`. OR a call of a super-constructor
class ASuperExpr
-special PExpr
- readable writable attr _n_qualified: PQualified
- readable writable attr _n_kwsuper: TKwsuper
- readable writable attr _n_args: List[PExpr]
+ super AExpr
+ var n_qualified: nullable AQualified = null is writable
+ var n_kwsuper: TKwsuper is writable, noinit
+ var n_args: AExprs is writable, noinit
end
+
+# A call to the `init` constructor.
+# Note: because `init` is a keyword and not a `TId`, the explicit call to init cannot be a `ACallFormExpr`.
class AInitExpr
-special ASendExpr
- readable writable attr _n_kwinit: TKwinit
- readable writable attr _n_args: List[PExpr]
+ super ASendExpr
+ var n_kwinit: TKwinit is writable, noinit
+ var n_args: AExprs is writable, noinit
end
-class ABraFormExpr
-special ASendExpr
- readable writable attr _n_args: List[PExpr]
+
+# Whatever looks-like a call of the brackets `[]` operator.
+abstract class ABraFormExpr
+ super ASendExpr
+ var n_args: AExprs is writable, noinit
end
+
+# A call of the brackets operator. eg `x[y,z]`
class ABraExpr
-special ABraFormExpr
+ super ABraFormExpr
end
+
+# A setter call of the bracket operator. eg `x[y,z]=t`
class ABraAssignExpr
-special ABraFormExpr
-special AAssignFormExpr
+ super ABraFormExpr
+ super AAssignFormExpr
end
-class AVarFormExpr
-special PExpr
- readable writable attr _n_id: TId
+
+# Whatever is an access to a local variable
+abstract class AVarFormExpr
+ super AExpr
+ var n_id: TId is writable, noinit
end
+
+# A complex setter call of the bracket operator. eg `x[y,z]+=t`
class ABraReassignExpr
-special ABraFormExpr
-special AReassignFormExpr
+ super ABraFormExpr
+ super ASendReassignFormExpr
end
+
+# A local variable read access.
+# The parser cannot instantiate them, see `ACallExpr`.
class AVarExpr
-special AVarFormExpr
+ super AVarFormExpr
end
+
+# A local variable simple assignment access
+# The parser cannot instantiate them, see `ACallAssignExpr`.
class AVarAssignExpr
-special AVarFormExpr
-special AAssignFormExpr
+ super AVarFormExpr
+ super AAssignFormExpr
end
+
+# A local variable complex assignment access
+# The parser cannot instantiate them, see `ACallReassignExpr`.
class AVarReassignExpr
-special AVarFormExpr
-special AReassignFormExpr
+ super AVarFormExpr
+ super AReassignFormExpr
end
-class ARangeExpr
-special PExpr
- readable writable attr _n_expr: PExpr
- readable writable attr _n_expr2: PExpr
+
+# A literal range, open or closed
+abstract class ARangeExpr
+ super AExpr
+ var n_expr: AExpr is writable, noinit
+ var n_expr2: AExpr is writable, noinit
end
+
+# A closed literal range. eg `[x..y]`
class ACrangeExpr
-special ARangeExpr
+ super ARangeExpr
+ var n_obra: TObra is writable, noinit
+ var n_cbra: TCbra is writable, noinit
end
+
+# An open literal range. eg `[x..y[`
class AOrangeExpr
-special ARangeExpr
+ super ARangeExpr
+ var n_obra: TObra is writable, noinit
+ var n_cbra: TObra is writable, noinit
end
+
+# A literal array. eg. `[x,y,z]`
class AArrayExpr
-special PExpr
- readable writable attr _n_exprs: List[PExpr]
+ super AExpr
+ var n_obra: TObra is writable, noinit
+ var n_exprs: AExprs is writable, noinit
+ var n_type: nullable AType = null is writable
+ var n_cbra: TCbra is writable, noinit
end
+
+# A read of `self`
class ASelfExpr
-special PExpr
- readable writable attr _n_kwself: TKwself
+ super AExpr
+ var n_kwself: nullable TKwself is writable
end
+
+# When there is no explicit receiver, `self` is implicit
class AImplicitSelfExpr
-special ASelfExpr
+ super ASelfExpr
end
+
+# A `true` boolean literal constant
class ATrueExpr
-special ABoolExpr
- readable writable attr _n_kwtrue: TKwtrue
+ super ABoolExpr
+ var n_kwtrue: TKwtrue is writable, noinit
end
+# A `false` boolean literal constant
class AFalseExpr
-special ABoolExpr
- readable writable attr _n_kwfalse: TKwfalse
+ super ABoolExpr
+ var n_kwfalse: TKwfalse is writable, noinit
end
+# A `null` literal constant
class ANullExpr
-special PExpr
- readable writable attr _n_kwnull: TKwnull
+ super AExpr
+ var n_kwnull: TKwnull is writable, noinit
end
+# An integer literal
class AIntExpr
-special PExpr
- readable writable attr _n_number: TNumber
+ super AExpr
+end
+# An integer literal in decimal format
+class ADecIntExpr
+ super AIntExpr
+ var n_number: TNumber is writable, noinit
+end
+# An integer literal in hexadecimal format
+class AHexIntExpr
+ super AIntExpr
+ var n_hex_number: THexNumber is writable, noinit
end
+# A float literal
class AFloatExpr
-special PExpr
- readable writable attr _n_float: TFloat
+ super AExpr
+ var n_float: TFloat is writable, noinit
end
+# A character literal
class ACharExpr
-special PExpr
- readable writable attr _n_char: TChar
+ super AExpr
+ var n_char: TChar is writable, noinit
end
-class AStringFormExpr
-special PExpr
+# A string literal
+abstract class AStringFormExpr
+ super AExpr
+ var n_string: Token is writable, noinit
end
+
+# A simple string. eg. `"abc"`
class AStringExpr
-special AStringFormExpr
- readable writable attr _n_string: TString
+ super AStringFormExpr
end
+
+# The start of a superstring. eg `"abc{`
class AStartStringExpr
-special AStringFormExpr
- readable writable attr _n_string: TStartString
+ super AStringFormExpr
end
+
+# The middle of a superstring. eg `}abc{`
class AMidStringExpr
-special AStringFormExpr
- readable writable attr _n_string: TMidString
+ super AStringFormExpr
end
+
+# The end of a superstrng. eg `}abc"`
class AEndStringExpr
-special AStringFormExpr
- readable writable attr _n_string: TEndString
+ super AStringFormExpr
end
+
+# A superstring literal. eg `"a{x}b{y}c"`
+# Each part is modeled a sequence of expression. eg. `["a{, x, }b{, y, }c"]`
class ASuperstringExpr
-special PExpr
- readable writable attr _n_exprs: List[PExpr]
+ super AExpr
+ var n_exprs = new ANodes[AExpr](self)
end
+
+# A simple parenthesis. eg `(x)`
class AParExpr
-special AProxyExpr
+ super AProxyExpr
+ var n_opar: TOpar is writable, noinit
+ var n_cpar: TCpar is writable, noinit
end
-class AProxyExpr
-special PExpr
- readable writable attr _n_expr: PExpr
+
+# Whatever just contains (and mimic) an other expression
+abstract class AProxyExpr
+ super AExpr
+ var n_expr: AExpr is writable, noinit
end
+
+# A type cast. eg `x.as(T)`
class AAsCastExpr
-special PExpr
- readable writable attr _n_expr: PExpr
- readable writable attr _n_kwas: TKwas
- readable writable attr _n_type: PType
+ super AExpr
+ var n_expr: AExpr is writable, noinit
+ var n_kwas: TKwas is writable, noinit
+ var n_opar: nullable TOpar = null is writable
+ var n_type: AType is writable, noinit
+ var n_cpar: nullable TCpar = null is writable
end
+
+# A as-not-null cast. eg `x.as(not null)`
+class AAsNotnullExpr
+ super AExpr
+ var n_expr: AExpr is writable, noinit
+ var n_kwas: TKwas is writable, noinit
+ var n_opar: nullable TOpar = null is writable
+ var n_kwnot: TKwnot is writable, noinit
+ var n_kwnull: TKwnull is writable, noinit
+ var n_cpar: nullable TCpar = null is writable
+end
+
+# A is-set check of old-style attributes. eg `isset x._a`
+class AIssetAttrExpr
+ super AAttrFormExpr
+ var n_kwisset: TKwisset is writable, noinit
+end
+
+# An ellipsis notation used to pass an expression as it, in a vararg parameter
+class AVarargExpr
+ super AExpr
+ var n_expr: AExpr is writable, noinit
+ var n_dotdotdot: TDotdotdot is writable, noinit
+end
+
+# A list of expression separated with commas (arguments for instance)
+abstract class AExprs
+ super Prod
+ var n_exprs = new ANodes[AExpr](self)
+end
+
+# A special expression to debug types
+class ADebugTypeExpr
+ super AExpr
+ var n_kwdebug: TKwdebug is writable, noinit
+ var n_kwtype: TKwtype is writable, noinit
+ var n_expr: AExpr is writable, noinit
+ var n_type: AType is writable, noinit
+end
+
+# A simple list of expressions
+class AListExprs
+ super AExprs
+end
+
+# A list of expressions enclosed in parentheses
+class AParExprs
+ super AExprs
+ var n_opar: TOpar is writable, noinit
+ var n_cpar: TCpar is writable, noinit
+end
+
+# A list of expressions enclosed in brackets
+class ABraExprs
+ super AExprs
+ var n_obra: TObra is writable, noinit
+ var n_cbra: TCbra is writable, noinit
+end
+
+# A complex assignment operator. (`+=` and `-=`)
+abstract class AAssignOp
+ super Prod
+end
+
+# The `+=` assignment operation
class APlusAssignOp
-special PAssignOp
- readable writable attr _n_pluseq: TPluseq
+ super AAssignOp
+ var n_pluseq: TPluseq is writable, noinit
end
+
+# The `-=` assignment operator
class AMinusAssignOp
-special PAssignOp
- readable writable attr _n_minuseq: TMinuseq
+ super AAssignOp
+ var n_minuseq: TMinuseq is writable, noinit
+end
+
+# A possibly fully-qualified module identifier
+class AModuleName
+ super Prod
+ var n_quad: nullable TQuad = null is writable
+ var n_path = new ANodes[TId](self)
+ var n_id: TId is writable, noinit
+end
+
+# A language declaration for an extern block
+class AInLanguage
+ super Prod
+ var n_kwin: TKwin is writable, noinit
+ var n_string: TString is writable, noinit
+end
+
+# An full extern block
+class AExternCodeBlock
+ super Prod
+ var n_in_language: nullable AInLanguage = null is writable
+ var n_extern_code_segment: TExternCodeSegment is writable, noinit
end
+
+# A possible full method qualifier.
class AQualified
-special PQualified
- readable writable attr _n_id: List[TId]
- readable writable attr _n_classid: TClassid
+ super Prod
+ var n_quad: nullable TQuad = null is writable
+ var n_id = new ANodes[TId](self)
+ var n_classid: nullable TClassid = null is writable
end
+
+# A documentation of a definition
+# It contains the block of comments just above the declaration
class ADoc
-special PDoc
- readable writable attr _n_comment: List[TComment]
+ super Prod
+ var n_comment = new ANodes[TComment](self)
+end
+
+# A group of annotation on a node
+class AAnnotations
+ super Prod
+ var n_at: nullable TAt = null is writable
+ var n_opar: nullable TOpar = null is writable
+ var n_items = new ANodes[AAnnotation](self)
+ var n_cpar: nullable TCpar = null is writable
+end
+
+# A single annotation
+class AAnnotation
+ super Prod
+ var n_doc: nullable ADoc = null is writable
+ var n_kwredef: nullable TKwredef = null is writable
+ var n_visibility: nullable AVisibility is writable
+ var n_atid: AAtid is writable, noinit
+ var n_opar: nullable TOpar = null is writable
+ var n_args = new ANodes[AAtArg](self)
+ var n_cpar: nullable TCpar = null is writable
+end
+
+# A single argument of an annotation
+abstract class AAtArg
+ super Prod
+end
+
+# A type-like argument of an annotation
+class ATypeAtArg
+ super AAtArg
+ var n_type: AType is writable, noinit
+end
+
+# An expression-like argument of an annotation
+class AExprAtArg
+ super AAtArg
+ var n_expr: AExpr is writable, noinit
+end
+
+# An annotation-like argument of an annotation
+class AAtAtArg
+ super AAtArg
+end
+
+# An annotation name
+abstract class AAtid
+ super Prod
+ var n_id: Token is writable, noinit
+end
+
+# An annotation name based on an identifier
+class AIdAtid
+ super AAtid
+end
+
+# An annotation name based on the keyword `extern`
+class AKwexternAtid
+ super AAtid
+end
+
+# An annotation name based on the keyword `import`
+class AKwimportAtid
+ super AAtid
+end
+
+# An annotation name based on the keyword `abstract`
+class AKwabstractAtid
+ super AAtid
end
+# The root of the AST
class Start
-special Prod
- readable writable attr _n_base: PModule
- readable writable attr _n_eof: EOF
+ super Prod
+ var n_base: nullable AModule is writable
+ var n_eof: EOF is writable, noinit
+ init(n_base: nullable AModule, n_eof: EOF)
+ do
+ self._n_base = n_base
+ self._n_eof = n_eof
+ end
end