bugKawa - Bugs: bug #24249, Local define miscompiled

 
 

bug #24249: Local define miscompiled

Submitter:  Helmut Eller <ellerh>
Submitted:  Fri 12 Sep 2008 12:00:39 PM UTC
   
 
Category:  Code generation Severity:  3 - Normal
Item Group:  None Status:  None
Privacy:  Public Assigned to:  bothner
Open/Closed:  Closed
* Mandatory Fields

Add a New Comment Rich Markup
   

Wed 08 Jul 2009 02:58:24 AM UTC, comment #1: 

Thanis for the test-case.
I checked in a fix, along with the test-case.

Per Bothner <bothner>
Group administrator
Fri 12 Sep 2008 12:00:39 PM UTC, original submission:  

Kawa 1.9.3 (revision 6142M)
miscompiles the following expression.
k is (wrongly) null:

  (let ()
    (define (foo) (bar))
    (define (bar)
      (let ((k (lambda () #f)))
         (cond ((not (procedure? k))
               (error 'bad-k k)))
        k))
    (define (baz) (bar))
   
    (foo))

Helmut Eller <ellerh>

 

(Note: upload size limit is set to 16384 kB, after insertion of the required escape characters.)

Attach Files:
   
   
Comment:
   

No files currently attached

 

Depends on the following items: None found

Items that depend on this one: None found

 

Carbon-Copy List
  • -email is unavailable- added by bothner (Posted a comment)
  • -email is unavailable- added by ellerh (Submitted the item)
  •  

    There are 0 votes so far. Votes easily highlight which items people would like to see resolved in priority, independently of the priority of the item set by tracker managers.

    Only logged-in users can vote.

     

    Follow 2 latest changes.

    Date Changed by Updated Field Previous Value => Replaced by
    2009-07-08 bothner Assigned toNone bothner
        Open/ClosedOpen Closed

    Back to the top

    Powered by Savane 3.13-0329.
    Corresponding source code