[Chicken-janitors] #1648: Inliner goes wrong

[Chicken Trac]

#1648: Inliner goes wrong
-------------------------------+----------------------
            Reporter:  megane  |       Type:  defect
              Status:  new     |   Priority:  major
           Milestone:  5.2     |  Component:  compiler
             Version:  5.1.0   |   Keywords:  inline
Estimated difficulty:          |
-------------------------------+----------------------
 Compiling this with `-inline` sends the optimizer into some loop that
 eventually exhausts the heap.

 Fails with `4.13.0` too.
 {{{
 (module
  m1 (foo)
  (import scheme)
  (define (foo x) (bar x))
  (define (bar x) (if (null? x) x (bar (cdr x)))))
 }}}

-- 
Ticket URL: <https://bugs.call-cc.org/ticket/1648>
CHICKEN Scheme <https://www.call-cc.org/>
CHICKEN Scheme is a compiler for the Scheme programming language.