From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Ian Price Newsgroups: gmane.lisp.guile.bugs Subject: ASSERT should return a value Date: Wed, 6 Apr 2011 15:11:12 +0100 Message-ID: NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary=90e6ba613b26b4915d04a04090a9 X-Trace: dough.gmane.org 1302099087 13396 80.91.229.12 (6 Apr 2011 14:11:27 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Wed, 6 Apr 2011 14:11:27 +0000 (UTC) To: bug-guile@gnu.org Original-X-From: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Wed Apr 06 16:11:21 2011 Return-path: Envelope-to: guile-bugs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1Q7TS5-0004pp-0D for guile-bugs@m.gmane.org; Wed, 06 Apr 2011 16:11:21 +0200 Original-Received: from localhost ([127.0.0.1]:55516 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Q7TS4-0002cf-CC for guile-bugs@m.gmane.org; Wed, 06 Apr 2011 10:11:20 -0400 Original-Received: from [140.186.70.92] (port=60959 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Q7TRz-0002cX-29 for bug-guile@gnu.org; Wed, 06 Apr 2011 10:11:16 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Q7TRx-0005P2-QB for bug-guile@gnu.org; Wed, 06 Apr 2011 10:11:14 -0400 Original-Received: from mail-iw0-f169.google.com ([209.85.214.169]:36324) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Q7TRx-0005Ot-LH for bug-guile@gnu.org; Wed, 06 Apr 2011 10:11:13 -0400 Original-Received: by iwg8 with SMTP id 8so1995342iwg.0 for ; Wed, 06 Apr 2011 07:11:13 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=googlemail.com; s=gamma; h=domainkey-signature:mime-version:date:message-id:subject:from:to :content-type; bh=/kcBZgK9yG0H9lRdRVwey0vFp/2u5GQKAwM1eUWYh68=; b=BjA7GQrqYxhMavgsOb7PjdTdWIZvgFHbjr4cCxqRWhWGisjxSl3co0ihJnuFWTHH2x tT+agR+ss320YiT85BnxCEQPppb/QnmnCmmAP8JuKuA5nyAgnp2KfETrr61DiLY9PMIW 324o8dBWo/0VnWO6944y7OQxNIGdxBRqm8veg= DomainKey-Signature: a=rsa-sha1; c=nofws; d=googlemail.com; s=gamma; h=mime-version:date:message-id:subject:from:to:content-type; b=gNtlsJIcraFQzc+JhcG7Brk/1NXXtFkUxoy2A21JLjK+x8IfOIzVbU3kpMvE/Ekxwg 2kbvmCCGAQsbt04RcUlYUcIV3zSDPNnv+14dkI5XQNLc3IGptsu1DCs6KqHtmVBqz7h5 Z5UDz9GLLfK0CTQjkqqikoaXI6s9HpgNix7DQ= Original-Received: by 10.42.155.130 with SMTP id u2mr1691570icw.291.1302099072946; Wed, 06 Apr 2011 07:11:12 -0700 (PDT) Original-Received: by 10.231.12.72 with HTTP; Wed, 6 Apr 2011 07:11:12 -0700 (PDT) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) X-Received-From: 209.85.214.169 X-BeenThere: bug-guile@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Bug reports for GUILE, GNU's Ubiquitous Extension Language" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Errors-To: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.lisp.guile.bugs:5433 Archived-At: --90e6ba613b26b4915d04a04090a9 Content-Type: text/plain; charset=ISO-8859-1 Hello Guilers, Over on Racket Users, Marco Maggi points out that ASSERT should return the value of the expression if it is true[0][1]. I have attached a simple patch to fix this behaviour in guile. Regards, Ian 0. http://lists.racket-lang.org/users/archive/2011-April/045046.html 1. http://www.r6rs.org/final/html/r6rs/r6rs-Z-H-14.html#node_sec_11.14 --90e6ba613b26b4915d04a04090a9 Content-Type: application/octet-stream; name="0001-fix-assert-to-return-true-value.patch" Content-Disposition: attachment; filename="0001-fix-assert-to-return-true-value.patch" Content-Transfer-Encoding: base64 X-Attachment-Id: f_gm6ccq770 RnJvbSBkN2Q3NTRiMjNjODAxZmI1Mzk5Y2IzYTkzYzMwN2FjNWY0YTdlNDE0IE1vbiBTZXAgMTcg MDA6MDA6MDAgMjAwMQpGcm9tOiBJYW4gUHJpY2UgPGlhbnByaWNlOTBAZ29vZ2xlbWFpbC5jb20+ CkRhdGU6IFdlZCwgNiBBcHIgMjAxMSAxMzo1MTo0NCArMDEwMApTdWJqZWN0OiBbUEFUQ0hdIGZp eCBhc3NlcnQgdG8gcmV0dXJuIHRydWUgdmFsdWUuCgoqIG1vZHVsZS9ybnJzL2Jhc2Uuc2NtIChh c3NlcnQpOiByZXR1cm5zIHZhbHVlIGluc3RlYWQgb2Ygdm9pZC4KCiogdGVzdC1zdWl0ZS90ZXN0 cy9yNnJzLWJhc2UudGVzdCAoImFzc2VydCIpOiBhZGQgdGVzdCBjYXNlcy4KLS0tCiBtb2R1bGUv cm5ycy9iYXNlLnNjbSAgICAgICAgICAgIHwgICAgMiArLQogdGVzdC1zdWl0ZS90ZXN0cy9yNnJz LWJhc2UudGVzdCB8ICAgIDggKysrKysrKysKIDIgZmlsZXMgY2hhbmdlZCwgOSBpbnNlcnRpb25z KCspLCAxIGRlbGV0aW9ucygtKQoKZGlmZiAtLWdpdCBhL21vZHVsZS9ybnJzL2Jhc2Uuc2NtIGIv bW9kdWxlL3JucnMvYmFzZS5zY20KaW5kZXggMmY1YTIxOC4uZmI2NzE2YyAxMDA2NDQKLS0tIGEv bW9kdWxlL3JucnMvYmFzZS5zY20KKysrIGIvbW9kdWxlL3JucnMvYmFzZS5zY20KQEAgLTE2OSw3 ICsxNjksNyBAQAogIChkZWZpbmUtc3ludGF4IGFzc2VydAogICAgKHN5bnRheC1ydWxlcyAoKQog ICAgICAoKF8gZXhwcmVzc2lvbikKLSAgICAgIChpZiAobm90IGV4cHJlc3Npb24pCisgICAgICAo b3IgZXhwcmVzc2lvbgogICAgICAgICAgIChyYWlzZSAoY29uZGl0aW9uCiAgICAgICAgICAgICAg ICAgICAobWFrZS1hc3NlcnRpb24tdmlvbGF0aW9uKQogICAgICAgICAgICAgICAgICAgKG1ha2Ut bWVzc2FnZS1jb25kaXRpb24KZGlmZiAtLWdpdCBhL3Rlc3Qtc3VpdGUvdGVzdHMvcjZycy1iYXNl LnRlc3QgYi90ZXN0LXN1aXRlL3Rlc3RzL3I2cnMtYmFzZS50ZXN0CmluZGV4IDE1MDliMDQuLjBh MDViNjMgMTAwNjQ0Ci0tLSBhL3Rlc3Qtc3VpdGUvdGVzdHMvcjZycy1iYXNlLnRlc3QKKysrIGIv dGVzdC1zdWl0ZS90ZXN0cy9yNnJzLWJhc2UudGVzdApAQCAtMTksNiArMTksOCBAQAogCiAoZGVm aW5lLW1vZHVsZSAodGVzdC1zdWl0ZSB0ZXN0LXI2cnMtYmFzZSkKICAgOnVzZS1tb2R1bGUgKChy bnJzIGJhc2UpIDp2ZXJzaW9uICg2KSkKKyAgOnVzZS1tb2R1bGUgKChybnJzIGNvbmRpdGlvbnMp IDp2ZXJzaW9uICg2KSkKKyAgOnVzZS1tb2R1bGUgKChybnJzIGV4Y2VwdGlvbnMpIDp2ZXJzaW9u ICg2KSkKICAgOnVzZS1tb2R1bGUgKHRlc3Qtc3VpdGUgbGliKSkKIAogKHdpdGgtdGVzdC1wcmVm aXggImJvb2xlYW49PyIKQEAgLTE3MiwzICsxNzQsOSBAQAogICAocGFzcy1pZiAobm90IChpbnRl Z2VyLXZhbHVlZD8gKzAuMDFpKSkpCiAgIChwYXNzLWlmIChub3QgKGludGVnZXItdmFsdWVkPyAt aW5mLjBpKSkpKQogCisod2l0aC10ZXN0LXByZWZpeCAiYXNzZXJ0IgorICAocGFzcy1pZiAiYXNz ZXJ0IHJldHVybnMgdmFsdWUiICg9IDEgKGFzc2VydCAxKSkpCisgIChwYXNzLWlmICJhc3NlcnRp b24tdmlvbGF0aW9uIgorICAgIChndWFyZCAoY29uZGl0aW9uICgoYXNzZXJ0aW9uLXZpb2xhdGlv bj8gY29uZGl0aW9uKSAjdCkpCisgICAgICAoYXNzZXJ0ICNmKQorICAgICAgI2YpKSkKLS0gCjEu Ny4zLjQKCg== --90e6ba613b26b4915d04a04090a9--