From 2012179f19d3c727ce418c35ed49cfbf3e4b3c62 Mon Sep 17 00:00:00 2001 From: Alexandre Terrasa Date: Tue, 24 May 2016 21:32:15 -0400 Subject: [PATCH] src/model: model_visitor uses MEntity::visibility Signed-off-by: Alexandre Terrasa --- src/model/model_visitor.nit | 31 ++++--------------------------- 1 file changed, 4 insertions(+), 27 deletions(-) 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 -- 1.7.9.5