[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

RE: a little help with basic elisp

From: Drew Adams
Subject: RE: a little help with basic elisp
Date: Thu, 19 Feb 2015 23:52:06 -0800 (PST)

> (defun gas-push-sr-pair ()
>   "I want to add a apair consisting of a the string I prompted for at the
> mini-buffer, and the string yo"
>   (interactive)
>   (let (to-string)
>       (setq to-string (read-from-minibuffer (concat (thing-at-point
>                                                      'symbol)
>                                                     " to: ")))
>       (add-to-list 'gas-sr-stack  '(to-string . "yo"))))
> When I run this, and do (insert (pop gas-sr-stack)), I get the
> following:
>   gas-pop-word: Wrong type argument: char-or-string-p, (to-string . "yo")
> What's tripping me up is it seems that the values stored in the char-or-
> string-p are to-string and "yo".
> I wanted to store the value which is currently in to-string, and "yo".
> Can someone please explain to me what I am doing wrong?  I'd like to
> understand the language better, and of course solve my concrete problem.

(defvar gas-sr-stack () "...")

(defun gas-push-sr-pair ()
  (let ((to-string (read-from-minibuffer (concat (thing-at-point 'symbol) " to: 
    (add-to-list 'gas-sr-stack  `(,to-string . "yo"))))

And you want this instead of just (pop (car gas-sr-stack)):

(let ((gas-sr  (pop gas-sr-stack)))
  (insert (car gas-sr) (cdr gas-sr)))

1. Just bind `to-string' directly to the value you want it to have.
   (Not an error; it's just simpler.)
2. You need to evaluate `to-string' for the cons you want to add to the list.
   Instead, you were inserting the constant cons (to-string . "yo") each time.
   So use a comma inside a backtick - or use (cons to-string "yo").
3. The main problem was that you were trying to insert the cons, not its car
   and cdr (which are strings).  Use `C-h f insert' to see info about `insert'.

reply via email to

[Prev in Thread] Current Thread [Next in Thread]