检查参数是否不是一个列表，然后显示消息，如果它不是一个列表

Question

我有一个名为“evens”的参数，它所做的只是得到列表中的偶数元素，并且它对列表工作正常。但是，当传入一个原子像'a，它崩溃并说“对象a，作为第一个参数传递给cdr，是不正确的类型。”现在我不希望此函数处理原子唯一列表。

我已经尝试过，但它似乎是错误的，这是有点即时尝试做，但仍需要一些指导。

(IF (NOT(LIST? lis)) "Enter valid list") => "Enter valid list") 

那么我怎样才能检查的东西是不是列表被传递，而且如果它是如何显示某种短信的，如果它不是一个列表？

Answer 1

你接近，试试这个：

(if (not (list? lis)) 
    (display "Enter a valid list") 
    ; else do the normal stuff here 
    ) 

你应该叫你打算实现实际功能前做上述验证。