Anonymous user
Rot-13: Difference between revisions
m
Syntax update
(Improved D version) |
m (Syntax update) |
||
Line 1,596:
ch@(String Character traits) rot13
[| value
upper ::= ch isUppercase.
value :=
(value >= 97) /\
ifTrue: [
ifFalse: [(value > 109) /\
ifTrue: [
upper
ifTrue: [(value as: String Character) toUppercase]
Line 1,620:
<lang slate>ch@(String Character traits) rot13
[| value
upper ::= ch isUppercase.
value :=
(value >= 97) /\
ifTrue: [
ifFalse: [(value > 109) /\
ifTrue: [
upper
ifTrue: [(value as: String Character) toUppercase]
Line 1,633:
s@(String traits) rot13
[
result ::= s newSameSize.
s doWithIndex: [| :each :index | result at: index put: each rot13].
result
].
Line 1,642 ⟶ 1,641:
slate[37]> 'abc123' rot13.
'nop123'</lang>
=={{header|Smalltalk}}==
{{Lines_too_long}}
| |||