projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
1.0.18.11: Add SB-EXT:*MUFFLED-WARNINGS*, to muffle warnings at runtime.
[sbcl.git]
/
src
/
compiler
/
policies.lisp
diff --git
a/src/compiler/policies.lisp
b/src/compiler/policies.lisp
index
1ee4f10
..
0ab60a1
100644
(file)
--- a/
src/compiler/policies.lisp
+++ b/
src/compiler/policies.lisp
@@
-11,6
+11,12
@@
(in-package "SB!C")
(in-package "SB!C")
+(define-optimization-quality check-constant-modification
+ safety
+ ("no" "maybe" "yes" "yes")
+ "Control whether the compiler should check for constant
+modification. Defaults to SAFETY.")
+
(define-optimization-quality type-check
;; FIXME: grepping the tree for "policy.*safety" yields some
;; places which might want to use this instead -- or
(define-optimization-quality type-check
;; FIXME: grepping the tree for "policy.*safety" yields some
;; places which might want to use this instead -- or
@@
-94,6
+100,13
@@
and will refer to the new function, bound to FOO.")
"Control whether allocate objects, declared DYNAMIC-EXTENT, on
stack.")
"Control whether allocate objects, declared DYNAMIC-EXTENT, on
stack.")
+(define-optimization-quality stack-allocate-value-cells
+ ;; FIXME, see bug 419
+ 0
+ ("no" "maybe" "yes" "yes")
+ "Control whether allocate closure variable storage, declared
+DYNAMIC-EXTENT, on stack.")
+
(define-optimization-quality stack-allocate-vector
(cond ((= stack-allocate-dynamic-extent 0) 0)
((= safety 0) 3)
(define-optimization-quality stack-allocate-vector
(cond ((= stack-allocate-dynamic-extent 0) 0)
((= safety 0) 3)