X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql.lisp;h=b856e6b37ad9779015fe66226ab74b615dbf8e75;hb=a4059115211d7e774a1552e26911dc1c2e725ce0;hp=60db70661d991dfa295bd7ca624ce0b98c532c66;hpb=f1ceffd73c7e181db3b2a739b7dbc64243cfca2d;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)