suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Disable loop detection heuristic with too many false positives.

Browse Source
This commit is contained in:
Vincent St-Amour 2012-07-19 12:17:42 -04:00
parent 2e594d3606
commit d396b34b2d
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/typed-racket/optimizer/tool/mzc.rkt
View File

@ -180,7 +180,8 @@
;; body (as opposed to `g') may make unboxing possible. ;; body (as opposed to `g') may make unboxing possible.
;; Of course, we lose precision if `g' has multiple call sites to `f'. ;; Of course, we lose precision if `g' has multiple call sites to `f'.
(define n-unrollings (length (filter unrolling? group))) (define n-unrollings (length (filter unrolling? group)))
(define is-a-loop? (or any-self-o-o-f? (> n-unrollings 0))) ;; TODO any-self-o-o-f? add too many false positives
(define is-a-loop? (or #;any-self-o-o-f? (> n-unrollings 0)))
(define inlining-sites (define inlining-sites
(group-by equal? #:key (lambda (x) (group-by equal? #:key (lambda (x)
(inlining-event-where-loc (inlining-event-where-loc