X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=parse-2002.lisp;h=aa9c46a6c423dc0bfb00c7f5eea4b4601484f0b7;hb=aeade16272b79115d3f307906c7a3e9597137e97;hp=ae126a0e10ff058e8520f6c3729d7ef6ab6c2e7e;hpb=617605f4a0399de6dabe6b4124f31798b901bfe1;p=umlisp.git diff --git a/parse-2002.lisp b/parse-2002.lisp index ae126a0..aa9c46a 100644 --- a/parse-2002.lisp +++ b/parse-2002.lisp @@ -2,16 +2,16 @@ ;;;; ************************************************************************* ;;;; FILE IDENTIFICATION ;;;; -;;;; Name: parse-2002.lisp -;;;; Purpose: Parsing and SQL insertion routines for UMLisp which may -;;;; change from year to year -;;;; Author: Kevin M. Rosenberg -;;;; Date Started: Apr 2000 +;;;; Name: parse-2002.lisp +;;;; Purpose: Parsing and SQL insertion routines for UMLisp which may +;;;; change from year to year +;;;; Author: Kevin M. Rosenberg +;;;; Created: Apr 2000 ;;;; ;;;; $Id$ ;;;; ;;;; This file, part of UMLisp, is -;;;; Copyright (c) 2000-2003 by Kevin M. Rosenberg, M.D. +;;;; Copyright (c) 2000-2004 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. @@ -19,9 +19,6 @@ (in-package #:umlisp) -(eval-when (:compile-toplevel) - (declaim (optimize (speed 3) (safety 1) (compilation-speed 0) (debug 3)))) - ;;; Pre-read data for custom fields into hash tables (defvar *preparse-hash-init?* nil)