|
From: | Jean Louis |
Subject: | Re: Passing a list to an interactive function |
Date: | Sat, 19 Dec 2020 06:25:43 +0300 |
User-agent: | Mutt/2.0 (3d08634) (2020-11-07) |
* pietru@caramail.com <pietru@caramail.com> [2020-12-19 05:06]: > Still very unsure what to do. I want to call "M-x thermoluminescence" > but pass six numbers to the function. > > (defun thermoluminesce (ta tb tlab tc td tlcd te tf tlef) > (interactive) ) > > Could I simply pass six numbers separated by spaces To make it less error prone, just do this: (defun thermoluminesce () (interactive) (let* ((list '()) ;; here you prepare empty list (list (dotimes (n 6 (reverse list)) (push (read-number (format "Enter number %s: " (1+ n))) list))) (ta (elt list 0)) (tb (elt list 1)) (tlab (elt list 2)) (tc (elt list 3)) (td (elt list 4)) (tlcd (elt list 5)) (te (elt list 6))) ;; continue here using variables ))
[Prev in Thread] | Current Thread | [Next in Thread] |