summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2008-03-21 19:16:27 +0100
committerMatthias Benkard <code@mail.matthias.benkard.de>2008-03-21 19:16:27 +0100
commit8d18782f12e2316ce4f66a7a25ebe8f70eb97522 (patch)
treef5d79e2d315ee5983531452bff190d7bae817b58
parent22b398bb4688f123a03994a19e8a089b5662dc03 (diff)
Improve DEFINE-OBJECTIVE-C-METHOD documentation.
darcs-hash:9972c12e79f49e8556b974500bc967fe8dabf21c
-rw-r--r--Lisp/method-definition.lisp15
1 files changed, 12 insertions, 3 deletions
diff --git a/Lisp/method-definition.lisp b/Lisp/method-definition.lisp
index 377247e..caedec9 100644
--- a/Lisp/method-definition.lisp
+++ b/Lisp/method-definition.lisp
@@ -74,9 +74,12 @@ undefined."))
(defmacro define-objective-c-method (name &rest args)
"Define a new Objective-C method.
+*args* ::= \\{*qualifier*\\}\\* *lambda-list* [[\\{*declaration*\\}\\* | *docstring*]] \\{*form*\\}\\*
+
+
## Arguments and Values:
-*name* --- a *symbol*.
+*name* --- a **symbol**.
*qualifier* --- a **method qualifier**.
@@ -84,7 +87,11 @@ undefined."))
*lambda-list* --- a **modified lambda list**.
-*body* --- an **implicit progn**.
+*docstring* --- a **string** (not evaluated).
+
+*declaration* --- a **local declaration** (not evaluated).
+
+*forms* --- an **implicit progn**.
## Description:
@@ -126,7 +133,9 @@ function __super__.
~&~A, respectively.~
~&Have a nice day.\" z a)
(+ y 20))
- => #<OBJECTIVE-C-METHOD OBJECTIVE-C-METHODS::|foo:bar:stuff:do:| ((EQL NS:MLK-MY-CLASS) NS:MLK-MY-CLASS T T T NS:NS-NUMBER) {CE8E531}>
+ => #<OBJECTIVE-C-METHOD
+ OBJECTIVE-C-METHODS::|foo:bar:stuff:do:|
+ ((EQL NS:MLK-MY-CLASS) NS:MLK-MY-CLASS T T T NS:NS-NUMBER) {CE8E531}>
(#/foo:bar:stuff:do: (#/new (find-objc-class 'ns::mlk-my-class))
100