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