Mercurial > hg > xemacs-beta
comparison man/lispref/strings.texi @ 110:fe104dbd9147 r20-1b7
Import from CVS: tag r20-1b7
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:19:45 +0200 |
parents | 131b0175ea99 |
children | 7df0dd720c89 |
comparison
equal
deleted
inserted
replaced
109:e183fc049578 | 110:fe104dbd9147 |
---|---|
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 |