Advertisement
Guest User

Untitled

a guest
Apr 26th, 2017
61
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.24 KB | None | 0 0
  1. (defun te (n)
  2. (interactive "p")
  3. (elt ["a" "b" "D"] n))
  4.  
  5. (defun te2 (n)
  6. (interactive "p")
  7. (message (elt ["a" "b" "D"] n)))
  8.  
  9. (te 1) ;; no output if using prefix argument
  10. (te2 1) ;; value of eval is not "b" but b if useing prefix argument
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement