Changeset 12153


Ignore:
Timestamp:
May 28, 2009, 10:30:43 PM (10 years ago)
Author:
gb
Message:

Wrap an (EVAL-WHEN (:COMPILE-TOPLEVEL) around the OPTIMIZE declamation.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/examples/cocoa/easygui/views.lisp

    r11899 r12153  
    3030; ----------------------------------------------------------------------
    3131
    32 (declaim (optimize (speed 0) (space 0) (compilation-speed 0) (safety 3) (debug 3)))
     32(eval-when (:compile-toplevel :execute)
     33  (declaim (optimize (speed 0) (space 0) (compilation-speed 0) (safety 3) (debug 3))))
    3334
    3435(defmacro running-on-this-thread ((&key (waitp t)) &rest body)
Note: See TracChangeset for help on using the changeset viewer.