From fe50e2bcf8469d40f44495cd3efa7b4b17aa4576 Mon Sep 17 00:00:00 2001 From: Jaidyn Ann <10477760+JadedCtrl@users.noreply.github.com> Date: Mon, 27 May 2024 23:33:44 -0500 Subject: [PATCH] Re-add erroneously removed function --- src/unix.lisp | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/src/unix.lisp b/src/unix.lisp index ce15e16..b44287d 100644 --- a/src/unix.lisp +++ b/src/unix.lisp @@ -283,6 +283,10 @@ ;; list → list (defun de-tail (list) - "Remove the last element from a list." + "Return a list sans its last element." (reverse (cdr (reverse list)))) +;; list → object +(defun tail (list) + "Return the last element of a list." + (car (last list)))