From debbugs-submit-bounces@debbugs.gnu.org Mon Jun 21 18:36:34 2010 Received: (at submit) by debbugs.gnu.org; 21 Jun 2010 22:36:34 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1OQpbW-0000nv-9c for submit@debbugs.gnu.org; Mon, 21 Jun 2010 18:36:34 -0400 Received: from mx10.gnu.org ([199.232.76.166]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1OQpbT-0000nm-Uc for submit@debbugs.gnu.org; Mon, 21 Jun 2010 18:36:32 -0400 Received: from lists.gnu.org ([199.232.76.165]:52249) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1OQpbP-0002fC-TU for submit@debbugs.gnu.org; Mon, 21 Jun 2010 18:36:27 -0400 Received: from [140.186.70.92] (port=34255 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1OQpbN-00028d-Gd for bug-gnu-emacs@gnu.org; Mon, 21 Jun 2010 18:36:27 -0400 X-Spam-Checker-Version: SpamAssassin 3.3.1 (2010-03-16) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,RCVD_IN_DNSWL_NONE autolearn=unavailable version=3.3.1 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1OQpbM-0000xX-CL for bug-gnu-emacs@gnu.org; Mon, 21 Jun 2010 18:36:25 -0400 Received: from mail-gw0-f41.google.com ([74.125.83.41]:54981) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1OQpbM-0000xE-80 for bug-gnu-emacs@gnu.org; Mon, 21 Jun 2010 18:36:24 -0400 Received: by gwj19 with SMTP id 19so1106124gwj.0 for ; Mon, 21 Jun 2010 15:36:23 -0700 (PDT) MIME-Version: 1.0 Received: by 10.150.254.7 with SMTP id b7mr5282731ybi.293.1277159782565; Mon, 21 Jun 2010 15:36:22 -0700 (PDT) Received: by 10.151.10.5 with HTTP; Mon, 21 Jun 2010 15:36:22 -0700 (PDT) Date: Mon, 21 Jun 2010 18:36:22 -0400 X-Google-Sender-Auth: 6ZdZxwdC8Z8PKv4TDBlKfdKECt8 Message-ID: Subject: put `cl-floor', `cl-ceiling', `cl-truncate', `cl-round', and `cl-mod' side-effect-free From: MON KEY To: bug-gnu-emacs@gnu.org Content-Type: text/plain; charset=UTF-8 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) X-detected-operating-system: by monty-python.gnu.org: GNU/Linux 2.6, seldom 2.4 (older, 4) X-Spam-Score: -5.2 (-----) X-Debbugs-Envelope-To: submit X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -5.2 (-----) Following fncns from lisp/emacs-lisp/cl-compat.el `cl-floor' `cl-ceiling' `cl-truncate' `cl-round' `cl-mod' are aliased in cl.el as `floor*' `ceiling*' `round*' `truncate*' The definition of `Values-list' uses cl.el's `values' not cl-compat.el's `Values'. Does this mean that all of the below is redundant: ,---- | (defun cl-floor (a &optional b) (Values-list (floor* a b))) | (defun cl-ceiling (a &optional b) (Values-list (ceiling* a b))) | (defun cl-round (a &optional b) (Values-list (round* a b))) | (defun cl-truncate (a &optional b) (Values-list (truncate* a b))) `---- IOW, are the following not equivalent: (Values-list (truncate* a b)) --> (apply 'values (truncate* 17 9)) --> (apply 'list (truncate* 17 9)) --> (truncate* 17 9) Or, am I missing something? And, if not, and in the off chnace that the byte-compiler would benefit, would it be reasonable to put the 'side-effect-free property on `cl-floor', `cl-ceiling', `cl-truncate', `cl-round', `cl-mod' as they currently don't have it: (let (gthr-sef) (dolist (sefl '(floor* cl-floor ceiling* cl-ceiling truncate* cl-truncate round* cl-round mod* cl-mod) (setq gthr-sef (nreverse gthr-sef))) (if (get sefl 'side-effect-free) (push `(,sefl . side-effect-free) gthr-sef) (push `(,sefl . IS-NOT-side-effect-free) gthr-sef)))) -- /s_P\ From debbugs-submit-bounces@debbugs.gnu.org Wed Jul 13 19:30:49 2011 Received: (at control) by debbugs.gnu.org; 13 Jul 2011 23:30:50 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Qh8tF-0008DB-K9 for submit@debbugs.gnu.org; Wed, 13 Jul 2011 19:30:49 -0400 Received: from hermes.netfonds.no ([80.91.224.195]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Qh8tD-0008D0-PG for control@debbugs.gnu.org; Wed, 13 Jul 2011 19:30:48 -0400 Received: from cm-84.215.51.58.getinternet.no ([84.215.51.58] helo=quimbies.gnus.org) by hermes.netfonds.no with esmtpsa (TLS1.0:DHE_RSA_AES_128_CBC_SHA1:16) (Exim 4.72) (envelope-from ) id 1Qh8t2-00077o-MC for control@debbugs.gnu.org; Thu, 14 Jul 2011 01:30:36 +0200 Date: Thu, 14 Jul 2011 01:30:36 +0200 Message-Id: To: control@debbugs.gnu.org From: Lars Magne Ingebrigtsen Subject: control message for bug #6488 X-MailScanner-ID: 1Qh8t2-00077o-MC X-Netfonds-MailScanner: Found to be clean X-Netfonds-MailScanner-From: larsi@gnus.org MailScanner-NULL-Check: 1311204636.9941@ouIkxP01rSuH0GCg03BSPw X-Spam-Status: No X-Spam-Score: -2.7 (--) X-Debbugs-Envelope-To: control X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -2.7 (--) tags 6488 wontfix close 6488 From debbugs-submit-bounces@debbugs.gnu.org Wed Jul 13 19:51:23 2011 Received: (at 6488) by debbugs.gnu.org; 13 Jul 2011 23:51:24 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Qh9D9-00017D-2s for submit@debbugs.gnu.org; Wed, 13 Jul 2011 19:51:23 -0400 Received: from hermes.netfonds.no ([80.91.224.195]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Qh9D7-00016s-AF for 6488@debbugs.gnu.org; Wed, 13 Jul 2011 19:51:21 -0400 Received: from cm-84.215.51.58.getinternet.no ([84.215.51.58] helo=quimbies.gnus.org) by hermes.netfonds.no with esmtpsa (TLS1.0:DHE_RSA_AES_128_CBC_SHA1:16) (Exim 4.72) (envelope-from ) id 1Qh9Ct-0007Rw-2B; Thu, 14 Jul 2011 01:51:07 +0200 From: Lars Magne Ingebrigtsen To: MON KEY Subject: Re: put `cl-floor', `cl-ceiling', `cl-truncate', `cl-round', and `cl-mod' side-effect-free In-Reply-To: (MON KEY's message of "Mon, 21 Jun 2010 18:36:22 -0400") Date: Thu, 14 Jul 2011 01:30:32 +0200 Message-ID: References: User-Agent: Gnus/5.110018 (No Gnus v0.18) Emacs/24.0.50 (gnu/linux) X-Now-Playing: Depeche Mode's _A Broken Frame_: "Leave in Silence" X-Hashcash: 1:23:110713:monkey@sandpframing.com::yuu0zw0/Ihm8+vRS:0000000000000000000000000000000000000039yl X-Hashcash: 1:23:110713:6488@debbugs.gnu.org::LZTiInENDQlOIEFm:00000000000000000000000000000000000000000NKlO MIME-Version: 1.0 Content-Type: text/plain X-MailScanner-ID: 1Qh9Ct-0007Rw-2B X-Netfonds-MailScanner: Found to be clean X-Netfonds-MailScanner-From: larsi@gnus.org MailScanner-NULL-Check: 1311205867.18848@MDSCmYGeqgfzh59HJQWkHQ X-Spam-Status: No X-Spam-Score: -2.7 (--) X-Debbugs-Envelope-To: 6488 Cc: 6488@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -2.7 (--) MON KEY writes: > And, if not, and in the off chnace that the byte-compiler would > benefit, would it be reasonable to put the 'side-effect-free property > on `cl-floor', `cl-ceiling', `cl-truncate', `cl-round', `cl-mod' as > they currently don't have it: I don't think this is worth doing. -- (domestic pets only, the antidote for overdose, milk.) bloggy blog http://lars.ingebrigtsen.no/ From unknown Mon Aug 11 19:05:57 2025 Received: (at fakecontrol) by fakecontrolmessage; To: internal_control@debbugs.gnu.org From: Debbugs Internal Request Subject: Internal Control Message-Id: bug archived. Date: Thu, 11 Aug 2011 11:24:07 +0000 User-Agent: Fakemail v42.6.9 # This is a fake control message. # # The action: # bug archived. thanks # This fakemail brought to you by your local debbugs # administrator