5.3 String Handling Functions
TBoS p.80-82, SD
Eliminate "Julius Caesar" in favour of "Mark Anthony".
(0-) (define rep
"" -> ""
(@s "Julius Caesar" Ss) -> (@s "Mark Anthony" (rep Ss))
(@s S Ss) -> (@s S (rep Ss)))
(fn rep)
(1-) (rep "Julius Caesar invaded Britain")
"Mark Anthony invaded Britain" |
|