Don't assume self-inline when in doubt.
This avoids cases where a non-recursive function would be considered to be unrolled, which makes no sense.
This commit is contained in:
parent
deaa8f61be
commit
284d772a95
|
@ -133,8 +133,7 @@
|
|||
(and (equal? path where-path)
|
||||
(= col where-col)
|
||||
(= line where-line))]
|
||||
[(hunoz #f) #t] ; we assume it is, to be conservative
|
||||
[(hunoz hukairz) #f])]))
|
||||
[(hunoz hukairz) #f])])) ; we assume it is not, to be conservative
|
||||
|
||||
(define (unrolling? l) (and (success? l) (self-inline? l)))
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user