method-chains docs

diff --git a/extra/method-chains/method-chains-docs.factor b/extra/method-chains/method-chains-docs.factor
new file mode 100644 (file)
index 0000000..3e8e0e9
--- /dev/null
+++ b/extra/method-chains/method-chains-docs.factor
@@ -0,0 +1,22 @@
+! (c)2009 Joe Groff bsd license
+USING: help.markup help.syntax ;
+IN: method-chains
+
+HELP: AFTER:
+{ $syntax "AFTER: class generic
+    implementation ;" }
+{ $description "Defines a method on " { $snippet "generic" } " for " { $snippet "class" } " which executes the new " { $snippet "implementation" } " code after invoking the parent class method on " { $snippet "generic" } "." } ;
+
+HELP: BEFORE:
+{ $syntax "BEFORE: class generic
+    implementation ;" }
+{ $description "Defines a method on " { $snippet "generic" } " for " { $snippet "class" } " which executes the new " { $snippet "implementation" } " code, then invokes the parent class method on " { $snippet "generic" } "." } ;
+
+ARTICLE: "method-chains" "Method chaining syntax"
+"The " { $vocab-link "method-chains" } " vocabulary provides syntax for extending method implementations in class hierarchies." 
+{ $subsections
+    POSTPONE: AFTER:
+    POSTPONE: BEFORE:
+} ;
+
+ABOUT: "method-chains"

diff --git a/extra/method-chains/summary.txt b/extra/method-chains/summary.txt
new file mode 100644 (file)
index 0000000..dc80f82
--- /dev/null
+++ b/extra/method-chains/summary.txt
@@ -0,0 +1 @@
+BEFORE: and AFTER: syntax for extending methods in class hierarchies