Use recursion to print all elements from a list in emacs lisp

print-list.el

(defun ns/print-list (list)
  (when list
    (print (car list))
    (print-list (cdr list))))

(setq coffe-types '(cortado macchiato dopio))

(ns/print-list coffe-types) 

;; Output
;; cortado
;; macchiato
;; dopio