diff --git a/contrib/profile/profile.lisp b/contrib/profile/profile.lisp
index 03193fd38..d60f305b7 100644
--- a/contrib/profile/profile.lisp
+++ b/contrib/profile/profile.lisp
@@ -40,10 +40,9 @@
 extern ECL_API size_t GC_get_total_bytes();
 ")
 
-(eval-when (:load-toplevel)
-  (defconstant +wrap+ (ffi:c-inline () () :object
-                                    "ecl_make_unsigned_integer(~((size_t)0))"
-                                    :one-liner t)))
+(defparameter +wrap+ (ffi:c-inline () () :object
+                                   "ecl_make_unsigned_integer(~((size_t)0))"
+                                   :one-liner t))
 
 (defun get-bytes-consed (orig)
   (let ((bytes (ffi:c-inline () () :object "ecl_make_unsigned_integer(GC_get_total_bytes())"