--- a/Object.st Wed Jan 31 22:17:55 2018 +0100
+++ b/Object.st Wed Jan 31 23:55:07 2018 +0100
@@ -8127,12 +8127,12 @@
!
respondsTo:aSelector
- "return true if the receiver implements a method with selector equal
- to aSelector; i.e. if there is a method for aSelector in either the
+ "return true if the receiver responds to a message with aSelector;
+ i.e. if there is a method for aSelector in either the
receiver's class or one of its superclasses.
Notice, that this does not imply, that such a message can be sent without
- an error being raised. For example, an implementation could send
+ an error being raised; for example, an implementation could send
#shouldNotImplement or #subclassResponsibility."
"
@@ -8152,9 +8152,11 @@
^ self class canUnderstand:aSelector
- "'aString' respondsTo:#+"
- "'aString' respondsTo:#,"
- "'aString' respondsTo:#collect:"
+ "
+ 'aString' respondsTo:#+
+ 'aString' respondsTo:#,
+ 'aString' respondsTo:#collect:
+ "
!
respondsToArithmetic