X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=data-structures.lisp;h=d76a5c23697e18379dc2e36df819554ca20f5f33;hb=ab8b9c83accebd43e817e1d5cee6a8f7fb9a7eab;hp=2db16ae8a8738e715c614b5a761bebe21c0e5b89;hpb=6c10979737dc10b0c510b1edfe070346bcac3ff5;p=umlisp.git diff --git a/data-structures.lisp b/data-structures.lisp index 2db16ae..d76a5c2 100644 --- a/data-structures.lisp +++ b/data-structures.lisp @@ -8,7 +8,7 @@ ;;;; Created: Apr 2000 ;;;; ;;;; This file, part of UMLisp, is -;;;; Copyright (c) 2000-2010 by Kevin M. Rosenberg, M.D. +;;;; Copyright (c) 2000-2011 by Kevin M. Rosenberg, M.D. ;;;; ;;;; UMLisp users are granted the rights to distribute and use this software ;;;; as governed by the terms of the GNU General Public License. @@ -18,10 +18,10 @@ ;;; Paths for files -(defparameter *release* "2010AA") +(defparameter *release* "2014AB") (defparameter *umls-path* - (make-pathname :directory (list :absolute "srv" "umls" *release*)) + (make-pathname :directory (list :absolute "srv" "umls" *release* *release*)) "Path for base of UMLS data files") (defparameter *meta-dir* @@ -111,5 +111,3 @@ (defmethod print-object ((obj ucol) s) (print-unreadable-object (obj s :type t) (format s "~A" (col obj)))) - -