equal
deleted
inserted
replaced
2134 RETURN ( false ); |
2134 RETURN ( false ); |
2135 %}. |
2135 %}. |
2136 ^ self isLetter or:[self isDigit] |
2136 ^ self isLetter or:[self isDigit] |
2137 ! |
2137 ! |
2138 |
2138 |
|
2139 isLetterOrDigitOrUnderline |
|
2140 "return true, if I am a letter or a digit or $_" |
|
2141 |
|
2142 ^ self == $_ or:[ self isLetterOrDigit ] |
|
2143 |
|
2144 "Created: / 24-05-2019 / 12:56:23 / Claus Gittinger" |
|
2145 ! |
|
2146 |
2139 isLetterOrUnderline |
2147 isLetterOrUnderline |
2140 "return true, if I am a letter or $_" |
2148 "return true, if I am a letter or $_" |
2141 |
2149 |
2142 ^ self == $_ or:[ self isLetter ] |
2150 ^ self == $_ or:[ self isLetter ] |
2143 ! |
2151 ! |