core: Remove string_length.
* module/mes/scm.mes (string-length): New function.
This commit is contained in:
parent
be786c00a3
commit
9e6d862c5b
|
@ -188,6 +188,9 @@
|
|||
|
||||
|
||||
;;; Strings/srfi-13
|
||||
(define (string-length s)
|
||||
(length (string->list s)))
|
||||
|
||||
(define (string-ref s k)
|
||||
(list-ref (string->list s) k))
|
||||
|
||||
|
|
Loading…
Reference in New Issue