- if _n_kwvar == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwvar
- _n_kwvar = new_child
- else
- abort
- end
- return
- end
- if _n_id == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TAttrid
- _n_id = new_child
- else
- _n_id = null
- end
- return
- end
- if _n_id2 == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TId
- _n_id2 = new_child
- else
- _n_id2 = null
- end
- return
- end
- if _n_type == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AType
- _n_type = new_child
- else
- _n_type = null
- end
- return
- end
- if _n_annotations == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AAnnotations
- _n_annotations = new_child
- else
- _n_annotations = null
- end
- return
- end
- if _n_expr == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AExpr
- _n_expr = new_child
- else
- _n_expr = null
- end
- return
- end
- end
-
- redef fun n_doc=(node)
- do
- _n_doc = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_readable=(node)
- do
- _n_readable = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_writable=(node)
- do
- _n_writable = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_kwredef=(node)
- do
- _n_kwredef = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_visibility=(node)
- do
- _n_visibility = node
- node.parent = self
- end
- redef fun n_kwvar=(node)
- do
- _n_kwvar = node
- node.parent = self
- end
- redef fun n_id=(node)
- do
- _n_id = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_id2=(node)
- do
- _n_id2 = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_type=(node)
- do
- _n_type = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_annotations=(node)
- do
- _n_annotations = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_expr=(node)
- do
- _n_expr = node
- if node != null then
- node.parent = self
- end
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- if _n_doc != null then
- v.enter_visit(_n_doc.as(not null))
- end
- if _n_readable != null then
- v.enter_visit(_n_readable.as(not null))
- end
- if _n_writable != null then
- v.enter_visit(_n_writable.as(not null))
- end
- if _n_kwredef != null then
- v.enter_visit(_n_kwredef.as(not null))
- end
- v.enter_visit(_n_visibility)
- v.enter_visit(_n_kwvar)
- if _n_id != null then
- v.enter_visit(_n_id.as(not null))
- end
- if _n_id2 != null then
- v.enter_visit(_n_id2.as(not null))
- end
- if _n_type != null then
- v.enter_visit(_n_type.as(not null))
- end
- if _n_annotations != null then
- v.enter_visit(_n_annotations.as(not null))
- end
- if _n_expr != null then
- v.enter_visit(_n_expr.as(not null))
- end
- end
-end
-redef class AMethPropdef
- private init empty_init do end
-
- init init_amethpropdef (
- n_doc: nullable ADoc,
- n_kwredef: nullable TKwredef,
- n_visibility: nullable AVisibility,
- n_methid: nullable AMethid,
- n_signature: nullable ASignature
- )
- do
- empty_init
- _n_doc = n_doc
- if n_doc != null then
- n_doc.parent = self
- end
- _n_kwredef = n_kwredef
- if n_kwredef != null then
- n_kwredef.parent = self
- end
- _n_visibility = n_visibility.as(not null)
- n_visibility.parent = self
- _n_methid = n_methid.as(not null)
- n_methid.parent = self
- _n_signature = n_signature.as(not null)
- n_signature.parent = self
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_doc == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa ADoc
- _n_doc = new_child
- else
- _n_doc = null
- end
- return
- end
- if _n_kwredef == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwredef
- _n_kwredef = new_child
- else
- _n_kwredef = null
- end
- return
- end
- if _n_visibility == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AVisibility
- _n_visibility = new_child
- else
- abort
- end
- return
- end
- if _n_methid == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AMethid
- _n_methid = new_child
- else
- abort
- end
- return
- end
- if _n_signature == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa ASignature
- _n_signature = new_child
- else
- abort
- end
- return
- end
- end
-
- redef fun n_doc=(node)
- do
- _n_doc = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_kwredef=(node)
- do
- _n_kwredef = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_visibility=(node)
- do
- _n_visibility = node
- node.parent = self
- end
- redef fun n_methid=(node)
- do
- _n_methid = node
- node.parent = self
- end
- redef fun n_signature=(node)
- do
- _n_signature = node
- node.parent = self
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- if _n_doc != null then
- v.enter_visit(_n_doc.as(not null))
- end
- if _n_kwredef != null then
- v.enter_visit(_n_kwredef.as(not null))
- end
- v.enter_visit(_n_visibility)
- v.enter_visit(_n_methid)
- v.enter_visit(_n_signature)
- end
-end
-redef class ADeferredMethPropdef
- private init empty_init do end
-
- init init_adeferredmethpropdef (
- n_doc: nullable ADoc,
- n_kwredef: nullable TKwredef,
- n_visibility: nullable AVisibility,
- n_kwmeth: nullable TKwmeth,
- n_methid: nullable AMethid,
- n_signature: nullable ASignature,
- n_annotations: nullable AAnnotations
- )
- do
- empty_init
- _n_doc = n_doc
- if n_doc != null then
- n_doc.parent = self
- end
- _n_kwredef = n_kwredef
- if n_kwredef != null then
- n_kwredef.parent = self
- end
- _n_visibility = n_visibility.as(not null)
- n_visibility.parent = self
- _n_kwmeth = n_kwmeth.as(not null)
- n_kwmeth.parent = self
- _n_methid = n_methid.as(not null)
- n_methid.parent = self
- _n_signature = n_signature.as(not null)
- n_signature.parent = self
- _n_annotations = n_annotations
- if n_annotations != null then
- n_annotations.parent = self
- end
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_doc == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa ADoc
- _n_doc = new_child
- else
- _n_doc = null
- end
- return
- end
- if _n_kwredef == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwredef
- _n_kwredef = new_child
- else
- _n_kwredef = null
- end
- return
- end
- if _n_visibility == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AVisibility
- _n_visibility = new_child
- else
- abort
- end
- return
- end
- if _n_kwmeth == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwmeth
- _n_kwmeth = new_child
- else
- abort
- end
- return
- end
- if _n_methid == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AMethid
- _n_methid = new_child
- else
- abort
- end
- return
- end
- if _n_signature == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa ASignature
- _n_signature = new_child
- else
- abort
- end
- return
- end
- if _n_annotations == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AAnnotations
- _n_annotations = new_child
- else
- _n_annotations = null
- end
- return
- end
- end
-
- redef fun n_doc=(node)
- do
- _n_doc = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_kwredef=(node)
- do
- _n_kwredef = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_visibility=(node)
- do
- _n_visibility = node
- node.parent = self
- end
- redef fun n_kwmeth=(node)
- do
- _n_kwmeth = node
- node.parent = self
- end
- redef fun n_methid=(node)
- do
- _n_methid = node
- node.parent = self
- end
- redef fun n_signature=(node)
- do
- _n_signature = node
- node.parent = self
- end
- redef fun n_annotations=(node)
- do
- _n_annotations = node
- if node != null then
- node.parent = self
- end
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- if _n_doc != null then
- v.enter_visit(_n_doc.as(not null))
- end
- if _n_kwredef != null then
- v.enter_visit(_n_kwredef.as(not null))
- end
- v.enter_visit(_n_visibility)
- v.enter_visit(_n_kwmeth)
- v.enter_visit(_n_methid)
- v.enter_visit(_n_signature)
- if _n_annotations != null then
- v.enter_visit(_n_annotations.as(not null))
- end
- end
-end
-redef class AInternMethPropdef
- private init empty_init do end
-
- init init_ainternmethpropdef (
- n_doc: nullable ADoc,
- n_kwredef: nullable TKwredef,
- n_visibility: nullable AVisibility,
- n_kwmeth: nullable TKwmeth,
- n_methid: nullable AMethid,
- n_signature: nullable ASignature
- )
- do
- empty_init
- _n_doc = n_doc
- if n_doc != null then
- n_doc.parent = self
- end
- _n_kwredef = n_kwredef
- if n_kwredef != null then
- n_kwredef.parent = self
- end
- _n_visibility = n_visibility.as(not null)
- n_visibility.parent = self
- _n_kwmeth = n_kwmeth.as(not null)
- n_kwmeth.parent = self
- _n_methid = n_methid.as(not null)
- n_methid.parent = self
- _n_signature = n_signature.as(not null)
- n_signature.parent = self
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_doc == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa ADoc
- _n_doc = new_child
- else
- _n_doc = null
- end
- return
- end
- if _n_kwredef == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwredef
- _n_kwredef = new_child
- else
- _n_kwredef = null
- end
- return
- end
- if _n_visibility == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AVisibility
- _n_visibility = new_child
- else
- abort
- end
- return
- end
- if _n_kwmeth == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwmeth
- _n_kwmeth = new_child
- else
- abort
- end
- return
- end
- if _n_methid == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AMethid
- _n_methid = new_child
- else
- abort
- end
- return
- end
- if _n_signature == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa ASignature
- _n_signature = new_child
- else
- abort
- end
- return
- end
- end
-
- redef fun n_doc=(node)
- do
- _n_doc = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_kwredef=(node)
- do
- _n_kwredef = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_visibility=(node)
- do
- _n_visibility = node
- node.parent = self
- end
- redef fun n_kwmeth=(node)
- do
- _n_kwmeth = node
- node.parent = self
- end
- redef fun n_methid=(node)
- do
- _n_methid = node
- node.parent = self
- end
- redef fun n_signature=(node)
- do
- _n_signature = node
- node.parent = self
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- if _n_doc != null then
- v.enter_visit(_n_doc.as(not null))
- end
- if _n_kwredef != null then
- v.enter_visit(_n_kwredef.as(not null))
- end
- v.enter_visit(_n_visibility)
- v.enter_visit(_n_kwmeth)
- v.enter_visit(_n_methid)
- v.enter_visit(_n_signature)
- end
-end
-redef class AExternMethPropdef
- private init empty_init do end
-
- init init_aexternmethpropdef (
- n_doc: nullable ADoc,
- n_kwredef: nullable TKwredef,
- n_visibility: nullable AVisibility,
- n_kwmeth: nullable TKwmeth,
- n_methid: nullable AMethid,
- n_signature: nullable ASignature,
- n_extern: nullable TString,
- n_extern_calls: nullable AExternCalls,
- n_extern_code_block: nullable AExternCodeBlock
- )
- do
- empty_init
- _n_doc = n_doc
- if n_doc != null then
- n_doc.parent = self
- end
- _n_kwredef = n_kwredef
- if n_kwredef != null then
- n_kwredef.parent = self
- end
- _n_visibility = n_visibility.as(not null)
- n_visibility.parent = self
- _n_kwmeth = n_kwmeth.as(not null)
- n_kwmeth.parent = self
- _n_methid = n_methid.as(not null)
- n_methid.parent = self
- _n_signature = n_signature.as(not null)
- n_signature.parent = self
- _n_extern = n_extern
- if n_extern != null then
- n_extern.parent = self
- end
- _n_extern_calls = n_extern_calls
- if n_extern_calls != null then
- n_extern_calls.parent = self
- end
- _n_extern_code_block = n_extern_code_block
- if n_extern_code_block != null then
- n_extern_code_block.parent = self
- end
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_doc == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa ADoc
- _n_doc = new_child
- else
- _n_doc = null
- end
- return
- end
- if _n_kwredef == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwredef
- _n_kwredef = new_child
- else
- _n_kwredef = null
- end
- return
- end
- if _n_visibility == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AVisibility
- _n_visibility = new_child
- else
- abort
- end
- return
- end
- if _n_kwmeth == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwmeth
- _n_kwmeth = new_child
- else
- abort
- end
- return
- end
- if _n_methid == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AMethid
- _n_methid = new_child
- else
- abort
- end
- return
- end
- if _n_signature == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa ASignature
- _n_signature = new_child
- else
- abort
- end
- return
- end
- if _n_extern == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TString
- _n_extern = new_child
- else
- _n_extern = null
- end
- return
- end
- if _n_extern_calls == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AExternCalls
- _n_extern_calls = new_child
- else
- _n_extern_calls = null
- end
- return
- end
- if _n_extern_code_block == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AExternCodeBlock
- _n_extern_code_block = new_child
- else
- _n_extern_code_block = null
- end
- return
- end
- end
-
- redef fun n_doc=(node)
- do
- _n_doc = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_kwredef=(node)
- do
- _n_kwredef = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_visibility=(node)
- do
- _n_visibility = node
- node.parent = self
- end
- redef fun n_kwmeth=(node)
- do
- _n_kwmeth = node
- node.parent = self
- end
- redef fun n_methid=(node)
- do
- _n_methid = node
- node.parent = self
- end
- redef fun n_signature=(node)
- do
- _n_signature = node
- node.parent = self
- end
- redef fun n_extern=(node)
- do
- _n_extern = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_extern_calls=(node)
- do
- _n_extern_calls = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_extern_code_block=(node)
- do
- _n_extern_code_block = node
- if node != null then
- node.parent = self
- end
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- if _n_doc != null then
- v.enter_visit(_n_doc.as(not null))
- end
- if _n_kwredef != null then
- v.enter_visit(_n_kwredef.as(not null))
- end
- v.enter_visit(_n_visibility)
- v.enter_visit(_n_kwmeth)
- v.enter_visit(_n_methid)
- v.enter_visit(_n_signature)
- if _n_extern != null then
- v.enter_visit(_n_extern.as(not null))
- end
- if _n_extern_calls != null then
- v.enter_visit(_n_extern_calls.as(not null))
- end
- if _n_extern_code_block != null then
- v.enter_visit(_n_extern_code_block.as(not null))
- end
- end
-end
-redef class AConcreteMethPropdef
- private init empty_init do end
-
- init init_aconcretemethpropdef (
- n_doc: nullable ADoc,
- n_kwredef: nullable TKwredef,
- n_visibility: nullable AVisibility,
- n_kwmeth: nullable TKwmeth,
- n_methid: nullable AMethid,
- n_signature: nullable ASignature,
- n_annotations: nullable AAnnotations,
- n_block: nullable AExpr
- )
- do
- empty_init
- _n_doc = n_doc
- if n_doc != null then
- n_doc.parent = self
- end
- _n_kwredef = n_kwredef
- if n_kwredef != null then
- n_kwredef.parent = self
- end
- _n_visibility = n_visibility.as(not null)
- n_visibility.parent = self
- _n_kwmeth = n_kwmeth.as(not null)
- n_kwmeth.parent = self
- _n_methid = n_methid.as(not null)
- n_methid.parent = self
- _n_signature = n_signature.as(not null)
- n_signature.parent = self
- _n_annotations = n_annotations
- if n_annotations != null then
- n_annotations.parent = self
- end
- _n_block = n_block
- if n_block != null then
- n_block.parent = self
- end
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_doc == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa ADoc
- _n_doc = new_child
- else
- _n_doc = null
- end
- return
- end
- if _n_kwredef == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwredef
- _n_kwredef = new_child
- else
- _n_kwredef = null
- end
- return
- end
- if _n_visibility == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AVisibility
- _n_visibility = new_child
- else
- abort
- end
- return
- end
- if _n_kwmeth == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwmeth
- _n_kwmeth = new_child
- else
- abort
- end
- return
- end
- if _n_methid == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AMethid
- _n_methid = new_child
- else
- abort
- end
- return
- end
- if _n_signature == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa ASignature
- _n_signature = new_child
- else
- abort
- end
- return
- end
- if _n_annotations == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AAnnotations
- _n_annotations = new_child
- else
- _n_annotations = null
- end
- return
- end
- if _n_block == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AExpr
- _n_block = new_child
- else
- _n_block = null
- end
- return
- end
- end
-
- redef fun n_doc=(node)
- do
- _n_doc = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_kwredef=(node)
- do
- _n_kwredef = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_visibility=(node)
- do
- _n_visibility = node
- node.parent = self
- end
- redef fun n_kwmeth=(node)
- do
- _n_kwmeth = node
- node.parent = self
- end
- redef fun n_methid=(node)
- do
- _n_methid = node
- node.parent = self
- end
- redef fun n_signature=(node)
- do
- _n_signature = node
- node.parent = self
- end
- redef fun n_annotations=(node)
- do
- _n_annotations = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_block=(node)
- do
- _n_block = node
- if node != null then
- node.parent = self
- end
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- if _n_doc != null then
- v.enter_visit(_n_doc.as(not null))
- end
- if _n_kwredef != null then
- v.enter_visit(_n_kwredef.as(not null))
- end
- v.enter_visit(_n_visibility)
- v.enter_visit(_n_kwmeth)
- v.enter_visit(_n_methid)
- v.enter_visit(_n_signature)
- if _n_annotations != null then
- v.enter_visit(_n_annotations.as(not null))
- end
- if _n_block != null then
- v.enter_visit(_n_block.as(not null))
- end
- end
-end
-redef class AConcreteInitPropdef
- private init empty_init do end
-
- init init_aconcreteinitpropdef (
- n_doc: nullable ADoc,
- n_kwredef: nullable TKwredef,
- n_visibility: nullable AVisibility,
- n_kwinit: nullable TKwinit,
- n_methid: nullable AMethid,
- n_signature: nullable ASignature,
- n_annotations: nullable AAnnotations,
- n_block: nullable AExpr
- )
- do
- empty_init
- _n_doc = n_doc
- if n_doc != null then
- n_doc.parent = self
- end
- _n_kwredef = n_kwredef
- if n_kwredef != null then
- n_kwredef.parent = self
- end
- _n_visibility = n_visibility.as(not null)
- n_visibility.parent = self
- _n_kwinit = n_kwinit.as(not null)
- n_kwinit.parent = self
- _n_methid = n_methid
- if n_methid != null then
- n_methid.parent = self
- end
- _n_signature = n_signature.as(not null)
- n_signature.parent = self
- _n_annotations = n_annotations
- if n_annotations != null then
- n_annotations.parent = self
- end
- _n_block = n_block
- if n_block != null then
- n_block.parent = self
- end
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_doc == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa ADoc
- _n_doc = new_child
- else
- _n_doc = null
- end
- return
- end
- if _n_kwredef == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwredef
- _n_kwredef = new_child
- else
- _n_kwredef = null
- end
- return
- end
- if _n_visibility == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AVisibility
- _n_visibility = new_child
- else
- abort
- end
- return
- end
- if _n_kwinit == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwinit
- _n_kwinit = new_child
- else
- abort
- end
- return
- end
- if _n_methid == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AMethid
- _n_methid = new_child
- else
- _n_methid = null
- end
- return
- end
- if _n_signature == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa ASignature
- _n_signature = new_child
- else
- abort
- end
- return
- end
- if _n_annotations == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AAnnotations
- _n_annotations = new_child
- else
- _n_annotations = null
- end
- return
- end
- if _n_block == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AExpr
- _n_block = new_child
- else
- _n_block = null
- end
- return
- end
- end
-
- redef fun n_doc=(node)
- do
- _n_doc = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_kwredef=(node)
- do
- _n_kwredef = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_visibility=(node)
- do
- _n_visibility = node
- node.parent = self
- end
- redef fun n_kwinit=(node)
- do
- _n_kwinit = node
- node.parent = self
- end
- redef fun n_methid=(node)
- do
- _n_methid = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_signature=(node)
- do
- _n_signature = node
- node.parent = self
- end
- redef fun n_annotations=(node)
- do
- _n_annotations = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_block=(node)
- do
- _n_block = node
- if node != null then
- node.parent = self
- end
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- if _n_doc != null then
- v.enter_visit(_n_doc.as(not null))
- end
- if _n_kwredef != null then
- v.enter_visit(_n_kwredef.as(not null))
- end
- v.enter_visit(_n_visibility)
- v.enter_visit(_n_kwinit)
- if _n_methid != null then
- v.enter_visit(_n_methid.as(not null))
- end
- v.enter_visit(_n_signature)
- if _n_annotations != null then
- v.enter_visit(_n_annotations.as(not null))
- end
- if _n_block != null then
- v.enter_visit(_n_block.as(not null))
- end
- end
-end
-redef class AExternInitPropdef
- private init empty_init do end
-
- init init_aexterninitpropdef (
- n_doc: nullable ADoc,
- n_kwredef: nullable TKwredef,
- n_visibility: nullable AVisibility,
- n_kwnew: nullable TKwnew,
- n_methid: nullable AMethid,
- n_signature: nullable ASignature,
- n_extern: nullable TString,
- n_extern_calls: nullable AExternCalls,
- n_extern_code_block: nullable AExternCodeBlock
- )
- do
- empty_init
- _n_doc = n_doc
- if n_doc != null then
- n_doc.parent = self
- end
- _n_kwredef = n_kwredef
- if n_kwredef != null then
- n_kwredef.parent = self
- end
- _n_visibility = n_visibility.as(not null)
- n_visibility.parent = self
- _n_kwnew = n_kwnew.as(not null)
- n_kwnew.parent = self
- _n_methid = n_methid
- if n_methid != null then
- n_methid.parent = self
- end
- _n_signature = n_signature.as(not null)
- n_signature.parent = self
- _n_extern = n_extern
- if n_extern != null then
- n_extern.parent = self
- end
- _n_extern_calls = n_extern_calls
- if n_extern_calls != null then
- n_extern_calls.parent = self
- end
- _n_extern_code_block = n_extern_code_block
- if n_extern_code_block != null then
- n_extern_code_block.parent = self
- end
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_doc == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa ADoc
- _n_doc = new_child
- else
- _n_doc = null
- end
- return
- end
- if _n_kwredef == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwredef
- _n_kwredef = new_child
- else
- _n_kwredef = null
- end
- return
- end
- if _n_visibility == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AVisibility
- _n_visibility = new_child
- else
- abort
- end
- return
- end
- if _n_kwnew == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwnew
- _n_kwnew = new_child
- else
- abort
- end
- return
- end
- if _n_methid == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AMethid
- _n_methid = new_child
- else
- _n_methid = null
- end
- return
- end
- if _n_signature == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa ASignature
- _n_signature = new_child
- else
- abort
- end
- return
- end
- if _n_extern == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TString
- _n_extern = new_child
- else
- _n_extern = null
- end
- return
- end
- if _n_extern_calls == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AExternCalls
- _n_extern_calls = new_child
- else
- _n_extern_calls = null
- end
- return
- end
- if _n_extern_code_block == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AExternCodeBlock
- _n_extern_code_block = new_child
- else
- _n_extern_code_block = null
- end
- return
- end
- end
-
- redef fun n_doc=(node)
- do
- _n_doc = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_kwredef=(node)
- do
- _n_kwredef = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_visibility=(node)
- do
- _n_visibility = node
- node.parent = self
- end
- redef fun n_kwnew=(node)
- do
- _n_kwnew = node
- node.parent = self
- end
- redef fun n_methid=(node)
- do
- _n_methid = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_signature=(node)
- do
- _n_signature = node
- node.parent = self
- end
- redef fun n_extern=(node)
- do
- _n_extern = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_extern_calls=(node)
- do
- _n_extern_calls = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_extern_code_block=(node)
- do
- _n_extern_code_block = node
- if node != null then
- node.parent = self
- end
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- if _n_doc != null then
- v.enter_visit(_n_doc.as(not null))
- end
- if _n_kwredef != null then
- v.enter_visit(_n_kwredef.as(not null))
- end
- v.enter_visit(_n_visibility)
- v.enter_visit(_n_kwnew)
- if _n_methid != null then
- v.enter_visit(_n_methid.as(not null))
- end
- v.enter_visit(_n_signature)
- if _n_extern != null then
- v.enter_visit(_n_extern.as(not null))
- end
- if _n_extern_calls != null then
- v.enter_visit(_n_extern_calls.as(not null))
- end
- if _n_extern_code_block != null then
- v.enter_visit(_n_extern_code_block.as(not null))
- end
- end
-end
-redef class AMainMethPropdef
- private init empty_init do end
-
- init init_amainmethpropdef (
- n_kwredef: nullable TKwredef,
- n_block: nullable AExpr
- )
- do
- empty_init
- _n_kwredef = n_kwredef
- if n_kwredef != null then
- n_kwredef.parent = self
- end
- _n_block = n_block
- if n_block != null then
- n_block.parent = self
- end
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_kwredef == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwredef
- _n_kwredef = new_child
- else
- _n_kwredef = null
- end
- return
- end
- if _n_block == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AExpr
- _n_block = new_child
- else
- _n_block = null
- end
- return
- end
- end
-
- redef fun n_kwredef=(node)
- do
- _n_kwredef = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_block=(node)
- do
- _n_block = node
- if node != null then
- node.parent = self
- end
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- if _n_kwredef != null then
- v.enter_visit(_n_kwredef.as(not null))
- end
- if _n_block != null then
- v.enter_visit(_n_block.as(not null))
- end
- end
-end
-redef class ATypePropdef
- private init empty_init do end
-
- init init_atypepropdef (
- n_doc: nullable ADoc,
- n_kwredef: nullable TKwredef,
- n_visibility: nullable AVisibility,
- n_kwtype: nullable TKwtype,
- n_id: nullable TClassid,
- n_type: nullable AType,
- n_annotations: nullable AAnnotations
- )
- do
- empty_init
- _n_doc = n_doc
- if n_doc != null then
- n_doc.parent = self
- end
- _n_kwredef = n_kwredef
- if n_kwredef != null then
- n_kwredef.parent = self
- end
- _n_visibility = n_visibility.as(not null)
- n_visibility.parent = self
- _n_kwtype = n_kwtype.as(not null)
- n_kwtype.parent = self
- _n_id = n_id.as(not null)
- n_id.parent = self
- _n_type = n_type.as(not null)
- n_type.parent = self
- _n_annotations = n_annotations
- if n_annotations != null then
- n_annotations.parent = self
- end
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_doc == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa ADoc
- _n_doc = new_child
- else
- _n_doc = null
- end
- return
- end
- if _n_kwredef == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwredef
- _n_kwredef = new_child
- else
- _n_kwredef = null
- end
- return
- end
- if _n_visibility == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AVisibility
- _n_visibility = new_child
- else
- abort
- end
- return
- end
- if _n_kwtype == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwtype
- _n_kwtype = new_child
- else
- abort
- end
- return
- end
- if _n_id == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TClassid
- _n_id = new_child
- else
- abort
- end
- return
- end
- if _n_type == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AType
- _n_type = new_child
- else
- abort
- end
- return
- end
- if _n_annotations == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AAnnotations
- _n_annotations = new_child
- else
- _n_annotations = null
- end
- return
- end
- end
-
- redef fun n_doc=(node)
- do
- _n_doc = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_kwredef=(node)
- do
- _n_kwredef = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_visibility=(node)
- do
- _n_visibility = node
- node.parent = self
- end
- redef fun n_kwtype=(node)
- do
- _n_kwtype = node
- node.parent = self
- end
- redef fun n_id=(node)
- do
- _n_id = node
- node.parent = self
- end
- redef fun n_type=(node)
- do
- _n_type = node
- node.parent = self
- end
- redef fun n_annotations=(node)
- do
- _n_annotations = node
- if node != null then
- node.parent = self
- end
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- if _n_doc != null then
- v.enter_visit(_n_doc.as(not null))
- end
- if _n_kwredef != null then
- v.enter_visit(_n_kwredef.as(not null))
- end
- v.enter_visit(_n_visibility)
- v.enter_visit(_n_kwtype)
- v.enter_visit(_n_id)
- v.enter_visit(_n_type)
- if _n_annotations != null then
- v.enter_visit(_n_annotations.as(not null))
- end
- end
-end
-redef class AReadAble
- private init empty_init do end
-
- init init_areadable (
- n_kwredef: nullable TKwredef,
- n_kwreadable: nullable TKwreadable
- )
- do
- empty_init
- _n_kwredef = n_kwredef
- if n_kwredef != null then
- n_kwredef.parent = self
- end
- _n_kwreadable = n_kwreadable.as(not null)
- n_kwreadable.parent = self
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_kwredef == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwredef
- _n_kwredef = new_child
- else
- _n_kwredef = null
- end
- return
- end
- if _n_kwreadable == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwreadable
- _n_kwreadable = new_child
- else
- abort
- end
- return
- end
- end
-
- redef fun n_kwredef=(node)
- do
- _n_kwredef = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_kwreadable=(node)
- do
- _n_kwreadable = node
- node.parent = self
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- if _n_kwredef != null then
- v.enter_visit(_n_kwredef.as(not null))
- end
- v.enter_visit(_n_kwreadable)
- end
-end
-redef class AWriteAble
- private init empty_init do end
-
- init init_awriteable (
- n_kwredef: nullable TKwredef,
- n_visibility: nullable AVisibility,
- n_kwwritable: nullable TKwwritable
- )
- do
- empty_init
- _n_kwredef = n_kwredef
- if n_kwredef != null then
- n_kwredef.parent = self
- end
- _n_visibility = n_visibility
- if n_visibility != null then
- n_visibility.parent = self
- end
- _n_kwwritable = n_kwwritable.as(not null)
- n_kwwritable.parent = self
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_kwredef == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwredef
- _n_kwredef = new_child
- else
- _n_kwredef = null
- end
- return
- end
- if _n_visibility == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa AVisibility
- _n_visibility = new_child
- else
- _n_visibility = null
- end
- return
- end
- if _n_kwwritable == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TKwwritable
- _n_kwwritable = new_child
- else
- abort
- end
- return
- end
- end
-
- redef fun n_kwredef=(node)
- do
- _n_kwredef = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_visibility=(node)
- do
- _n_visibility = node
- if node != null then
- node.parent = self
- end
- end
- redef fun n_kwwritable=(node)
- do
- _n_kwwritable = node
- node.parent = self
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- if _n_kwredef != null then
- v.enter_visit(_n_kwredef.as(not null))
- end
- if _n_visibility != null then
- v.enter_visit(_n_visibility.as(not null))
- end
- v.enter_visit(_n_kwwritable)
- end
-end
-redef class AIdMethid
- private init empty_init do end
-
- init init_aidmethid (
- n_id: nullable TId
- )
- do
- empty_init
- _n_id = n_id.as(not null)
- n_id.parent = self
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_id == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TId
- _n_id = new_child
- else
- abort
- end
- return
- end
- end
-
- redef fun n_id=(node)
- do
- _n_id = node
- node.parent = self
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- v.enter_visit(_n_id)
- end
-end
-redef class APlusMethid
- private init empty_init do end
-
- init init_aplusmethid (
- n_plus: nullable TPlus
- )
- do
- empty_init
- _n_plus = n_plus.as(not null)
- n_plus.parent = self
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_plus == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TPlus
- _n_plus = new_child
- else
- abort
- end
- return
- end
- end
-
- redef fun n_plus=(node)
- do
- _n_plus = node
- node.parent = self
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- v.enter_visit(_n_plus)
- end
-end
-redef class AMinusMethid
- private init empty_init do end
-
- init init_aminusmethid (
- n_minus: nullable TMinus
- )
- do
- empty_init
- _n_minus = n_minus.as(not null)
- n_minus.parent = self
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_minus == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TMinus
- _n_minus = new_child
- else
- abort
- end
- return
- end
- end
-
- redef fun n_minus=(node)
- do
- _n_minus = node
- node.parent = self
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- v.enter_visit(_n_minus)
- end
-end
-redef class AStarMethid
- private init empty_init do end
-
- init init_astarmethid (
- n_star: nullable TStar
- )
- do
- empty_init
- _n_star = n_star.as(not null)
- n_star.parent = self
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_star == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TStar
- _n_star = new_child
- else
- abort
- end
- return
- end
- end
-
- redef fun n_star=(node)
- do
- _n_star = node
- node.parent = self
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- v.enter_visit(_n_star)
- end
-end
-redef class ASlashMethid
- private init empty_init do end
-
- init init_aslashmethid (
- n_slash: nullable TSlash
- )
- do
- empty_init
- _n_slash = n_slash.as(not null)
- n_slash.parent = self
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_slash == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TSlash
- _n_slash = new_child
- else
- abort
- end
- return
- end
- end
-
- redef fun n_slash=(node)
- do
- _n_slash = node
- node.parent = self
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- v.enter_visit(_n_slash)
- end
-end
-redef class APercentMethid
- private init empty_init do end
-
- init init_apercentmethid (
- n_percent: nullable TPercent
- )
- do
- empty_init
- _n_percent = n_percent.as(not null)
- n_percent.parent = self
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_percent == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TPercent
- _n_percent = new_child
- else
- abort
- end
- return
- end
- end
-
- redef fun n_percent=(node)
- do
- _n_percent = node
- node.parent = self
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- v.enter_visit(_n_percent)
- end
-end
-redef class AEqMethid
- private init empty_init do end
-
- init init_aeqmethid (
- n_eq: nullable TEq
- )
- do
- empty_init
- _n_eq = n_eq.as(not null)
- n_eq.parent = self
- end
-
- redef fun replace_child(old_child: ANode, new_child: nullable ANode)
- do
- if _n_eq == old_child then
- if new_child != null then
- new_child.parent = self
- assert new_child isa TEq
- _n_eq = new_child
- else
- abort
- end
- return
- end
- end
-
- redef fun n_eq=(node)
- do
- _n_eq = node
- node.parent = self
- end
-
-
- redef fun visit_all(v: Visitor)
- do
- v.enter_visit(_n_eq)
- end
-end
-redef class ANeMethid
- private init empty_init do end
-
- init init_anemethid (
- n_ne: nullable TNe
- )
- do
- empty_init
- _n_ne = n_ne.as(not null)
- n_ne.parent = self
- end