From 380f818c6ba85ca5ba106c57c8509b7dc3ab1f47 Mon Sep 17 00:00:00 2001 From: ram <ram> Date: Sat, 14 Mar 1992 14:42:25 +0000 Subject: [PATCH] Added (in-package "USER") --- benchmarks/cascor1.lisp | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/benchmarks/cascor1.lisp b/benchmarks/cascor1.lisp index 513c13151..02e387955 100644 --- a/benchmarks/cascor1.lisp +++ b/benchmarks/cascor1.lisp @@ -1,4 +1,4 @@ -;;; -*- Mode:Lisp -*- +;;; -*- Mode: Lisp; Package: User -*- ;;; *************************************************************************** ;;; Common Lisp implementation of Cascade-Correlation learning algorithm. ;;; This version for export. Non-portable user-interface stuff excised. @@ -51,9 +51,12 @@ ;;; Added some additional type declarations for maximum speed under certain ;;; Common Lisp compilers. ;;; *************************************************************************** +;;; +(in-package "USER") ;;; This proclamation buys a certain amount of overall speed at the expense ;;; of runtime checking. Comment it out when debugging new, bug-infested code. +;;; #+declare-unsafe (proclaim '(optimize (speed 3) (space 0) (safety 0))) -- GitLab