compiler.tree.escape-analysis.*: new doc files

basis/compiler/tree/escape-analysis/check/check-docs.factor

@@ -0,0 +1,11 @@
+USING: help.markup help.syntax kernel sequences ;
+IN: compiler.tree.escape-analysis.check
+
+HELP: run-escape-analysis?
+{ $values { "nodes" sequence } { "?" boolean } }
+{ $description "Whether to run escape analysis on the nodes or not." } ;
+
+ARTICLE: "compiler.tree.escape-analysis.check"
+"Skipping escape analysis pass for code which does not allocate" ;
+
+ABOUT: "compiler.tree.escape-analysis.check"

basis/compiler/tree/escape-analysis/escape-analysis-docs.factor

@@ -0,0 +1,7 @@
+USING: help.markup help.syntax ;
+IN: compiler.tree.escape-analysis
+
+ARTICLE: "compiler.tree.escape-analysis" "Escape analysis for tuple unboxing"
+"This pass must run after propagation" ;
+
+ABOUT: "compiler.tree.escape-analysis"

basis/compiler/tree/escape-analysis/escape-analysis.factor

@@ -9,9 +9,7 @@ USE: compiler.tree.escape-analysis.simple
 
 IN: compiler.tree.escape-analysis
 
-! This pass must run after propagation
-
-: escape-analysis ( node -- node )
+: escape-analysis ( nodes -- nodes )
     init-escaping-values
     H{ } clone allocations set
     H{ } clone slot-accesses set

basis/compiler/tree/escape-analysis/nodes/nodes-docs.factor

@@ -0,0 +1,11 @@
+USING: compiler.tree help.markup help.syntax ;
+IN: compiler.tree.escape-analysis.nodes
+
+HELP: escape-analysis*
+{ $values { "node" node } }
+{ $description "Performs escape analysis for one SSA node." } ;
+
+ARTICLE: "compiler.tree.escape-analysis.nodes"
+"Per-node dispatch for escape analysis" ;
+
+ABOUT: "compiler.tree.escape-analysis.nodes"