[Bug-kawa] [bug #15579] append-map may destroy arguments.

[anonymous]

URL:
  <http://savannah.gnu.org/bugs/?func=detailitem&item_id=15579>

                 Summary: append-map may destroy arguments.
                 Project: Kawa
            Submitted by: None
            Submitted on: 月 2006年01月30日 at 20:06
                Category: Scheme library
                Severity: 3 - Normal
              Item Group: Unexpected result
                  Status: None
                 Privacy: Public
             Assigned to: None
             Open/Closed: Open

    _______________________________________________________

Details:

I found a bug while using KAWA-1.8.

If you run the below program, you can see that the program does not return at
2nd append-map call. I think the reason of this is that the constants in foo
are destroyed by append! in append-map.

(require 'list-lib)

(define (foo x)
  (cond ((= x 0) '(a))
        ((= x 1) '(b))
        (else '())))

; It is ok.
(append-map foo '(0 1 2))

; But it does not return.
(append-map foo '(0 1 2))







    _______________________________________________________

Reply to this item at:

  <http://savannah.gnu.org/bugs/?func=detailitem&item_id=15579>

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