--- a/Annotation.st	Thu Oct 25 14:15:54 2012 +0200
+++ b/Annotation.st	Thu Oct 25 14:16:46 2012 +0200
@@ -53,17 +53,6 @@
 	privateIn:Annotation
 !
 
-Annotation comment:'I represent an occurrence of a pragma in a compiled method.  A pragma is a literal message pattern that occurs between angle brackets at the start of a method after any temporaries.  A common example is the primitive pragma:
-	<primitive: 123 errorCode: ''errorCode''>
-but one can add one''s own and use them as metadata attached to a method.  Because pragmas are messages one can browsse senders and implementors and perform them.  One can query a method for its pragmas by sendng it the pragmas message, which answers an Array of instances of me, one for each pragma in the method.
-I can provide information about the defining class, method, its selector, as well as the information about the pragma keyword and its arguments. See the two ''accessing'' protocols for details. ''accessing-method'' provides information about the method the pragma is found in, while ''accessing-pragma'' is about the pragma itself.
-Instances are retrieved using one of the pragma search methods of the ''finding'' protocol on the class side.
-To browse all methods with pragmas in the system evaluate
-	SystemNavigation default browseAllSelect: [:m| m pragmas notEmpty]
-and to browse all nonprimitive methods with pragmas evaluate
-	SystemNavigation default browseAllSelect: [:m| m primitive isZero and: [m pragmas notEmpty]]'
-!
-
 !Annotation class methodsFor:'documentation'!
 
 copyright
@@ -92,6 +81,29 @@
 FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
 OTHER DEALINGS IN THE SOFTWARE.
 "
+!
+
+documentation
+"
+    I represent an occurrence of a pragma in a compiled method.  
+    A pragma is a literal message pattern that occurs between angle brackets at the start of a method after any temporaries.  
+    A common example is the primitive pragma:
+        <primitive: 123 errorCode: 'errorCode'>
+    but one can add one's own and use them as metadata attached to a method.  
+    Because pragmas are messages one can browsse senders and implementors and perform them.  
+    One can query a method for its pragmas by sendng it the pragmas message, which answers an Array of instances of me, 
+    one for each pragma in the method.
+    I can provide information about the defining class, method, its selector, 
+    as well as the information about the pragma keyword and its arguments. See the two 'accessing' protocols for details. 
+    'accessing-method' provides information about the method the pragma is found in, 
+    while 'accessing-pragma' is about the pragma itself.
+    Instances are retrieved using one of the pragma search methods of the 'finding' protocol on the class side.
+    To browse all methods with pragmas in the system evaluate
+        SystemNavigation default browseAllSelect: [:m| m pragmas notEmpty] 
+        in ST/X: Smalltalk browseAllSelect: [:m| m pragmas notEmpty]
+    and to browse all nonprimitive methods with pragmas evaluate
+        SystemNavigation default browseAllSelect: [:m| m primitive isZero and: [m pragmas notEmpty]]
+"
 ! !
 
 !Annotation class methodsFor:'initialization'!
@@ -673,11 +685,11 @@
 !Annotation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Annotation.st,v 1.10 2012-07-26 21:26:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Annotation.st,v 1.11 2012-10-25 12:16:46 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Annotation.st,v 1.10 2012-07-26 21:26:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Annotation.st,v 1.11 2012-10-25 12:16:46 cg Exp $'
 !
 
 version_SVN