gpt4 book ai didi

stack - 如何用 LISP 语言实现 Stack

转载 作者:太空宇宙 更新时间:2023-11-03 19:03:29 28 4
gpt4 key购买 nike

<分区>

我仍在学习 Lisp 语言,我需要了解如何使用 Lisp 实现堆栈(需要 push-pop-peek 函数。)。此外,我在寻求帮助时发现了这段代码。但我不确定它是否正常工作。

(defstruct stack
elements)

(defun stack-push (element stack)
(push element (stack-elements stack)))

(defun stack-pop (stack)(deftype Stack [elements])

(defun stack-empty (stack)
(endp (stack-elements stack)))

(defun stack-top (stack)
(first (stack-elements stack)))

(defun stack-peek (stack)
(stack-top stack))

28 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com