Mercurial > hg > amuse
view implementations/geerdes/connect.lisp @ 171:98443d36ac6a
Fixed sequence:make-sequence-like :around method
The :around method clobbered the %data slot, as Christophe put it.
darcs-hash:20080123180914-990ec-629ecf5d60363512e6831800bb1e61dbcb8f94f5.gz
| author | Jamie Forth <j.forth@gold.ac.uk> |
|---|---|
| date | Wed, 23 Jan 2008 18:09:14 +0000 |
| parents | 3b588c566734 |
| children | 4d06910b6f0f |
line wrap: on
line source
(in-package #:amuse-geerdes) ;; N.B. This file contains an access password for the database in ;; plain text... (defun get-amuse-connection () (clsql:connect '("vaughan-williams.doc.gold.ac.uk" "amuse" "LispMidi" "clsql") :if-exists :old :database-type :mysql))