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