- Scheme Procedure: string-rindex s char_pred [start [end]]
     Search through the string S from right to left, returning the index
     of the last occurrence of a character which
------
It's actually 'first occurrence', according to the activity of function.
And it's nonsense for 'last occurrence' since string-index does the same
work.

Here's a simple patch for that.