fix prompt in fix in single-value context compilation
authorAndy Wingo <wingo@pobox.com>
Sun, 27 Mar 2011 13:00:18 +0000 (15:00 +0200)
committerAndy Wingo <wingo@pobox.com>
Sun, 27 Mar 2011 13:00:18 +0000 (15:00 +0200)
commit9dadfa47b07548ff5cf3604067910c8aece93c42
treeb16b8e03387d6201bba8f7640ba65705aad8cdd5
parent62f528e929368ddce77f550168c229177793d854
fix prompt in fix in single-value context compilation

* module/language/tree-il/compile-glil.scm (flatten): When compiling a
  <prompt> in push context with an RA, after the body returns normally,
  jump to that RA instead of to our POST label (which in that case does
  not need to be emitted).  Fixes a tail <prompt> in a push <fix>.

* test-suite/tests/control.test ("prompt in different contexts"): Add
  more test cases.
module/language/tree-il/compile-glil.scm
test-suite/tests/control.test