GNU bug report logs - #36399
< operator does not work inside function regarding goops

Message received at submit <at> debbugs.gnu.org:

Received: (at submit) by debbugs.gnu.org; 26 Jun 2019 21:53:27 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Wed Jun 26 17:53:27 2019
Received: from localhost ([127.0.0.1]:37143 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1hgFr5-0005tn-KG
	for submit <at> debbugs.gnu.org; Wed, 26 Jun 2019 17:53:27 -0400
Received: from lists.gnu.org ([209.51.188.17]:34788)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <stefan.itampe@HIDDEN>) id 1hgFr4-0005ta-5G
 for submit <at> debbugs.gnu.org; Wed, 26 Jun 2019 17:53:26 -0400
Received: from eggs.gnu.org ([2001:470:142:3::10]:33710)
 by lists.gnu.org with esmtp (Exim 4.86_2)
 (envelope-from <stefan.itampe@HIDDEN>) id 1hgFr3-0003KH-6H
 for bug-guile@HIDDEN; Wed, 26 Jun 2019 17:53:25 -0400
X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org
X-Spam-Level: 
X-Spam-Status: No, score=0.8 required=5.0 tests=BAYES_50,FREEMAIL_FROM,
 HTML_MESSAGE autolearn=disabled version=3.3.2
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
 (envelope-from <stefan.itampe@HIDDEN>) id 1hgFr2-0005HP-CX
 for bug-guile@HIDDEN; Wed, 26 Jun 2019 17:53:25 -0400
Received: from mail-wr1-x42c.google.com ([2a00:1450:4864:20::42c]:46688)
 by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16)
 (Exim 4.71) (envelope-from <stefan.itampe@HIDDEN>)
 id 1hgFr2-0005FM-3n
 for bug-guile@HIDDEN; Wed, 26 Jun 2019 17:53:24 -0400
Received: by mail-wr1-x42c.google.com with SMTP id n4so23231wrw.13
 for <bug-guile@HIDDEN>; Wed, 26 Jun 2019 14:53:22 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025;
 h=mime-version:from:date:message-id:subject:to;
 bh=T/UdhhxeXnPDhq5ZyY+6pSHXyK18mG0ZouVwD5gFooY=;
 b=Bg8Hc9GeuprahzXILak1wKD20y8zbImjhyDrS7A9wu37/yOZwT3n3HQonVEMPyzosk
 QP3h1gVnl/SNJy6G8eFomMCVb/KX03lDQE/knHUkqgYP3OknS29Y3AEhlSSygn7sh60v
 hqVpkBi2C/0qzPGBt068+FhdH6uH1mbPwV372h1/bTNmk9RCXB7G2wfggMPViOcrjH8m
 yYdEm4eYSQw1EYRav8lz53ZCCYRunKCUpzcixhWW/bheoLmBt9z3BFgpzMEipPfruzTH
 ycgxG3+5EwP/lADSTkmEagLVewJiKwiN48z2CXBg7vYyxfMU3RK2VnGveaZ+A6H9ONcW
 JvbA==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:mime-version:from:date:message-id:subject:to;
 bh=T/UdhhxeXnPDhq5ZyY+6pSHXyK18mG0ZouVwD5gFooY=;
 b=YIZEpo1wBd7P3LeDyzJad9OoGTcQ1SdhQJXnfh7tVZrPpaMfmnGFvzNSMFQOPhEO1s
 PaJA3fTI8X5u8BKJX1nTdMxQ3fXIbs1XY52+WGMpdvNdQFwrBl3llt0XaQ9/hUBTPjFK
 HRPZD6XFNBYeIZcNb0ZYoUexUA0TPaRLXVh7vNP5HjO6zQKThoyp95G6/VzAnZL1dNwC
 2xH02GaPguVu+v7RKFZ7p4Z8gCnb9gW7CMnQhn4ps3a9Ryg4DngbMgCEgj86fUWUC72s
 W9hqTyp2uN6qSy6URtXZ+4UlpI1ksbrKXhI4XMT5wKxhiKatBtY7Gpv0IbJE+vUy6KCg
 Gxxg==
X-Gm-Message-State: APjAAAXcHlEOtjLJf0krYkxgLz6EODBDvtiTuDuXA7BpHuy8M4z+Wabb
 U6Zrv1hdZtUeKpHxZnX4t+t5gXsbC++IGGuZ7ovvZaU7
X-Google-Smtp-Source: APXvYqy207zAqMlxssEbqNO59uvmHqyjviXzbRA8ZjBiupQbDadzsgwqjVu4OfolGZ+PRr7eTO8mlgoMWMu/cC3a9gg=
X-Received: by 2002:a5d:4b12:: with SMTP id v18mr17464wrq.123.1561586000969;
 Wed, 26 Jun 2019 14:53:20 -0700 (PDT)
MIME-Version: 1.0
From: Stefan Israelsson Tampe <stefan.itampe@HIDDEN>
Date: Wed, 26 Jun 2019 23:53:10 +0200
Message-ID: <CAGua6m2PL1KLvXtRazJy2DNL8+CSf6mM5kQ8ga0uM+v+fdnxJg@HIDDEN>
Subject: < operator does not work inside function regarding goops
To: bug-guile@HIDDEN
Content-Type: multipart/alternative; boundary="000000000000dfc35e058c4112dc"
X-detected-operating-system: by eggs.gnu.org: Genre and OS details not
 recognized.
X-Received-From: 2a00:1450:4864:20::42c
X-Spam-Score: -1.3 (-)
X-Debbugs-Envelope-To: submit
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -2.3 (--)

--000000000000dfc35e058c4112dc
Content-Type: text/plain; charset="UTF-8"

For guile 2.9

Executing
  (use-modules (oop goops))
  (define-method (< (s1 <string>) (s2 <string>)) (pk 'wow) #f)
  (define (f x) (< x x))
  (f "a")

results in :

   unnamed port>:3:14: In procedure f:
   In procedure nan?: Wrong type argument in position 1: "a"

--000000000000dfc35e058c4112dc
Content-Type: text/html; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable

<div dir=3D"ltr"><div>For guile 2.9</div><div><br></div><div>Executing</div=
>=C2=A0 (use-modules (oop goops))<br>=C2=A0 (define-method (&lt; (s1 &lt;st=
ring&gt;) (s2 &lt;string&gt;)) (pk &#39;wow) #f)<br>=C2=A0 (define (f x) (&=
lt; x x))<br><div>=C2=A0 (f &quot;a&quot;)</div><div><br></div><div>results=
 in :</div><div><span style=3D"color:rgb(0,0,0);font-family:monospace"><br>=
</span></div><div><span style=3D"color:rgb(0,0,0);font-family:monospace">=
=C2=A0 =C2=A0unnamed port&gt;:3:14: In procedure f:=C2=A0</span><br></div><=
div><span style=3D"font-family:monospace">=C2=A0 =C2=A0In procedure nan?: W=
rong type argument in position 1: &quot;a&quot;
<br><br></span></div></div>

--000000000000dfc35e058c4112dc--