Mercurial > hg > xemacs-beta

comparison man/lispref/symbols.texi @ 444:576fb035e263 r21-2-37

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-37
author cvs
date Mon, 13 Aug 2007 11:36:19 +0200
parents abe6d1db359e
children 1ccc32a20af4
comparison
equal deleted inserted replaced
443:a8296e22da4e 444:576fb035e263
1 @c -*-texinfo-*- 1 @c -*-texinfo-*-
2 @c This is part of the XEmacs Lisp Reference Manual. 2 @c This is part of the XEmacs Lisp Reference Manual.
3 @c Copyright (C) 1990, 1991, 1992, 1993, 1994 Free Software Foundation, Inc. 3 @c Copyright (C) 1990, 1991, 1992, 1993, 1994 Free Software Foundation, Inc.
4 @c See the file lispref.texi for copying conditions. 4 @c See the file lispref.texi for copying conditions.
5 @setfilename ../../info/symbols.info 5 @setfilename ../../info/symbols.info
6 @node Symbols, Evaluation, Sequences Arrays Vectors, Top 6 @node Symbols, Evaluation, Sequences Arrays Vectors, Top
7 @chapter Symbols 7 @chapter Symbols
8 @cindex symbol 8 @cindex symbol
530 (getf '(foo 4) 'foo) 530 (getf '(foo 4) 'foo)
531 @result{} 4 531 @result{} 4
532 @end example 532 @end example
533 @end defun 533 @end defun
534 534
535 @defun putf plist property value 535 @defmac putf plist property value
536 This stores @var{value} as the value of the @var{property} property in 536 This stores @var{value} as the value of the @var{property} property in
537 the property list @var{plist}. It may modify @var{plist} destructively, 537 the property list @var{plist}. It may modify @var{plist} destructively,
538 or it may construct a new list structure without altering the old. The 538 or it may construct a new list structure without altering the old. The
539 function returns the modified property list, so you can store that back 539 function returns the modified property list, so you can store that back
540 in the place where you got @var{plist}. For example, 540 in the place where you got @var{plist}. For example,
545 (setq my-plist (putf my-plist 'foo 69)) 545 (setq my-plist (putf my-plist 'foo 69))
546 @result{} (bar t foo 69) 546 @result{} (bar t foo 69)
547 (setq my-plist (putf my-plist 'quux '(a))) 547 (setq my-plist (putf my-plist 'quux '(a)))
548 @result{} (quux (a) bar t foo 5) 548 @result{} (quux (a) bar t foo 5)
549 @end example 549 @end example
550 @end defun 550 @end defmac
551 551
552 @defun plists-eq a b 552 @defun plists-eq a b
553 This function returns non-@code{nil} if property lists @var{a} and @var{b} 553 This function returns non-@code{nil} if property lists @var{a} and @var{b}
554 are @code{eq}. This means that the property lists have the same values 554 are @code{eq}. This means that the property lists have the same values
555 for all the same properties, where comparison between values is done using 555 for all the same properties, where comparison between values is done using