Changeset 7402
- Timestamp:
- Oct 12, 2007, 9:38:44 AM (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/working-0710/ccl/level-1/l1-aprims.lisp
r7369 r7402 184 184 (defun nthcdr (index list) 185 185 "Performs the cdr function n times on a list." 186 (setq list (require-type list 'list)) 186 187 (if (and (typep index 'fixnum) 187 188 (>= (the fixnum index) 0))
Note: See TracChangeset
for help on using the changeset viewer.