mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-20 11:40:18 +02:00
(Alist Example): Changed "Bismarck" to "Pierre". Thanks to Ron
Peterson!
This commit is contained in:
parent
226297eb51
commit
5ad5a7b6ca
1 changed files with 4 additions and 4 deletions
|
@ -2078,9 +2078,9 @@ Here is a longer example of how alists may be used in practice.
|
|||
|
||||
;; We left out South Dakota.
|
||||
(set! capitals
|
||||
(assoc-set! capitals "South Dakota" "Bismarck"))
|
||||
(assoc-set! capitals "South Dakota" "Pierre"))
|
||||
capitals
|
||||
@result{} (("South Dakota" . "Bismarck")
|
||||
@result{} (("South Dakota" . "Pierre")
|
||||
("New York" . "Albany")
|
||||
("Oregon" . "Salem")
|
||||
("Florida" . "Miami"))
|
||||
|
@ -2089,7 +2089,7 @@ capitals
|
|||
(set! capitals
|
||||
(assoc-set! capitals "Florida" "Tallahassee"))
|
||||
capitals
|
||||
@result{} (("South Dakota" . "Bismarck")
|
||||
@result{} (("South Dakota" . "Pierre")
|
||||
("New York" . "Albany")
|
||||
("Oregon" . "Salem")
|
||||
("Florida" . "Tallahassee"))
|
||||
|
@ -2098,7 +2098,7 @@ capitals
|
|||
(set! capitals
|
||||
(assoc-remove! capitals "Oregon"))
|
||||
capitals
|
||||
@result{} (("South Dakota" . "Bismarck")
|
||||
@result{} (("South Dakota" . "Pierre")
|
||||
("New York" . "Albany")
|
||||
("Florida" . "Tallahassee"))
|
||||
@end lisp
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue