;; bug fix

(if (let loop ((i 0))
　　　(cond ((>= i 100) #t)
　　　　　　((eq? (func) 'NG) #f)
　　　　　　(else
　　　　　　 (func2)
　　　　　　 (func3)
　　　　　　 (loop (+ i 1)))))
　　(print "normal loop end")
　　(print "loop break"))