comparison man/lispref/strings.texi @ 54:05472e90ae02 r19-16-pre2

Import from CVS: tag r19-16-pre2
author cvs
date Mon, 13 Aug 2007 08:57:55 +0200
parents 376386a54a3c
children 131b0175ea99
comparison
equal deleted inserted replaced
53:875393c1a535 54:05472e90ae02
343 in case if @code{case-fold-search} is non-@code{nil}. 343 in case if @code{case-fold-search} is non-@code{nil}.
344 344
345 @example 345 @example
346 (char-equal ?x ?x) 346 (char-equal ?x ?x)
347 @result{} t 347 @result{} t
348 (char-to-string (+ 256 ?x)) 348 (let ((case-fold-search t))
349 @result{} "x" 349 (char-equal ?x ?X))
350 (char-equal ?x (+ 256 ?x))
351 @result{} t 350 @result{} t
351 (let ((case-fold-search nil))
352 (char-equal ?x ?X))
353 @result{} nil
354 @end example
355 @end defun
356
357 @defun char= character1 character2
358 This function returns @code{t} if the arguments represent the same
359 character, @code{nil} otherwise. Case is significant.
360
361 @example
362 (char= ?x ?x)
363 @result{} t
364 (char= ?x ?X)
365 @result{} nil
366 (let ((case-fold-search t))
367 (char-equal ?x ?X))
368 @result{} nil
369 (let ((case-fold-search nil))
370 (char-equal ?x ?X))
371 @result{} nil
352 @end example 372 @end example
353 @end defun 373 @end defun
354 374
355 @defun string= string1 string2 375 @defun string= string1 string2
356 This function returns @code{t} if the characters of the two strings 376 This function returns @code{t} if the characters of the two strings