47 lines
998 B
Plaintext
47 lines
998 B
Plaintext
;; Function To Be Tested: SECOND
|
|
;;
|
|
;; Source: Guy L Steele's CLTL
|
|
;; Section: 15.2 Lists
|
|
;; Page: 266
|
|
;;
|
|
;; Created By: Kelly Roach
|
|
;;
|
|
;; Creation Date: June 27,1986
|
|
;;
|
|
;; Last Update: June 27,1986
|
|
;;
|
|
;; Filed As: {ERIS}<LISPCORE>CML>TEST>15-2-SECOND.TEST
|
|
;;
|
|
;;
|
|
;; Syntax: (SECOND LIST)
|
|
;;
|
|
;; Function Description:
|
|
;; These functions are sometimes convenient for accessing particular
|
|
;; elements of a list. FIRST is the same as function CAR,
|
|
;; SECOND is the same as CADR, THIRD is the
|
|
;; same as CADDR, and so on.
|
|
;; Note that the ordinal numbering used here is one-origin,
|
|
;; as opposed to the zero-origin numbering used by function NTH:
|
|
;;
|
|
;; (FIFTH X) = (NTH 4 X)
|
|
;;
|
|
;;
|
|
;; macro SETF may be used with each of these functions to store
|
|
;; into the indicated position of a list.
|
|
;;
|
|
;; Argument(s): LIST - a list
|
|
;;
|
|
;; Returns: anything
|
|
;;
|
|
|
|
|
|
|
|
(DO-TEST "TEST SECOND0"
|
|
;;
|
|
;; The test cases were incorporated in "15-1-cadr-and-second.test"
|
|
;;
|
|
t
|
|
)
|
|
|
|
STOP
|