[Bug-kawa] [bug #32678] set! and endless loop

[Helmut Eller]

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

                 Summary: set! and endless loop
                 Project: Kawa
            Submitted by: ellerh
            Submitted on: Fri 04 Mar 2011 03:30:19 PM GMT
                Category: None
                Severity: 3 - Normal
              Item Group: None
                  Status: None
                 Privacy: Public
             Assigned to: None
             Open/Closed: Open
         Discussion Lock: Any

    _______________________________________________________

Details:

Kawa fails to compile this example:

(define (foo x)
  (let ((fail 0)
        (result #!null))
    (if (instance? x pair)
        (set! result (do () (#f)))
        (set! fail -1))
    (if (= fail 0) 
        result 
        #f)))

kawa --version -C /tmp/x.scm

Kawa 1.11 (revision 0:6912M)
Copyright (C) 2009 Per Bothner
(compiling /tmp/x.scm to x)
/tmp/x.scm:6: internal error while compiling /tmp/x.scm
java.lang.Error: popType called with empty stack
x.foo(java.lang.Object)java.lang.Object
        at gnu.bytecode.CodeAttr.popType(CodeAttr.java:442)
        at gnu.bytecode.CodeAttr.emitStore(CodeAttr.java:1372)
        at gnu.expr.SetExp.compile(SetExp.java:276)
        at gnu.expr.Expression.compileNotePosition(Expression.java:156)
        at gnu.expr.Expression.compileWithPosition(Expression.java:127)
        at gnu.expr.IfExp.compile(IfExp.java:118)
        at gnu.expr.IfExp.compile(IfExp.java:52)
        at gnu.expr.Expression.compileNotePosition(Expression.java:156)
        at gnu.expr.Expression.compileWithPosition(Expression.java:127)
        at gnu.expr.BeginExp.compile(BeginExp.java:142)
        at gnu.expr.Expression.compileNotePosition(Expression.java:156)
        at gnu.expr.Expression.compileWithPosition(Expression.java:127)
        at gnu.expr.LetExp.compile(LetExp.java:196)
        at gnu.expr.Expression.compileNotePosition(Expression.java:156)
        at gnu.expr.Expression.compileWithPosition(Expression.java:142)
        at gnu.expr.LambdaExp.compileBody(LambdaExp.java:1619)
        at gnu.expr.LambdaExp.compileAsMethod(LambdaExp.java:1595)
        at gnu.expr.LambdaExp.compileSetField(LambdaExp.java:656)
        at gnu.expr.SetExp.compile(SetExp.java:168)
        at gnu.expr.Expression.compileNotePosition(Expression.java:156)
        at gnu.expr.Expression.compileWithPosition(Expression.java:142)
        at gnu.expr.LambdaExp.compileBody(LambdaExp.java:1619)
        at gnu.expr.Compilation.generateBytecode(Compilation.java:2014)
        at gnu.expr.Compilation.process(Compilation.java:1892)
        at gnu.expr.ModuleInfo.loadByStages(ModuleInfo.java:305)
        at gnu.expr.ModuleInfo.loadByStages(ModuleInfo.java:290)
        at kawa.repl.compileFiles(repl.java:783)
        at kawa.repl.processArgs(repl.java:412)
        at kawa.repl.main(repl.java:829)






    _______________________________________________________

Reply to this item at:

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

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