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
|