[Gauche-devel-jp] Re: 出場者募集 Lightweight Langauge Weekend 2004.08.07-08

Back to archive index

えんどう yasuy****@javao*****
2004年 6月 16日 (水) 23:11:07 JST


 えんどうです。

>R5RSではこういう使用法は禁止されています (処理系依存)。
>今のgaucheで「たまたま」動いてしまうに過ぎません。

了解です。書き直してみました。

#!/usr/locac/bin/gosh
(use dbi)
(use gauche.collection)
(define (main arg)
  (let*
      ((driver (dbi-make-driver "mysql"))
       (connection (dbi-make-connection driver "yasuyuki" "" "db=test"))
       (query (dbi-make-query connection))
       (result (dbi-execute-query query "select * from test;"))
       (rows
        (map
         (lambda (row) (list (dbi-get-value row 0) (dbi-get-value row  1)))
         result)))
    (display rows)(newline)))


-- 
ENDO Yasuyuki <yasuy****@javao*****>
http://www.javaopen.org/~yasuyuki/ (Personal/Japanese Only)
http://www.javaopen.org/jfriends/ (Japanese Only)




Gauche-devel-jp メーリングリストの案内
Back to archive index