string-replace
Name
string-replace -- Replace all occurances of a target substring in a string
Synopsis
(string-replace string target repl)
Description
Replaces all occurances of target in string with repl.
Author
Norman Walsh, <ndw@nwalsh.com>
Source Code
(define (string-replace string target repl)
  ;; Replace all occurances of a target substring in a string
  (let loop ((str string) (pos 0))
    (if (>= pos (string-length str))
	str
	(loop (repl-substring str target repl pos) 
	      (if (repl-substring? str target pos)
		  (+ (string-length repl) pos)
		  (+ 1 pos))))))