list conversion

list conversion

[Z. Huang]

Given a list ("first" "second" "third"). I'd to convert it to a 
a new list: 
   (("" . "first")
    ("" . "second")
    ("" . "third"))	

The following lisp code was intended for this purpose, but not working. It
looks that I missed some very basic stuff (I rarely code in lisp). Can
anyone point out what is wrong? Thanks in advance. 

(defun list-conversion (arg)
  (let ((l arg) (new-list ()))
    (while l
      (append new-list (list "" . (car l))))
      (setq l (cdr l))))

Re: list conversion

[Barry Margolin]

In article <yq0cznlz26za.fsf@blinky.bloomberg.com>,
Z. Huang <zghuang@bloomberg.net> wrote:
>(defun list-conversion (arg)
>  (let ((l arg) (new-list ()))
>    (while l
>      (append new-list (list "" . (car l))))
>      (setq l (cdr l))))

(defun list-conversion (list)
  (mapcar '(lambda (item) (cons "" item)) list))

Here's a version more like your original attempt:

(defun list-conversion (list)
  (let ((l arg) (new-list '()))
    (while l
      (setq new-list (cons (cons "" (car l))))
      (setq l (cdr l)))
    (nreverse new-list)))

Note that you need to re-assign new-list each time through the loop; append
creates a new list, but it doesn't change what new-list refers to.  Also,
you need to use cons, not list, to create something of the form (x . y).

-- 
Barry Margolin, barry.margolin@level3.com
Genuity Managed Services, a Level(3) Company, Woburn, MA
*** DON'T SEND TECHNICAL QUESTIONS DIRECTLY TO ME, post them to newsgroups.
Please DON'T copy followups to me -- I'll assume it wasn't posted to the group.

Re: list conversion

[Jesper Harder]

zghuang@bloomberg.net (Z. Huang) writes:

> Given a list ("first" "second" "third"). I'd to convert it to a 
> a new list: 
>    (("" . "first")
>     ("" . "second")
>     ("" . "third"))	
>
> The following lisp code was intended for this purpose, but not working. It
> looks that I missed some very basic stuff (I rarely code in lisp). Can
> anyone point out what is wrong? Thanks in advance. 

You could do it like this:

(defun list-conversion (list)
  (mapcar (lambda (x) (cons "" x)) list))

list conversion

[Zhengao. Huang]

Given a list ("first" "second" "third"), I'd like to  transfrom it into the
a new list: 
   (("" . "first")
    ("" . "second")
    ("" . "third"))	

The following lisp code was intended for this purpose, but not working. It
looks that I missed some very basic stuff (I rarely code in lisp). Can
anyone point out what is wrong? Thanks in advance. 

(defun list-conversion (arg)
  (let ((l arg) (new-list ()))
    (while l
      (append new-list (list "" . (car l))))
      (setq l (cdr l))))