Subject: Re: What would you do with 10 Man Years?
From: rpw3@rpw3.org (Rob Warnock)
Date: Sat, 27 Mar 2004 02:59:10 -0600
Newsgroups: comp.lang.lisp
Message-ID: <vOKcncZKDvrD3_jd3czS-g@speakeasy.net>
adam connor  <adamNoDotHereconnor@mail.com> wrote:
+---------------
| To get folks where I work interested in Lisp, it needs... some
| immediate payoff for conventional... programming. The kind of thing
| they would notice would be really slick access to databases.
| I realize that may not be what most current Lisp developers need.
+---------------

Hunh?!? Who says?

    > (with-pg-connection (conn "rpw3" "rpw3")	; Using Marsden's "pg.lisp".
        (let ((result (pg-exec conn "SELECT * FROM toy WHERE c1 LIKE 'x%'")))
	  (cons (mapcar #'car (pg-result result :attributes))
	        (pg-result result :tuples))))

    (("c1" "c2" "c3" "upd")
     ("xmas" "book" "My Favorite Christmas" 2)
     ("xmas" "video" "The Grinch who Stole Christmas" 4)
     ("xmas" "video" "Home Alone" 6))
    > 

See <URL:http://www.cliki.net/Database> for a whole bunch more...


-Rob

-----
Rob Warnock			<rpw3@rpw3.org>
627 26th Avenue			<URL:http://rpw3.org/>
San Mateo, CA 94403		(650)572-2607