5 lines
127 B
Racket
5 lines
127 B
Racket
#lang racket
|
|
|
|
(define empty-string "")
|
|
(define (string-null? s) (string=? "" s))
|
|
(define (string-not-null? s) (string<? "" s))
|