2 lines
152 B
Text
2 lines
152 B
Text
define: #p -> 'ingirumimusnocteetconsumimurigni'.
|
|
inform: 'sequence ' ; p ; ' is ' ; (p isPalindrome ifTrue: [''] ifFalse: ['not ']) ; 'a palindrome.'.
|