(case-fold-up-charlist charlist)
Shifts all of the characters in charlist to uppercase with case-fold-up-char.
Norman Walsh, <ndw@nwalsh.com>
(define (case-fold-up-charlist charlist) ;; Return the list of characters, shifted to uppercase (if (null? charlist) '() (cons (case-fold-up-char (car charlist)) (case-fold-up-charlist (cdr charlist)))))