projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
0.9.2.7:
[sbcl.git]
/
src
/
compiler
/
policies.lisp
diff --git
a/src/compiler/policies.lisp
b/src/compiler/policies.lisp
index
2264f6d
..
b62b239
100644
(file)
--- a/
src/compiler/policies.lisp
+++ b/
src/compiler/policies.lisp
@@
-61,12
+61,18
@@
0)
("no" "maybe" "yes" "yes"))
0)
("no" "maybe" "yes" "yes"))
+(define-optimization-quality stack-allocate-vector
+ (cond ((= stack-allocate-dynamic-extent 0) 0)
+ ((= safety 0) 3)
+ (t 2))
+ ("no" "maybe" "one page" "yes"))
+
(define-optimization-quality float-accuracy
3
("degraded" "full" "full" "full"))
(define-optimization-quality insert-step-conditions
(define-optimization-quality float-accuracy
3
("degraded" "full" "full" "full"))
(define-optimization-quality insert-step-conditions
- (if (> debug (max speed space))
+ (if (> debug (max speed space compilation-speed))
debug
0)
("no" "no" "partial" "full"))
debug
0)
("no" "no" "partial" "full"))