Mercurial > hg > xemacs-beta
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 |