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>?]>> |