HCoop / bpt / guile.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: e4a8775) | patch
Avoid attempting to eta-reduce self-loops.
authorAndy Wingo <wingo@pobox.com>
Sat, 22 Feb 2014 14:34:46 +0000 (15:34 +0100)
committerAndy Wingo <wingo@pobox.com>
Sat, 22 Feb 2014 14:34:46 +0000 (15:34 +0100)
commit90c8094aec494df062b383d439874b380cf03925
treee379fc272d8451b68ea31b619107ecac7f3893b7tree | snapshot (tar.gz zip)
parente4a8775ddb357c63b91ef4bcfc9e582107b8d832commit | diff
Avoid attempting to eta-reduce self-loops.

* module/language/cps/simplify.scm (compute-eta-reductions): Avoid
  trying to eta-reduce a jump-to-self, as in (let lp () (lp)).  This
  caused the compiler to hang.
module/language/cps/simplify.scm diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.