removing string-split-right

lib/srfi/130.scm

@@ -267,9 +267,6 @@
        (else
         (lp end i (cons (substring-cursor str sc end) res)))))))
 
-(define (string-split-right str delim . o)
-  #f)
-
 (define (string-filter pred str . o)
   (let ((out (open-output-string)))
     (apply string-fold (lambda (ch acc) (if (pred ch) (write-char ch out))) #f str o)

lib/srfi/130.sld

@@ -37,7 +37,7 @@
    string-fold         string-fold-right
    string-for-each-cursor
    string-replicate    string-count
-   string-replace      string-split   string-split-right
+   string-replace      string-split
    string-filter       string-remove)
   (import (scheme base)
           (scheme char) (scheme write)