view implementations/geerdes/connect.lisp @ 130:b849c4fc4c26

implementation/midi and /geerdes: add midi-object and geerdes-object

darcs-hash:20070730164010-f76cc-baca3a289ca6c022c0085177d539e8c5c6fbea4e.gz

(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))

;; might as well connect while I'm at it 
(get-amuse-connection)