|
SketchyLISP Reference |
Copyright (C) 2007 Nils M Holm |
| <<[char-ci<=?] | [Index] | [char-ci>?]>> |
Conformance: R5RS Scheme
Purpose: Case-insensitively test whether all chars in a sequence are equal.
Arguments:
X - char
Y... - chars
Model:
(define char-ci=?
(predicate-iterator
(lambda (x y)
(= (char->integer (char-downcase x))
(char->integer (char-downcase y))))))
Implementation:
; This function is a primitive function.
Example:
(char-ci=? #\C #\c #\C) => #t
See also:
char=?,
char-ci<?,
char-ci>?,
char-ci<=?,
char-ci>=?,
string=?,
equal?.
| <<[char-ci<=?] | [Index] | [char-ci>?]>> |