comparison man/lispref/strings.texi @ 70:131b0175ea99 r20-0b30

Import from CVS: tag r20-0b30
author cvs
date Mon, 13 Aug 2007 09:02:59 +0200
parents 05472e90ae02
children fe104dbd9147
comparison
equal deleted inserted replaced
69:804d1389bcd6 70:131b0175ea99
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 (let ((case-fold-search t)) 348 (char-to-string (+ 256 ?x))
349 (char-equal ?x ?X)) 349 @result{} "x"
350 (char-equal ?x (+ 256 ?x))
350 @result{} t 351 @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
372 @end example 352 @end example
373 @end defun 353 @end defun
374 354
375 @defun string= string1 string2 355 @defun string= string1 string2
376 This function returns @code{t} if the characters of the two strings 356 This function returns @code{t} if the characters of the two strings