X-Git-Url: http://nitlanguage.org?ds=sidebyside
diff --git a/src/metrics/model_hyperdoc.nit b/src/metrics/model_hyperdoc.nit
index 3f29c64..ed91198 100644
--- a/src/metrics/model_hyperdoc.nit
+++ b/src/metrics/model_hyperdoc.nit
@@ -17,13 +17,10 @@
# Dump of Nit model into hypertext human-readable format.
module model_hyperdoc
-import model
import metrics_base
-import phase
-import frontend
redef class ToolContext
- var model_hyperdoc_phase = new ModelHyperdocPhase(self, null)
+ var model_hyperdoc_phase: Phase = new ModelHyperdocPhase(self, null)
end
private class ModelHyperdocPhase
@@ -39,30 +36,30 @@ end
# The generated file contains the description of each entity of the model
fun generate_model_hyperdoc(toolcontext: ToolContext, model: Model)
do
- var buf = new Buffer
+ var buf = new FlatBuffer
buf.append("\n\n")
buf.append("Model
\n")
- buf.append("Projects
\n")
- for mproject in model.mprojects do
- buf.append("Project {mproject}
\n")
+ buf.append("Packages
\n")
+ for mpackage in model.mpackages do
+ buf.append("Package {mpackage}
\n")
buf.append("\n")
buf.append("- groups
\n")
- for x in mproject.mgroups do
+ for x in mpackage.mgroups do
buf.append("- {linkto(x)}
\n")
end
buf.append("
\n")
end
buf.append("Groups
\n")
- for mproject in model.mprojects do
- for mgroup in mproject.mgroups do
+ for mpackage in model.mpackages do
+ for mgroup in mpackage.mgroups do
buf.append("Group {mgroup}
\n")
buf.append("\n")
- buf.append("- project
\n")
- buf.append("- {linkto(mproject)}
\n")
+ buf.append("- package
\n")
+ buf.append("- {linkto(mpackage)}
\n")
buf.append("- filepath
\n")
- buf.append("- {mgroup.filepath}
\n")
+ buf.append("- {mgroup.filepath.to_s}
\n")
var p = mgroup.parent
if p != null then
buf.append("- parent group
\n")
@@ -189,15 +186,15 @@ do
end
end
buf.append("\n")
- var f = new OFStream.open(toolcontext.output_dir.join_path("model.html"))
+ var f = new FileWriter.open(toolcontext.output_dir.join_path("model.html"))
f.write(buf.to_s)
f.close
end
private fun linkto(o: Object): String
do
- if o isa MProject then
- return "{o}"
+ if o isa MPackage then
+ return "{o}"
else if o isa MGroup then
return "{o}"
else if o isa MModule then