converted isKindOf: to a dual method

This commit is contained in:
hyunghwan.chung 2017-09-30 04:53:00 +00:00
parent cb2b93d01c
commit c412097f6f

View File

@ -236,18 +236,12 @@ extend Apex
^aClass == Class
}
method(#class) isKindOf: aClass
{
<primitive: #_is_kind_of>
^(self isMemberOf: aClass) or: [self class inheritsFrom: aClass].
}
method isMemberOf: aClass
{
^self class == aClass
}
method isKindOf: aClass
method(#dual) isKindOf: aClass
{
<primitive: #_is_kind_of>
^(self isMemberOf: aClass) or: [self class inheritsFrom: aClass].