1 # This file is part of NIT ( http://www.nitlanguage.org ).
3 # Copyright 2008 Jean Privat <jean@pryen.org>
5 # Licensed under the Apache License, Version 2.0 (the "License");
6 # you may not use this file except in compliance with the License.
7 # You may obtain a copy of the License at
9 # http://www.apache.org/licenses/LICENSE-2.0
11 # Unless required by applicable law or agreed to in writing, software
12 # distributed under the License is distributed on an "AS IS" BASIS,
13 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
14 # See the License for the specific language governing permissions and
15 # limitations under the License.
20 import abstract_compiler
22 # The NitdocContext contains all the knowledge used for doc generation
26 private var model
: Model
27 private var mbuilder
: ModelBuilder
28 private var mainmodule
: MModule
29 private var class_hierarchy
: POSet[MClass]
30 private var arguments
: Array[String]
31 private var output_dir
: nullable String
32 private var dot_dir
: nullable String
33 private var share_dir
: nullable String
34 private var source
: nullable String
35 private var min_visibility
: MVisibility
37 private var opt_dir
= new OptionString("Directory where doc is generated", "-d", "--dir")
38 private var opt_source
= new OptionString("What link for source (%f for filename, %l for first line, %L for last line)", "--source")
39 private var opt_sharedir
= new OptionString("Directory containing the nitdoc files", "--sharedir")
40 private var opt_nodot
= new OptionBool("Do not generate graphes with graphiviz", "--no-dot")
41 private var opt_private
: OptionBool = new OptionBool("Generate the private API", "--private")
43 private var opt_custom_title
: OptionString = new OptionString("Title displayed in the top of the Overview page and as suffix of all page names", "--custom-title")
44 private var opt_custom_menu_items
: OptionString = new OptionString("Items displayed in menu before the 'Overview' item (Each item must be enclosed in 'li' tags)", "--custom-menu-items")
45 private var opt_custom_overview_text
: OptionString = new OptionString("Text displayed as introduction of Overview page before the modules list", "--custom-overview-text")
46 private var opt_custom_footer_text
: OptionString = new OptionString("Text displayed as footer of all pages", "--custom-footer-text")
50 self.arguments
= option_context
.rest
51 option_context
.options
.clear
52 option_context
.add_option
(opt_dir
)
53 option_context
.add_option
(opt_source
)
54 option_context
.add_option
(opt_sharedir
)
55 option_context
.add_option
(opt_nodot
)
56 option_context
.add_option
(opt_private
)
57 option_context
.add_option
(opt_custom_title
)
58 option_context
.add_option
(opt_custom_footer_text
)
59 option_context
.add_option
(opt_custom_overview_text
)
60 option_context
.add_option
(opt_custom_menu_items
)
63 if arguments
.length
< 1 then
69 mbuilder
= new ModelBuilder(model
, self)
70 # Here we load an process all modules passed on the command line
71 var mmodules
= mbuilder
.parse_and_build
(arguments
)
72 mbuilder
.full_propdef_semantic_analysis
73 if mmodules
.is_empty
then return
75 if mmodules
.length
== 1 then
76 mainmodule
= mmodules
.first
78 # We need a main module, so we build it by importing all modules
79 mainmodule
= new MModule(model
, null, "<main>", new Location(null, 0, 0, 0, 0))
80 mainmodule
.set_imported_mmodules
(mmodules
)
82 self.class_hierarchy
= mainmodule
.flatten_mclass_hierarchy
85 redef fun process_options
do
87 if not opt_dir
.value
is null then
88 output_dir
= opt_dir
.value
92 if not opt_sharedir
.value
is null then
93 share_dir
= opt_sharedir
.value
95 var dir
= "NIT_DIR".environ
97 dir
= "{sys.program_name.dirname}/../share/nitdoc"
99 dir
= "{dir}/share/nitdoc"
102 if share_dir
is null then
103 print
"Error: Cannot locate nitdoc share files. Uses --sharedir or envvar NIT_DIR"
106 dir
= "{share_dir.to_s}/scripts/js-facilities.js"
107 if share_dir
is null then
108 print
"Error: Invalid nitdoc share files. Check --sharedir or envvar NIT_DIR"
112 if opt_private
.value
then
113 min_visibility
= none_visibility
115 min_visibility
= protected_visibility
118 source
= opt_source
.value
121 fun generate_nitdoc
do
122 # Create destination dir if it's necessary
123 if not output_dir
.file_exists
then output_dir
.mkdir
124 sys
.system
("cp -r {share_dir.to_s}/* {output_dir.to_s}/")
126 if not opt_nodot
.value
then self.dot_dir
= output_dir
.to_s
134 private fun overview
do
135 var overviewpage
= new NitdocOverview(self, dot_dir
)
136 overviewpage
.save
("{output_dir.to_s}/index.html")
139 private fun fullindex
do
140 var fullindex
= new NitdocFullindex(self)
141 fullindex
.save
("{output_dir.to_s}/full-index.html")
144 private fun modules
do
145 for mmodule
in model
.mmodules
do
146 if mmodule
.name
== "<main>" then continue
147 var modulepage
= new NitdocModule(mmodule
, self, dot_dir
)
148 modulepage
.save
("{output_dir.to_s}/{mmodule.url}")
152 private fun classes
do
153 for mclass
in mbuilder
.model
.mclasses
do
154 var classpage
= new NitdocClass(mclass
, self, dot_dir
, source
)
155 classpage
.save
("{output_dir.to_s}/{mclass.url}")
159 private fun quicksearch_list
do
160 var file
= new OFStream.open
("{output_dir.to_s}/quicksearch-list.js")
161 var content
= new Buffer
162 content
.append
("var entries = \{ ")
164 for mmodule
in model
.mmodules
do
165 content
.append
("\"{mmodule.name}\
": [")
166 content
.append
("\{txt: \"{mmodule.name}\", url
:\
"{mmodule.url}\" \
},")
169 for mclass in model.mclasses do
170 if mclass.visibility < min_visibility then continue
171 content.append("\
"{mclass.name}\": [")
172 content.append("\
{txt: \"{mclass.name}\
", url:\"{mclass.url}\
" \},")
175 var name2mprops
= new HashMap[String, Set[MPropDef]]
176 for mproperty
in model
.mproperties
do
177 if mproperty
.visibility
< min_visibility
then continue
178 if mproperty
isa MAttribute then continue
179 if not name2mprops
.has_key
(mproperty
.name
) then name2mprops
[mproperty
.name
] = new HashSet[MPropDef]
180 name2mprops
[mproperty
.name
].add_all
(mproperty
.mpropdefs
)
182 for mproperty
, mpropdefs
in name2mprops
do
183 content
.append
("\"{mproperty}\
": [")
184 for mpropdef
in mpropdefs
do
185 content
.append
("\{txt: \"{mpropdef.full_name}\", url
:\
"{mpropdef.url}\" \
},")
190 content.append(" \
};")
191 file.write(content.to_s)
198 abstract class NitdocPage
201 var dot_dir: nullable String
202 var source: nullable String
203 var ctx: NitdocContext
205 init(ctx: NitdocContext) do
210 protected fun head do
211 append("<meta charset
='utf-8'/>")
212 append("<script
type='text/javascript' src
='scripts/jquery-1.7.1.min.js'></script
>")
213 append("<script
type='text/javascript' src
='quicksearch-list.js'></script
>")
214 append("<script
type='text/javascript' src
='scripts/js-facilities.js'></script
>")
215 append("<link rel
='stylesheet' href
='styles/main.css' type='text/css' media
='screen'/>")
217 if ctx.opt_custom_title.value != null then
218 title = " | {ctx.opt_custom_title.value.to_s}"
220 append("<title
>{self.title}{title}</title
>")
223 protected fun menu do
224 if ctx.opt_custom_menu_items.value != null then
225 append(ctx.opt_custom_menu_items.value.to_s)
229 protected fun title: String is abstract
231 protected fun header do
233 append("<nav
class='main'>")
236 append("<li id
='liGitHub'>")
237 append("<a
class='btn' id
='logGitHub'>")
238 append("<img id
='imgGitHub' src
='resources/icons/github-icon.png' alt
='GitHub'/>")
240 append("<div
class='popover bottom'>")
241 append("<div
class='arrow'> 
;</div
>")
242 append("<div
class='githubTitle'>")
243 append("<h3
>Github Sign In</h3
>")
246 append("<label id
='lbloginGit'>Username</label>")
247 append("<input id
='loginGit' name
='login' type='text'/>")
248 append("<label id
='logginMessage'>Hello ")
249 append("<a id
='githubAccount'><strong id
='nickName'></strong
></a
>")
253 append("<label id
='lbpasswordGit'>Password</label>")
254 append("<input id
='passwordGit' name
='password' type='password'/>")
255 append("<div id
='listBranches'>")
256 append("<label id
='lbBranches'>Branch</label>")
257 append("<select
class='dropdown' id
='dropBranches' name
='dropBranches' tabindex
='1'></select
>")
261 append("<label id
='lbrepositoryGit'>Repository</label>")
262 append("<input id
='repositoryGit' name
='repository' type='text'/>")
265 append("<label id
='lbbranchGit'>Branch</label>")
266 append("<input id
='branchGit' name
='branch' type='text'/>")
269 append("<a id
='signIn'>Sign In</a
>")
278 protected fun content is abstract
280 protected fun footer do
281 if ctx.opt_custom_footer_text.value != null then
282 append("<footer
>{ctx.opt_custom_footer_text.value.to_s}</footer
>")
286 # Generate a clickable graphviz image using a dot content
287 protected fun generate_dot(dot: String, name: String, alt: String) do
288 var output_dir = dot_dir
289 if output_dir == null then return
290 var file = new OFStream.open("{output_dir}/{name}.dot
")
293 sys.system("\
{ test -f {output_dir}/{name}.png
&& test
-f
{output_dir}/{name}.s
.dot
&& diff
{output_dir}/{name}.dot
{output_dir}/{name}.s
.dot
>/dev
/null 2>&1 ; \
} || \
{ cp {output_dir}/{name}.dot
{output_dir}/{name}.s
.dot
&& dot
-Tpng -o
{output_dir}/{name}.png
-Tcmapx -o
{output_dir}/{name}.map
{output_dir}/{name}.s
.dot
; \
}")
294 append("<article
class='graph'>")
295 append("<img src
='{name}.png' usemap
='#{name}' style
='margin:auto' alt
='{alt}'/>")
297 var fmap = new IFStream.open("{output_dir}/{name}.map
")
298 append(fmap.read_all)
302 # Add a (source) link for a given location
303 protected fun show_source(l: Location): String
305 if source == null then
306 return "({l.file.filename.simplify_path})"
308 # THIS IS JUST UGLY ! (but there is no replace yet)
309 var x = source.split_with("%f
")
310 source = x.join(l.file.filename.simplify_path)
311 x = source.split_with("%l
")
312 source = x.join(l.line_start.to_s)
313 x = source.split_with("%L
")
314 source = x.join(l.line_end.to_s)
315 return " (<a href
=\
"{source.to_s}\">source
</a
>)"
319 # Render the page as a html string
320 fun render: String do
321 append("<!DOCTYPE html
>")
327 append("<div
class='page'>")
335 # Save html page in the specified file
336 fun save(file: String) do
337 var out = new OFStream.open(file)
346 private var mbuilder: ModelBuilder
347 private var mmodules = new Array[MModule]
349 init(ctx: NitdocContext, dot_dir: nullable String) do
351 self.mbuilder = ctx.mbuilder
352 self.dot_dir = dot_dir
354 var mmodules = new HashSet[MModule]
355 for mmodule in mbuilder.model.mmodules do
356 if mmodule.name == "<main
>" then continue
357 var owner = mmodule.public_owner
358 if owner != null then
361 mmodules.add(mmodule)
365 var sorter = new ComparableSorter[MModule]
366 self.mmodules.add_all(mmodules)
367 sorter.sort(self.mmodules)
370 redef fun title do return "Overview"
374 append("<li
class='current'>Overview</li
>")
375 append("<li
><a href
='full-index.html'>Full Index</a
></li
>")
379 append("<div
class='content fullpage'>")
380 var title = "Overview"
381 if ctx.opt_custom_title.value != null then
382 title = ctx.opt_custom_title.value.to_s
384 append("<h1
>{title}</h1
>")
386 if ctx.opt_custom_overview_text.value != null then
387 text = ctx.opt_custom_overview_text.value.to_s
389 append("<article
class='overview'>{text}</article
>")
390 append("<article
class='overview'>")
392 append("<h2
>Modules</h2
>")
394 for mmodule in mmodules do
395 if mbuilder.mmodule2nmodule.has_key(mmodule) then
396 var amodule = mbuilder.mmodule2nmodule[mmodule]
398 mmodule.html_link(self)
399 append(" 
;{amodule.short_comment}</li
>")
409 private fun process_generate_dot do
411 op.append("digraph dep \
{ rankdir
=BT; node
[shape
=none
,margin
=0,width
=0,height
=0,fontsize
=10]; edge
[dir
=none
,color
=gray
]; ranksep
=0.2; nodesep
=0.1;\n
")
412 for mmodule in mmodules do
413 op.append("\
"{mmodule.name}\"[URL=\
"{mmodule.url}\"];\n
")
414 for imported in mmodule.in_importation.direct_greaters do
415 if imported.direct_owner == null then
416 op.append("\
"{mmodule.name}\"->\
"{imported.name}\";\n
")
421 generate_dot(op.to_s, "dep
", "Modules hierarchy
")
425 # The full index page
426 class NitdocFullindex
429 init(ctx: NitdocContext) do
434 redef fun title do return "Full Index"
438 append("<li
><a href
='index.html'>Overview</a
></li
>")
439 append("<li
class='current'>Full Index</li
>")
443 append("<div
class='content fullpage'>")
444 append("<h1
>Full Index</h1
>")
451 # Add to content modules column
452 private fun module_column do
453 var sorted = ctx.mbuilder.model.mmodule_importation_hierarchy.to_a
454 var sorter = new ComparableSorter[MModule]
456 append("<article
class='modules filterable'>")
457 append("<h2
>Modules</h2
>")
459 for mmodule in sorted do
461 mmodule.html_link(self)
468 # Add to content classes modules
469 private fun classes_column do
470 var sorted = ctx.mbuilder.model.mclasses
471 var sorter = new ComparableSorter[MClass]
473 append("<article
class='modules filterable'>")
474 append("<h2
>Classes</h2
>")
476 for mclass in sorted do
477 if mclass.visibility < ctx.min_visibility then continue
479 mclass.html_link(self)
486 # Insert the properties column of fullindex page
487 private fun properties_column do
488 var sorted = ctx.mbuilder.model.mproperties
489 var sorter = new ComparableSorter[MProperty]
491 append("<article
class='modules filterable'>")
492 append("<h2
>Properties</h2
>")
494 for mproperty in sorted do
495 if mproperty.visibility < ctx.min_visibility then continue
496 if mproperty isa MAttribute then continue
498 mproperty.intro.html_link(self)
500 mproperty.intro.mclassdef.mclass.html_link(self)
513 private var mmodule: MModule
514 private var mbuilder: ModelBuilder
516 init(mmodule: MModule, ctx: NitdocContext, dot_dir: nullable String) do
518 self.mmodule = mmodule
519 self.mbuilder = ctx.mbuilder
520 self.dot_dir = dot_dir
524 if mbuilder.mmodule2nmodule.has_key(mmodule) then
525 var nmodule = mbuilder.mmodule2nmodule[mmodule]
526 return "{mmodule.name} module | {nmodule.short_comment}"
528 return "{mmodule.name} module"
534 append("<li
><a href
='index.html'>Overview</a
></li
>")
535 append("<li
class='current'>{mmodule.name}</li
>")
536 append("<li
><a href
='full-index.html'>Full Index</a
></li
>")
541 append("<div
class='content'>")
542 append("<h1
>{mmodule.name}</h1
>")
543 append("<div
class='subtitle'>")
544 mmodule.html_signature(self)
546 mmodule.html_full_comment(self)
553 private fun process_generate_dot do
554 var name = "dep_
{mmodule.name}"
556 op.append("digraph
{name} \
{ rankdir
=BT; node
[shape
=none
,margin
=0,width
=0,height
=0,fontsize
=10]; edge
[dir
=none
,color
=gray
]; ranksep
=0.2; nodesep
=0.1;\n
")
557 for m in mmodule.in_importation.poset do
558 if m.name == "<main
>" then continue
559 var public_owner = m.public_owner
560 if public_owner == null then
563 op.append("\
"{m.name}\"[shape
=box
,margin
=0.03];\n
")
565 op.append("\
"{m.name}\"[URL=\
"{m.url}\"];\n
")
568 for imported in m.in_importation.direct_greaters do
569 if imported.name == "<main
>" then continue
570 if imported.public_owner == null then
571 op.append("\
"{public_owner.name}\"->\
"{imported.name}\";\n
")
576 generate_dot(op.to_s, name, "Dependency graph
for module {mmodule.name}")
579 private fun sidebar do
580 append("<div
class='menu'>")
582 append("<h3
>Module Hierarchy</h3
>")
583 var dependencies = new Array[MModule]
584 for dep in mmodule.in_importation.greaters do
585 if dep == mmodule or dep.public_owner != null then continue
586 dependencies.add(dep)
588 if dependencies.length > 0 then
589 append("<h4
>All dependencies
</h4
>")
590 display_module_list(dependencies)
592 var clients = new Array[MModule]
593 for dep in mmodule.in_importation.smallers do
594 if dep == mmodule or dep.public_owner != null then continue
597 if clients.length > 0 then
598 append("<h4
>All clients
</h4
>")
599 display_module_list(clients)
602 if mmodule.in_nesting.direct_greaters.length > 0 then
604 append("<h3
>Nested Modules</h3
>")
605 display_module_list(mmodule.in_nesting.direct_greaters.to_a)
611 private fun display_module_list(list: Array[MModule]) do
613 var sorter = new ComparableSorter[MModule]
623 # display the class column
624 private fun classes do
625 var intro_mclasses = mmodule.intro_mclasses
626 var redef_mclasses = mmodule.redef_mclasses
627 var all_mclasses = new HashSet[MClass]
628 for m in mmodule.in_nesting.greaters do
629 all_mclasses.add_all(m.intro_mclasses)
630 all_mclasses.add_all(m.redef_mclasses)
632 all_mclasses.add_all(intro_mclasses)
633 all_mclasses.add_all(redef_mclasses)
635 var sorted = new Array[MClass]
636 sorted.add_all(all_mclasses)
637 var sorter = new ComparableSorter[MClass]
639 append("<div
class='module'>")
640 append("<article
class='classes filterable'>")
641 append("<h2
>Classes</h2
>")
644 if c.visibility < ctx.min_visibility then continue
645 if redef_mclasses.has(c) and c.intro_mmodule.public_owner != mmodule then
646 append("<li
class='redef'>")
647 append("<span title
='refined in this module'>R
</span
>")
649 append("<li
class='intro'>")
650 append("<span title
='introduced in this module'>I
</span
>")
660 # display the property column
661 private fun properties do
663 var mpropdefs = new HashSet[MPropDef]
664 for m in mmodule.in_nesting.greaters do
665 for c in m.mclassdefs do mpropdefs.add_all(c.mpropdefs)
667 for c in mmodule.mclassdefs do mpropdefs.add_all(c.mpropdefs)
668 var sorted = mpropdefs.to_a
669 var sorter = new ComparableSorter[MPropDef]
671 # display properties in one column
672 append("<article
class='properties filterable'>")
673 append("<h2
>Properties</h2
>")
675 for mprop in sorted do
676 if mprop isa MAttributeDef then continue
677 if mprop.mproperty.visibility < ctx.min_visibility then continue
678 mprop.html_list_item(self)
689 private var mclass: MClass
690 private var vtypes = new HashSet[MVirtualTypeDef]
691 private var consts = new HashSet[MMethodDef]
692 private var meths = new HashSet[MMethodDef]
693 private var inherited = new HashSet[MPropDef]
695 init(mclass: MClass, ctx: NitdocContext, dot_dir: nullable String, source: nullable String) do
698 self.dot_dir = dot_dir
701 for mclassdef in mclass.mclassdefs do
702 for mpropdef in mclassdef.mpropdefs do
703 if mpropdef.mproperty.visibility < ctx.min_visibility then continue
704 if mpropdef isa MVirtualTypeDef then vtypes.add(mpropdef)
705 if mpropdef isa MMethodDef then
706 if mpropdef.mproperty.is_init then
714 # get inherited properties
715 for mprop in mclass.inherited_mproperties do
716 var mpropdef = mprop.intro
717 if mprop.visibility < ctx.min_visibility then continue
718 if mpropdef isa MVirtualTypeDef then vtypes.add(mpropdef)
719 if mpropdef isa MMethodDef then
720 if mpropdef.mproperty.is_init then
726 inherited.add(mpropdef)
731 var nclass = ctx.mbuilder.mclassdef2nclassdef[mclass.intro]
732 if nclass isa AStdClassdef then
733 return "{mclass.name} class | {nclass.short_comment}"
735 return "{mclass.name} class"
741 append("<li
><a href
='index.html'>Overview</a
></li
>")
742 var public_owner = mclass.public_owner
743 if public_owner is null then
745 mclass.intro_mmodule.html_link(self)
749 public_owner.html_link(self)
752 append("<li
class='current'>{mclass.name}</li
>")
753 append("<li
><a href
='full-index.html'>Full Index</a
></li
>")
757 append("<div
class='menu'>")
761 append("<div
class='content'>")
766 private fun properties_column do
767 var sorter = new ComparableSorter[MPropDef]
768 append("<nav
class='properties filterable'>")
769 append("<h3
>Properties</h3
>")
771 if vtypes.length > 0 then
772 var vts = new Array[MVirtualTypeDef]
775 append("<h4
>Virtual Types</h4
>")
778 mprop.html_sidebar_item(self)
783 if consts.length > 0 then
784 var cts = new Array[MMethodDef]
787 append("<h4
>Constructors</h4
>")
790 if mprop.mproperty.name == "init" and mprop.mclassdef.mclass != mclass then continue
791 mprop.html_sidebar_item(self)
796 if meths.length > 0 then
797 var mts = new Array[MMethodDef]
800 append("<h4
>Methods</h4
>")
803 if mclass.name != "Object" and mprop.mproperty.intro_mclassdef.mclass.name == "Object" and mprop.mproperty.visibility <= protected_visibility then continue
804 mprop.html_sidebar_item(self)
811 private fun inheritance_column do
812 var sorted = new Array[MClass]
813 var sorterp = new ComparableSorter[MClass]
815 append("<h3
>Inheritance</h3
>")
816 var greaters = mclass.in_hierarchy(ctx.mainmodule).greaters.to_a
817 if greaters.length > 1 then
818 ctx.mainmodule.linearize_mclasses(greaters)
819 append("<h4
>Superclasses</h4
>")
821 for sup in greaters do
822 if sup == mclass then continue
829 var smallers = mclass.in_hierarchy(ctx.mainmodule).smallers.to_a
830 var direct_smallers = mclass.in_hierarchy(ctx.mainmodule).direct_smallers.to_a
831 if smallers.length <= 1 then
832 append("<h4
>No Known Subclasses</h4
>")
833 else if smallers.length <= 100 then
834 ctx.mainmodule.linearize_mclasses(smallers)
835 append("<h4
>Subclasses</h4
>")
837 for sub in smallers do
838 if sub == mclass then continue
844 else if direct_smallers.length <= 100 then
845 ctx.mainmodule.linearize_mclasses(direct_smallers)
846 append("<h4
>Direct Subclasses Only</h4
>")
848 for sub in direct_smallers do
849 if sub == mclass then continue
856 append("<h4
>Too much
Subclasses to list
</h4
>")
861 private fun class_doc do
863 append("<h1
>{mclass.signature}</h1
>")
864 append("<div
class='subtitle info'>")
865 mclass.html_full_signature(self)
868 var nclass = ctx.mbuilder.mclassdef2nclassdef[mclass.intro]
869 append("<div style
=\
"float: right;\"><a id
=\
"lblDiffCommit\"></a
></div
>")
870 append("<section
class='description'>")
871 if nclass isa AStdClassdef and not nclass.full_comment.is_empty then append("<pre
class=\
"text_label\" title
=\
"122\" name
=\
"\" tag
=\
"{mclass.mclassdefs.first.location.to_s}\" type=\
"2\">{nclass.full_comment}</pre
><textarea id
=\
"fileContent\" class=\
"edit\" cols
=\
"76\" rows
=\
"1\" style
=\
"display: none;\"></textarea
><a id
=\
"cancelBtn\" style
=\
"display: none;\">Cancel</a
><a id
=\
"commitBtn\" style
=\
"display: none;\">Commit</a
><pre id
=\
"preSave\" class=\
"text_label\" type=\
"2\"></pre
>")
875 var concern2meths = new ArrayMap[MModule, Array[MMethodDef]]
876 var sorted_meths = new Array[MMethodDef]
877 var sorted = new Array[MModule]
878 sorted_meths.add_all(meths)
879 ctx.mainmodule.linearize_mpropdefs(sorted_meths)
881 if inherited.has(meth) then continue
882 var mmodule = meth.mclassdef.mmodule
883 if not concern2meths.has_key(mmodule) then
885 concern2meths[mmodule] = new Array[MMethodDef]
887 concern2meths[mmodule].add(meth)
889 var sections = new ArrayMap[MModule, Array[MModule]]
890 for mmodule in concern2meths.keys do
891 var owner = mmodule.public_owner
892 if owner == null then owner = mmodule
893 if not sections.has_key(owner) then sections[owner] = new Array[MModule]
894 if owner != mmodule then sections[owner].add(mmodule)
896 append("<section
class='concerns'>")
897 append("<h2
class='section-header'>Concerns</h2
>")
899 for owner, mmodules in sections do
900 var nowner = ctx.mbuilder.mmodule2nmodule[owner]
902 if nowner.short_comment.is_empty then
903 append("<a href
=\
"#{owner.anchor}\">{owner.name}</a
>")
905 append("<a href
=\
"#{owner.anchor}\">{owner.name}</a
>: {nowner.short_comment}")
907 if not mmodules.is_empty then
909 for mmodule in mmodules do
910 var nmodule = ctx.mbuilder.mmodule2nmodule[mmodule]
911 if nmodule.short_comment.is_empty then
912 append("<li
><a href
=\
"#{mmodule.anchor}\">{mmodule.name}</a
></li
>")
914 append("<li
><a href
=\
"#{mmodule.anchor}\">{mmodule.name}</a
>: {nmodule.short_comment}</li
>")
924 var prop_sorter = new ComparableSorter[MPropDef]
925 var sorterprop = new ComparableSorter[MProperty]
926 var sorterc = new ComparableSorter[MClass]
927 var lmmodule = new List[MModule]
928 # virtual and formal types
929 var local_vtypes = new Array[MVirtualTypeDef]
930 for vt in vtypes do if not inherited.has(vt) then local_vtypes.add(vt)
931 if local_vtypes.length > 0 or mclass.arity > 0 then
932 append("<section
class='types'>")
933 append("<h2
>Formal and Virtual Types</h2
>")
935 if mclass.arity > 0 and nclass isa AStdClassdef then
936 for ft, bound in mclass.parameter_types do
937 append("<article id
='FT_{ft}'>")
938 append("<h3
class='signature'>{ft}: ")
939 bound.html_link(self)
941 append("<div
class=\
"info\">formal generic
type</div
>")
946 prop_sorter.sort(local_vtypes)
947 for prop in local_vtypes do prop.html_full_desc(self)
951 var local_consts = new Array[MMethodDef]
952 for const in consts do if not inherited.has(const) then local_consts.add(const)
953 prop_sorter.sort(local_consts)
954 if local_consts.length > 0 then
955 append("<section
class='constructors'>")
956 append("<h2
class='section-header'>Constructors</h2
>")
957 for prop in local_consts do prop.html_full_desc(self)
961 if not concern2meths.is_empty then
962 append("<section
class='methods'>")
963 append("<h2
class='section-header'>Methods</h2
>")
964 for owner, mmodules in sections do
965 append("<a id
=\
"{owner.anchor}\"></a
>")
966 if owner != mclass.intro_mmodule and owner != mclass.public_owner then
967 var nowner = ctx.mbuilder.mmodule2nmodule[owner]
968 append("<h3
class=\
"concern-toplevel\">Methods refined
in ")
969 owner.html_link(self)
971 append("<p
class=\
"concern-doc\">")
972 owner.html_link(self)
973 if not nowner.short_comment.is_empty then
974 append(": {nowner.short_comment}")
978 if concern2meths.has_key(owner) then
979 var mmethods = concern2meths[owner]
980 prop_sorter.sort(mmethods)
981 for prop in mmethods do prop.html_full_desc(self)
983 for mmodule in mmodules do
984 append("<a id
=\
"{mmodule.anchor}\"></a
>")
985 var nmodule = ctx.mbuilder.mmodule2nmodule[mmodule]
986 if mmodule != mclass.intro_mmodule and mmodule != mclass.public_owner then
987 append("<p
class=\
"concern-doc\">")
988 mmodule.html_link(self)
989 if not nmodule.short_comment.is_empty then
990 append(": {nmodule.short_comment}")
994 var mmethods = concern2meths[mmodule]
995 prop_sorter.sort(mmethods)
996 for prop in mmethods do prop.html_full_desc(self)
1000 # inherited properties
1001 if inherited.length > 0 then
1002 var sorted_inherited = new Array[MPropDef]
1003 sorted_inherited.add_all(inherited)
1004 ctx.mainmodule.linearize_mpropdefs(sorted_inherited)
1005 var classes = new ArrayMap[MClass, Array[MPropDef]]
1006 for mmethod in sorted_inherited.reversed do
1007 var mclass = mmethod.mclassdef.mclass
1008 if not classes.has_key(mclass) then classes[mclass] = new Array[MPropDef]
1009 classes[mclass].add(mmethod)
1011 append("<h3
>Inherited Properties</h3
>")
1012 for c, mmethods in classes do
1013 prop_sorter.sort(mmethods)
1014 append("<p
>Defined in ")
1017 for i in [0..mmethods.length[ do
1018 var mmethod = mmethods[i]
1019 mmethod.html_link(self)
1020 if i <= mmethods.length - 1 then append(", ")
1025 append("</section
>")
1028 private fun process_generate_dot do
1029 var pe = ctx.class_hierarchy[mclass]
1030 var cla = new HashSet[MClass]
1031 var sm = new HashSet[MClass]
1032 var sm2 = new HashSet[MClass]
1034 while cla.length + sm.length < 10 and sm.length > 0 do
1038 sm2.add_all(pe.poset[x].direct_smallers)
1044 cla.add_all(pe.greaters)
1047 var name = "dep_
{mclass.name}"
1048 op.append("digraph
{name} \
{ rankdir
=BT; node
[shape
=none
,margin
=0,width
=0,height
=0,fontsize
=10]; edge
[dir
=none
,color
=gray
]; ranksep
=0.2; nodesep
=0.1;\n
")
1051 op.append("\
"{c.name}\"[shape
=box
,margin
=0.03];\n
")
1053 op.append("\
"{c.name}\"[URL=\
"{c.url}\"];\n
")
1055 for c2 in pe.poset[c].direct_greaters do
1056 if not cla.has(c2) then continue
1057 op.append("\
"{c.name}\"->\
"{c2.name}\";\n
")
1059 if not pe.poset[c].direct_smallers.is_empty then
1061 for c2 in pe.poset[c].direct_smallers do
1062 if cla.has(c2) then others = false
1065 op.append("\
"{c.name}...\"[label=\
"\"];\n
")
1066 op.append("\
"{c.name}...\"->\
"{c.name}\"[style
=dotted
];\n
")
1071 generate_dot(op.to_s, name, "Dependency graph
for class {mclass.name}")
1081 redef type OTHER: MModule
1082 redef fun <(other: OTHER): Bool do return self.name < other.name
1084 # Get the list of all methods in a module
1085 fun imported_methods: Set[MMethod] do
1086 var methods = new HashSet[MMethod]
1087 for mclass in imported_mclasses do
1088 for method in mclass.intro_methods do
1095 # Get the list aof all refined methods in a module
1096 fun redef_methods: Set[MMethod] do
1097 var methods = new HashSet[MMethod]
1098 for mclass in redef_mclasses do
1099 for method in mclass.intro_methods do
1106 # URL to nitdoc page
1108 var res = new Buffer
1109 res.append("module_
")
1110 var mowner = public_owner
1111 if mowner != null then
1112 res.append("{public_owner.name}_
")
1114 res.append("{self.name}.html
")
1118 # html anchor id to the module in a nitdoc page
1119 fun anchor: String do
1120 var res = new Buffer
1122 var mowner = public_owner
1123 if mowner != null then
1124 res.append("{public_owner.name}_
")
1126 res.append(self.name)
1130 # Return a link (html a tag) to the nitdoc module page
1131 fun html_link(page: NitdocPage) do
1132 if page.ctx.mbuilder.mmodule2nmodule.has_key(self) then
1133 page.append("<a href
='{url}' title
='{page.ctx.mbuilder.mmodule2nmodule[self].short_comment}'>{name}</a
>")
1135 page.append("<a href
='{url}'>{name}</a
>")
1139 # Return the module signature decorated with html
1140 fun html_signature(page: NitdocPage) do
1141 page.append("<span
>module ")
1142 html_full_namespace(page)
1143 page.append("</span
>")
1146 # Return the module full namespace decorated with html
1147 fun html_full_namespace(page: NitdocPage) do
1148 page.append("<span
>")
1149 var mowner = public_owner
1150 if mowner != null then
1151 public_owner.html_namespace(page)
1155 page.append("</span
>")
1158 # Return the module full namespace decorated with html
1159 fun html_namespace(page: NitdocPage) do
1160 page.append("<span
>")
1161 var mowner = public_owner
1162 if mowner != null then
1163 public_owner.html_namespace(page)
1167 page.append("</span
>")
1170 # Return the full comment of the module decorated with html
1171 fun html_full_comment(page: NitdocPage) do
1172 if page.ctx.mbuilder.mmodule2nmodule.has_key(self) then
1173 page.append("<div id
='description'>")
1174 page.append("<pre
class='text_label'>{page.ctx.mbuilder.mmodule2nmodule[self].full_comment}</pre
>")
1175 page.append("<textarea
class='edit' rows
='1' cols
='76' id
='fileContent'></textarea
>")
1176 page.append("<a id
='cancelBtn'>Cancel</a
>")
1177 page.append("<a id
='commitBtn'>Commit</a
>")
1178 page.append("<pre
class='text_label' id
='preSave' type='2'></pre
>")
1179 page.append("</div
>")
1186 redef type OTHER: MClass
1187 redef fun <(other: OTHER): Bool do return self.name < other.name
1189 # Return the module signature decorated with html
1190 fun html_full_signature(page: NitdocPage) do
1191 if visibility < public_visibility then page.append("{visibility.to_s} ")
1192 page.append("{kind} ")
1193 html_namespace(page)
1196 # name with formal parameter
1198 private fun signature: String do
1200 return "{name}[{intro.parameter_names.join(", ")}]"
1206 # Return a link (html a tag) to the nitdoc class page
1207 fun html_link(page: NitdocPage) do
1208 page.append("<a href
='{url}'")
1209 if page.ctx.mbuilder.mclassdef2nclassdef.has_key(intro) then
1210 var nclass = page.ctx.mbuilder.mclassdef2nclassdef[intro]
1211 if nclass isa AStdClassdef then
1212 page.append(" title
=\
"{nclass.short_comment}\"")
1215 page.append(">{signature}</a
>")
1218 # Return the class namespace decorated with html
1219 fun html_namespace(page: NitdocPage) do
1220 intro_mmodule.html_namespace(page)
1221 page.append("::<span
>")
1223 page.append("</span
>")
1227 return "class_
{public_owner}_
{c_name}.html
"
1230 # Escape name for html output
1231 redef fun name do return super.html_escape
1234 redef class MProperty
1236 redef type OTHER: MProperty
1237 redef fun <(other: OTHER): Bool do return self.name < other.name
1239 # Return the property namespace decorated with html
1240 fun html_namespace(page: NitdocPage) do
1241 intro_mclassdef.mclass.html_namespace(page)
1242 page.append("::<span
>")
1243 intro.html_link(page)
1244 page.append("</span
>")
1247 # Escape name for html output
1248 redef fun name do return super.html_escape
1252 fun html_link(page: NitdocPage) is abstract
1255 redef class MClassType
1256 redef fun html_link(page) do mclass.html_link(page)
1259 redef class MNullableType
1260 redef fun html_link(page) do
1261 page.append("nullable ")
1262 mtype.html_link(page)
1266 redef class MGenericType
1267 redef fun html_link(page) do
1268 page.append("<a href
='{mclass.url}'>{mclass.name}</a
>[")
1269 for i in [0..arguments.length[ do
1270 arguments[i].html_link(page)
1271 if i < arguments.length - 1 then page.append(", ")
1277 redef class MParameterType
1278 redef fun html_link(page) do
1279 var name = mclass.intro.parameter_names[rank]
1280 page.append("<a href
='{mclass.url}#FT_{name}' title
='formal type'>{name}</a
>")
1284 redef class MVirtualType
1285 redef fun html_link(page) do mproperty.intro.html_link(page)
1288 redef class MClassDef
1289 # Return the classdef namespace decorated with html
1290 fun html_namespace(page: NitdocPage) do
1291 mmodule.html_full_namespace(page)
1292 page.append("::<span
>")
1293 mclass.html_link(page)
1294 page.append("</span
>")
1298 redef class MPropDef
1300 redef type OTHER: MPropDef
1301 redef fun <(other: OTHER): Bool do return self.mproperty.name < other.mproperty.name
1303 fun url: String do return "{mclassdef.mclass.url}#{anchor}"
1304 fun anchor
: String do return "PROP_{mclassdef.mclass.public_owner.name}_{c_name}"
1306 # Return a link (html a tag) to the nitdoc class page
1307 fun html_link
(page
: NitdocPage) do
1308 if page
.ctx
.mbuilder
.mpropdef2npropdef
.has_key
(self) then
1309 var nprop
= page
.ctx
.mbuilder
.mpropdef2npropdef
[self]
1310 page
.append
("<a href=\"{url}\
" title=\"{nprop.short_comment}\
">{mproperty.name}</a>")
1312 page
.append
("<a href=\"{url}\
">{mproperty.name}</a>")
1316 # Return a list item for the mpropdef
1317 fun html_list_item
(page
: NitdocPage) do
1319 page
.append
("<li class='intro'>")
1320 page
.append
("<span title='introduction'>I</span> ")
1322 page
.append
("<li class='redef'>")
1323 page
.append
("<span title='redefinition'>R</span> ")
1327 mclassdef
.mclass
.html_link
(page
)
1329 page
.append
("</li>")
1332 # Return a list item for the mpropdef
1333 fun html_sidebar_item
(page
: NitdocClass) do
1334 if is_intro
and mclassdef
.mclass
== page
.mclass
then
1335 page
.append
("<li class='intro'>")
1336 page
.append
("<span title='Introduced'>I</span>")
1337 else if is_intro
and mclassdef
.mclass
!= page
.mclass
then
1338 page
.append
("<li class='inherit'>")
1339 page
.append
("<span title='Inherited'>H</span>")
1341 page
.append
("<li class='redef'>")
1342 page
.append
("<span title='Redefined'>R</span>")
1345 page
.append
("</li>")
1348 fun html_full_desc
(page
: NitdocClass) is abstract
1349 fun html_info
(page
: NitdocClass) is abstract
1351 fun full_name
: String do
1352 return "{mclassdef.mclass.public_owner.name}::{mclassdef.mclass.name}::{mproperty.name}"
1355 fun html_inheritance
(page
: NitdocClass) do
1357 page
.append
("<p class='info'>")
1358 page
.ctx
.mainmodule
.linearize_mpropdefs
(mproperty
.mpropdefs
)
1359 var previous_defs
= new Array[MPropDef]
1360 var next_defs
= new Array[MPropDef]
1361 var self_passed
= false
1362 for def
in mproperty
.mpropdefs
do
1367 if not self_passed
then
1368 if def
.mclassdef
.mclass
.in_hierarchy
(page
.ctx
.mainmodule
) < page
.mclass
then continue
1369 if def
.is_intro
then continue
1370 previous_defs
.add
(def
)
1372 if page
.mclass
.in_hierarchy
(page
.ctx
.mainmodule
) < def
.mclassdef
.mclass
then continue
1376 page
.append
("defined by ")
1377 mclassdef
.mmodule
.html_full_namespace
(page
)
1378 if page
.ctx
.mbuilder
.mpropdef2npropdef
.has_key
(self) then
1379 page
.append
(" {page.show_source(page.ctx.mbuilder.mpropdef2npropdef[self].location)}")
1381 if not is_intro
then
1382 page
.append
(", introduced by ")
1383 mproperty
.intro
.mclassdef
.mclass
.html_link
(page
)
1384 if page
.ctx
.mbuilder
.mpropdef2npropdef
.has_key
(self) then
1385 page
.append
(" {page.show_source(page.ctx.mbuilder.mpropdef2npropdef[self].location)}")
1388 if not previous_defs
.is_empty
then
1389 page
.append
(", inherited from ")
1390 for i
in [0..previous_defs
.length
[ do
1391 var def
= previous_defs
[i
]
1392 def
.mclassdef
.mclass
.html_link
(page
)
1393 if page
.ctx
.mbuilder
.mpropdef2npropdef
.has_key
(def
) then
1394 page
.append
(" {page.show_source(page.ctx.mbuilder.mpropdef2npropdef[def].location)}")
1397 if i
< previous_defs
.length
- 1 then page
.append
(", ")
1400 if not next_defs
.is_empty
then
1401 page
.append
(", redefined by ")
1402 for i
in [0..next_defs
.length
[ do
1403 var def
= next_defs
[i
]
1404 def
.mclassdef
.mclass
.html_link
(page
)
1405 if page
.ctx
.mbuilder
.mpropdef2npropdef
.has_key
(def
) then
1406 page
.append
(" {page.show_source(page.ctx.mbuilder.mpropdef2npropdef[def].location)}")
1408 if i
< next_defs
.length
- 1 then page
.append
(", ")
1411 page
.append
(".</p>")
1415 redef class MMethodDef
1416 redef fun html_full_desc
(page
) do
1417 if not page
.ctx
.mbuilder
.mpropdef2npropdef
.has_key
(self) then return
1418 var nprop
= page
.ctx
.mbuilder
.mpropdef2npropdef
[self]
1419 var classes
= new Array[String]
1420 var is_redef
= mproperty
.intro_mclassdef
.mclass
!= page
.mclass
1422 if mproperty
.is_init
then classes
.add
("init")
1423 if is_redef
then classes
.add
("redef")
1424 classes
.add
(mproperty
.visibility
.to_s
)
1425 page
.append
("<article class='{classes.join(" ")}' id='{anchor}'>")
1426 if nprop
isa AAttrPropdef then
1427 if nprop
.mreadpropdef
== self then
1428 page
.append
("<h3 class='signature'>{mproperty.name}: ")
1429 nprop
.html_signature
(page
)
1430 page
.append
("</h3>")
1432 page
.append
("<h3 class='signature'>{mproperty.name}(value: ")
1433 nprop
.html_signature
(page
)
1434 page
.append
(")</h3>")
1437 var intro_nprop
= page
.ctx
.mbuilder
.mpropdef2npropdef
[mproperty
.intro
]
1438 page
.append
("<h3 class='signature'>{mproperty.name}")
1439 intro_nprop
.html_signature
(page
)
1440 page
.append
("</h3>")
1443 page
.append
("<div class='description'>")
1444 if nprop
.full_comment
== "" then
1445 page
.append
("<a class=\"newComment\
" title=\"32\
" tag=\"\
">New Comment</a>")
1447 page
.append
("<pre class=\"text_label\
" title=\"\
" name=\"\
" tag=\"\
" type=\"1\
">{nprop.full_comment}</pre>")
1449 page
.append
("<textarea id=\"fileContent\
" class=\"edit\
" cols=\"76\
" rows=\"1\
" style=\"display
: none
;\
"></textarea><a id=\"cancelBtn\
" style=\"display
: none
;\
">Cancel</a><a id=\"commitBtn\
" style=\"display
: none
;\
">Commit</a><pre id=\"preSave\
" class=\"text_label\
" type=\"2\
"></pre>")
1450 html_inheritance
(page
)
1451 page
.append
("</div>")
1452 page
.append
("</article>")
1455 redef fun html_info
(page
) do
1456 page
.append
("<div class='info'>")
1457 if mproperty
.visibility
< public_visibility
then page
.append
("{mproperty.visibility.to_s} ")
1458 if mproperty
.intro_mclassdef
.mclass
!= page
.mclass
then page
.append
("redef ")
1460 mproperty
.html_namespace
(page
)
1461 page
.append
("</div>")
1462 page
.append
("<div style=\"float
: right
;\
"><a id=\"lblDiffCommit\
"></a></div>")
1466 redef class MVirtualTypeDef
1467 redef fun html_full_desc
(page
) do
1468 var is_redef
= mproperty
.intro_mclassdef
.mclass
!= page
.mclass
1469 var classes
= new Array[String]
1471 if is_redef
then classes
.add
("redef")
1472 classes
.add
(mproperty
.visibility
.to_s
)
1473 page
.append
("<article class='{classes.join(" ")}' id='{anchor}'>")
1474 page
.append
("<h3 class='signature'>{mproperty.name}: ")
1475 bound
.html_link
(page
)
1476 page
.append
("</h3>")
1478 page
.append
("<div class='description'>")
1480 if page
.ctx
.mbuilder
.mpropdef2npropdef
.has_key
(self) and page
.ctx
.mbuilder
.mpropdef2npropdef
[self].full_comment
!= "" then
1481 var nprop
= page
.ctx
.mbuilder
.mpropdef2npropdef
[self]
1482 page
.append
("<pre class=\"text_label\
" title=\"\
" name=\"\
" tag=\"\
" type=\"1\
">{nprop.full_comment}</pre>")
1484 page
.append
("<a class=\"newComment\
" title=\"32\
" tag=\"\
">New Comment</a>")
1486 page
.append
("<textarea id=\"fileContent\
" class=\"edit\
" cols=\"76\
" rows=\"1\
" style=\"display
: none
;\
"></textarea><a id=\"cancelBtn\
" style=\"display
: none
;\
">Cancel</a><a id=\"commitBtn\
" style=\"display
: none
;\
">Commit</a><pre id=\"preSave\
" class=\"text_label\
" type=\"2\
"></pre>")
1487 html_inheritance
(page
)
1488 page
.append
("</div>")
1489 page
.append
("</article>")
1492 redef fun html_info
(page
) do
1493 page
.append
("<div class='info'>")
1494 if mproperty
.intro_mclassdef
.mclass
!= page
.mclass
then page
.append
("redef ")
1495 page
.append
("type ")
1496 mproperty
.html_namespace
(page
)
1497 page
.append
("</div>")
1498 page
.append
("<div style=\"float
: right
;\
"><a id=\"lblDiffCommit\
"></a></div>")
1507 private fun short_comment
: String do
1508 if n_moduledecl
!= null and n_moduledecl
.n_doc
!= null then
1509 return n_moduledecl
.n_doc
.n_comment
.first
.text
.substring_from
(2).replace
("\n", "").html_escape
1514 private fun full_comment
: String do
1515 var res
= new Buffer
1516 if n_moduledecl
!= null and n_moduledecl
.n_doc
!= null then
1517 for t
in n_moduledecl
.n_doc
.n_comment
do
1518 res
.append
(t
.text
.substring_from
(1).html_escape
)
1525 redef class AStdClassdef
1526 private fun short_comment
: String do
1527 if n_doc
!= null then return n_doc
.n_comment
.first
.text
.substring_from
(2).replace
("\n", "").html_escape
1531 private fun full_comment
: String do
1532 var res
= new Buffer
1533 if n_doc
!= null then
1534 for t
in n_doc
.n_comment
do res
.append
(t
.text
.substring_from
(1).html_escape
)
1540 redef class APropdef
1541 private fun short_comment
: String is abstract
1542 private fun full_comment
: String is abstract
1543 private fun html_signature
(page
: NitdocPage) is abstract
1546 redef class AAttrPropdef
1547 redef fun short_comment
do
1548 if n_doc
!= null then return n_doc
.n_comment
.first
.text
.substring_from
(2).replace
("\n", "").html_escape
1552 redef fun full_comment
: String do
1553 var res
= new Buffer
1554 if n_doc
!= null then
1555 for t
in n_doc
.n_comment
do res
.append
(t
.text
.substring_from
(1).html_escape
)
1560 redef fun html_signature
(page
) do
1561 if n_type
!= null then n_type
.mtype
.html_link
(page
)
1565 redef class AMethPropdef
1566 redef fun short_comment
do
1567 if n_doc
!= null then return n_doc
.n_comment
.first
.text
.substring_from
(2).replace
("\n", "").html_escape
1571 redef fun full_comment
do
1572 var res
= new Buffer
1573 if n_doc
!= null then
1574 for t
in n_doc
.n_comment
do res
.append
(t
.text
.substring_from
(1).html_escape
)
1579 redef fun html_signature
(page
) do
1580 if n_signature
!= null then n_signature
.html_link
(page
)
1584 redef class ATypePropdef
1585 redef fun short_comment
do
1586 if n_doc
!= null then return n_doc
.n_comment
.first
.text
.substring_from
(2).replace
("\n", "").html_escape
1590 redef fun full_comment
do
1591 var res
= new Buffer
1592 if n_doc
!= null then
1593 for t
in n_doc
.n_comment
do res
.append
(t
.text
.substring_from
(1).html_escape
)
1598 redef fun html_signature
(page
) do
1599 mpropdef
.bound
.html_link
(page
)
1603 redef class ASignature
1604 fun html_link
(page
: NitdocPage) do
1606 if not n_params
.is_empty
then
1608 for i
in [0..n_params
.length
[ do
1609 n_params
[i
].html_link
(page
)
1610 if i
< n_params
.length
- 1 then page
.append
(", ")
1614 if n_type
!= null then
1616 n_type
.mtype
.html_link
(page
)
1622 fun html_link
(page
: NitdocPage) do
1623 page
.append
(n_id
.text
)
1624 if n_type
!= null then
1626 n_type
.mtype
.html_link
(page
)
1627 if n_dotdotdot
!= null then page
.append
("...")
1632 var nitdoc
= new NitdocContext
1633 nitdoc
.generate_nitdoc