mes: Add string-null?.
* module/srfi/srfi-13.mes (string-null?): New function.
This commit is contained in:
parent
244d11a2af
commit
1601bc18cc
|
@ -1,7 +1,7 @@
|
||||||
;;; -*-scheme-*-
|
;;; -*-scheme-*-
|
||||||
|
|
||||||
;;; Mes --- Maxwell Equations of Software
|
;;; Mes --- Maxwell Equations of Software
|
||||||
;;; Copyright © 2016,2017 Jan Nieuwenhuizen <janneke@gnu.org>
|
;;; Copyright © 2016,2017,2018 Jan Nieuwenhuizen <janneke@gnu.org>
|
||||||
;;;
|
;;;
|
||||||
;;; This file is part of Mes.
|
;;; This file is part of Mes.
|
||||||
;;;
|
;;;
|
||||||
|
@ -90,3 +90,5 @@
|
||||||
|
|
||||||
(define substring/copy substring)
|
(define substring/copy substring)
|
||||||
(define substring/shared substring)
|
(define substring/shared substring)
|
||||||
|
|
||||||
|
(define string-null? (compose null? string->list))
|
||||||
|
|
Loading…
Reference in a new issue