X-Git-Url: http://git.kpe.io/?p=reversi.git;a=blobdiff_plain;f=io.lisp;h=1d3d2c81781eccb6169b1b3d61467e83b981637d;hp=26872eca12a75a20d0cf33123892d2481c24ee55;hb=20c849f483c381f84eae22eee807280c8d00e554;hpb=1d59e17264a602c64d27607c2c00d98cca03e82e diff --git a/io.lisp b/io.lisp index 26872ec..1d3d2c8 100644 --- a/io.lisp +++ b/io.lisp @@ -8,9 +8,9 @@ ;;;; Programer: Kevin Rosenberg based on code by Peter Norvig ;;;; Date Started: 1 Nov 2001 ;;;; -;;;; $Id: io.lisp,v 1.3 2003/05/06 15:51:20 kevin Exp $ +;;;; $Id: io.lisp,v 1.4 2003/06/12 12:42:13 kevin Exp $ ;;;; -;;;; This file is Copyright (c) 2001-2002 by Kevin M. Rosenberg +;;;; This file is Copyright (c) 2001-2003 by Kevin M. Rosenberg ;;;; and Copyright (c) 1998-2002 Peter Norvig ;;;; ;;;; Reversi users are granted the rights to distribute and use this software @@ -20,9 +20,6 @@ (in-package #:reversi) -(eval-when (:compile-toplevel) - (declaim (optimize (safety 1) (space 0) (speed 3) (compilation-speed 0)))) - (eval-when (:compile-toplevel :load-toplevel :execute) (let ((square-names