Commit 380f818c authored by ram's avatar ram
Browse files

Added (in-package "USER")

parent 451b3c9c
;;; -*- 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)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment