File: appendb

package info (click to toggle)
scheme9 2025.08.12-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 4,080 kB
  • sloc: lisp: 16,752; ansic: 11,869; sh: 806; makefile: 237; sed: 6
file content (13 lines) | stat: -rw-r--r-- 529 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
S9 LIB  (append! list ...)         ==>  unspecific
        (append! list ... object)  ==>  unspecific

APPEND! is like APPEND, but appends the LISTs destructively.
It destroys all but the last object passed to it and returns
an unspecific value. The append!ed list will be stored in the
first LIST, which should be bound to a symbol or it will not
be accessible after the operation. The first LIST may not be
'().

(let ((a (list 1 2 3)))
  (append! a (list 4 5 6) 'end)
  a)                             ==>  (1 2 3 4 5 6 . end)