X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql.lisp;h=b856e6b37ad9779015fe66226ab74b615dbf8e75;hb=5a9fb4f424d96be30695f1fc78486695907dc9a7;hp=60db70661d991dfa295bd7ca624ce0b98c532c66;hpb=baef3e3eba503d04fe6d19ac3087bf9d3dbc37b9;p=umlisp.git diff --git a/sql.lisp b/sql.lisp index 60db706..b856e6b 100644 --- a/sql.lisp +++ b/sql.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Apr 2000 ;;;; -;;;; $Id: sql.lisp,v 1.9 2002/12/09 14:11:09 kevin Exp $ +;;;; $Id: sql.lisp,v 1.10 2002/12/23 21:59:44 kevin Exp $ ;;;; ;;;; This file, part of UMLisp, is ;;;; Copyright (c) 2000-2002 by Kevin M. Rosenberg, M.D. @@ -20,7 +20,7 @@ (declaim (optimize (speed 3) (safety 1) (compilation-speed 0) (debug 3))) -(defvar *umls-sql-db* "KUMLS2002AD") +(defvar *umls-sql-db* "KUMLS2003AA") (defun umls-sql-db () *umls-sql-db*) (defun umls-sql-db! (dbname)