[Bug-mit-scheme] [bug #18764] compiler error in deeply nested loop

[Taylor R. Campbell]

URL:
  <http://savannah.gnu.org/bugs/?18764>

                 Summary: compiler error in deeply nested loop
                 Project: MIT/GNU Scheme
            Submitted by: riastradh
            Submitted on: Friday 01/12/07 at 10:38
                Category: compiler
                Severity: 3 - Normal
                Priority: 5 - Normal
              Item Group: Incorrect behavior
                  Status: None
                 Privacy: Public
             Assigned to: None
         Originator Name: 
        Originator Email: 
             Open/Closed: Open
         Discussion Lock: Any
                Keywords: 

    _______________________________________________________

Details:

Compiling the loop at <http://paste.lisp.org/display/34944#1> with certain
declarations after loading these files:

<http://mumble.net/~campbell/scheme/syn-param.scm>
<http://mumble.net/~campbell/scheme/let-values.scm>
<http://mumble.net/~campbell/tmp/foof-loop.scm>
<http://mumble.net/~campbell/tmp/nested-foof-loop.scm>

yields the following error:

Block is not an ancestor #[reference-context 16] #[liar:block 17 stack
pythagorean-triples-57]

triples.scm contains the original source code, including the declarations
(omitting which makes the error go away); triples.pp.scm contains the
expanded code; and fg.txt contains the output of (SHOW-FG) after the error.

I tried to isolate the problem to simpler code, but to no avail.  Perhaps
when I'm less tired I'll try again.  The problem goes away if I strike out
the last three declarations, and also if I move the definition of ANY outside
PYTHAGOREAN-TRIPLES.



    _______________________________________________________

File Attachments:


-------------------------------------------------------
Date: Friday 01/12/07 at 10:38  Name: triples.scm  Size: 923B   By: riastradh

<http://savannah.gnu.org/bugs/download.php?file_id=11729>
-------------------------------------------------------
Date: Friday 01/12/07 at 10:38  Name: triples.pp.scm  Size: 5kB   By:
riastradh

<http://savannah.gnu.org/bugs/download.php?file_id=11730>

    _______________________________________________________

Reply to this item at:

  <http://savannah.gnu.org/bugs/?18764>

_______________________________________________
  Message sent via/by Savannah
  http://savannah.gnu.org/