model: implements MProject::full_name and MProject::c_name

[nit.git] / src / model / mproject.nit

diff --git a/src/model/mproject.nit b/src/model/mproject.nit
index c23e5cb..283d54c 100644 (file)
--- a/src/model/mproject.nit
+++ b/src/model/mproject.nit
@@ -18,6 +18,7 @@ module mproject
 import model_base
 private import more_collections
 import poset
+import mdoc
 
 # A Nit project, that encompass a product
 class MProject
@@ -26,6 +27,10 @@ class MProject
        # The name of the project
        redef var name: String
 
+       redef fun full_name do return name
+
+       redef var c_name = name.to_cmangle is lazy
+
        # The model of the project
        redef var model: Model
 
@@ -45,6 +50,12 @@ class MProject
 
        # MProject are always roots of the concerns hierarchy
        redef fun parent_concern do return null
+
+       redef fun mdoc_or_fallback
+       do
+               if mdoc != null then return mdoc
+               return root.mdoc_or_fallback
+       end
 end
 
 # A group of modules in a project
@@ -62,8 +73,9 @@ class MGroup
        # see `in_nesting` for more
        var parent: nullable MGroup
 
-       # fully qualified name
-       fun full_name: String
+       # Fully qualified name.
+       # It includes each parent group separated by `/`
+       redef fun full_name
        do
                var p = parent
                if p == null then return name