diff --git a/benchmarks/soar/soar.lisp b/benchmarks/soar/soar.lisp
index 1ff845bc378b655cd92bd32fc8d84c96b167f075..65f9e9e162d1a6100a0543c3d4ce48a4bb382bb4 100644
--- a/benchmarks/soar/soar.lisp
+++ b/benchmarks/soar/soar.lisp
@@ -1,6 +1,6 @@
 ;;; -*- Mode: LISP; Package: User -*-
 
-#+unsafe (proclaim '(optimize (speed 3) (safety 0)))
+#+declare-unsafe (proclaim '(optimize (speed 3) (safety 0)))
 (proclaim
  '(special *matrix* *feature-count* *pcount* *vars* *cur-vars*
 	   *curcond* *subnum* *last-node* *last-branch* *first-node*