a simple lisp function

Question

I wrote a test function to test my understanding of "return-from" in Lisp

(defun testp (lst)
  (mapc #'(lambda (x y)
            (if (null lst)
                (return-from testp t)))
        lst
        (cdr lst)))

I think the test (testp 'nil) should return T but it returns NIL. Could you please help my understanding of why it returns NIL?

Many thanks.

You may get more help with your future questions if you accept some answers to your previous ones. — Sonny Boy
– Sonny Boy, Commented Dec 3, 2009 at 16:53

Rainer Joswig · Accepted Answer · 2009-12-03 16:28:14Z

3

You call MAPC over two empty lists.

How should the LAMBDA function ever be used if the lists don't have any elements to map over?

Btw., you can write 'list' instead of 'lst'.

(defun testp (list)
  (mapc #'(lambda (x y)
            (if (null list)
                (return-from testp t)))
        list
        (cdr list)))

answered Dec 3, 2009 at 16:28

Rainer Joswig

140k11 gold badges230 silver badges357 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

mqp · Accepted Answer · 2009-12-03 16:29:28Z

3

Normally, mapc would apply your lambda to each element of a list. My guess (I don't use Common Lisp) is that since mapc has no elements in the list to operate on, your lambda never gets called at all, and as a result the return value of your function is the return value of mapc, which (since it mapped over nothing) is nil.

answered Dec 3, 2009 at 16:29

mqp

72.3k15 gold badges99 silver badges124 bronze badges

Collectives™ on Stack Overflow

a simple lisp function

2 Answers 2

Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related