4 lines
141 B
Smalltalk
4 lines
141 B
Smalltalk
isPalindrome := [:aString |
|
|
str := (aString select: [:chr| chr isAlphaNumeric]) collect: [:chr | chr asLowercase].
|
|
str = str reversed.
|
|
].
|