3
0)
("no" "maybe" "yes" "yes"))
+
+(define-optimization-quality insert-debug-catch
+ (if (> debug (max speed space))
+ 3
+ 0)
+ ("no" "maybe" "yes" "yes"))
+
+(define-optimization-quality recognize-self-calls
+ (if (> (max speed space) debug)
+ 3
+ 0)
+ ("no" "maybe" "yes" "yes"))
+
+(define-optimization-quality stack-allocate-dynamic-extent
+ (if (and (> (max speed space) (max debug safety))
+ (< safety 3))
+ 3
+ 0)
+ ("no" "maybe" "yes" "yes"))