From: Alexandre Terrasa Date: Wed, 25 May 2016 01:32:15 +0000 (-0400) Subject: src/model: model_visitor uses MEntity::visibility X-Git-Url: http://nitlanguage.org src/model: model_visitor uses MEntity::visibility Signed-off-by: Alexandre Terrasa --- diff --git a/src/model/model_visitor.nit b/src/model/model_visitor.nit index da881a0..59d3e61 100644 --- a/src/model/model_visitor.nit +++ b/src/model/model_visitor.nit @@ -144,7 +144,10 @@ redef class MEntity # See the specific implementation in the subclasses. fun visit_all(v: ModelVisitor) do end - private fun accept_visibility(min_visibility: nullable MVisibility): Bool do return true + private fun accept_visibility(min_visibility: nullable MVisibility): Bool do + if min_visibility == null then return true + return visibility >= min_visibility + end end redef class Model @@ -183,13 +186,6 @@ redef class MModule end end -redef class MClass - redef fun accept_visibility(min_visibility) do - if min_visibility == null then return true - return visibility >= min_visibility - end -end - redef class MClassDef # Visit all the classes and class definitions of the module. # @@ -202,23 +198,4 @@ redef class MClassDef v.enter_visit(x) end end - - redef fun accept_visibility(min_visibility) do - if min_visibility == null then return true - return mclass.visibility >= min_visibility - end -end - -redef class MProperty - redef fun accept_visibility(min_visibility) do - if min_visibility == null then return true - return visibility >= min_visibility - end -end - -redef class MPropDef - redef fun accept_visibility(min_visibility) do - if min_visibility == null then return true - return mproperty.visibility >= min_visibility - end end