annotate 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
rev   line source
d@88 1 (in-package #:amuse-geerdes)
d@88 2
d@88 3 ;; N.B. This file contains an access password for the database in
d@88 4 ;; plain text...
d@88 5
d@88 6 (defun get-amuse-connection ()
d@88 7 (clsql:connect '("vaughan-williams.doc.gold.ac.uk" "amuse" "LispMidi" "clsql")
d@88 8 :if-exists :old :database-type :mysql))
d@88 9
d@152 10