From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Vinicius Jose Latorre Newsgroups: gmane.emacs.devel Subject: Re: Customizing the VC backend order Date: Fri, 10 Aug 2007 11:59:51 -0300 Message-ID: <46BC7D67.2070705@ig.com.br> References: <85wsw4lzt8.fsf@lola.goethe.zz> <85sl6slz9f.fsf@lola.goethe.zz> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit X-Trace: sea.gmane.org 1186757915 10875 80.91.229.12 (10 Aug 2007 14:58:35 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Fri, 10 Aug 2007 14:58:35 +0000 (UTC) Cc: Stefan Monnier , Emacs Devel To: David Kastrup Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Fri Aug 10 16:58:31 2007 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1IJVwc-0002Lq-Vi for ged-emacs-devel@m.gmane.org; Fri, 10 Aug 2007 16:58:31 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1IJVwc-0005N0-HM for ged-emacs-devel@m.gmane.org; Fri, 10 Aug 2007 10:58:30 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1IJVwY-0005Ks-S1 for emacs-devel@gnu.org; Fri, 10 Aug 2007 10:58:26 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1IJVwX-0005Js-Ts for emacs-devel@gnu.org; Fri, 10 Aug 2007 10:58:26 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1IJVwX-0005Jp-Pp for emacs-devel@gnu.org; Fri, 10 Aug 2007 10:58:25 -0400 Original-Received: from an-out-0708.google.com ([209.85.132.248]) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1IJVwX-0006dV-DN for emacs-devel@gnu.org; Fri, 10 Aug 2007 10:58:25 -0400 Original-Received: by an-out-0708.google.com with SMTP id c25so133647ana for ; Fri, 10 Aug 2007 07:58:23 -0700 (PDT) DKIM-Signature: a=rsa-sha1; c=relaxed/relaxed; d=gmail.com; s=beta; h=domainkey-signature:received:received:message-id:date:from:user-agent:mime-version:to:cc:subject:references:in-reply-to:content-type:content-transfer-encoding:sender; b=i8Qc+IaTbMVSTQKjl+ANhZ2JceJj3IBl0yAhxTE941id5/rgsyH5gfxQIFHRLlBkE9sA4oh/tiB9O2gMk1142j4JxKpDEiHhiKsWqLUCWXUa+cUiwDSJmQAR6kwKhAfw0bbGBKHMqsOOT0WSj/99XgEV6L9/eElAGguIvzoxQ50= DomainKey-Signature: a=rsa-sha1; c=nofws; d=gmail.com; s=beta; h=received:message-id:date:from:user-agent:mime-version:to:cc:subject:references:in-reply-to:content-type:content-transfer-encoding:sender; b=TjeAIoKqsYHo0eDIZAFcHvWA/DVVUmGpdwCLBaCvPKtEB0ctNgN2c8mT61QgCmTmak0CM8IW8gHAePCX5NoeICEYz3H/gSDhVTyXGcT/7WmpyfD4hdPeVn2zbkGjC5iBE3mWlkJGD92jhlMviTg2KTLrmc3PZqUArZMm8/CGPNQ= Original-Received: by 10.100.128.8 with SMTP id a8mr3217758and.1186757903777; Fri, 10 Aug 2007 07:58:23 -0700 (PDT) Original-Received: from ?201.82.142.28? ( [201.82.142.28]) by mx.google.com with ESMTPS id d29sm3650058and.2007.08.10.07.58.20 (version=TLSv1/SSLv3 cipher=RC4-MD5); Fri, 10 Aug 2007 07:58:22 -0700 (PDT) User-Agent: Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.8.1.6) Gecko/20070802 SeaMonkey/1.1.4 In-Reply-To: <85sl6slz9f.fsf@lola.goethe.zz> X-Detected-Kernel: Linux 2.6 (newer, 2) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:76324 Archived-At: David Kastrup wrote: > [...] > Well, at least when you actually _read_ the line once. So try the > following example. Can you figure out what happens? > > (setq xxx (copy-sequence vc-handled-backends)) > (dotimes (i 3) > (setq xxx (nconc '(Hg) (delq 'Hg xxx)))) > xxx > Hummm, interesting, see: ;; 1 time M-: (progn (setq xxx (copy-sequence vc-handled-backends)) (setq xxx (nconc '(Hg) (delq 'Hg xxx))) xxx) RET ==> (Hg RCS CVS SCCS Bzr Git Arch MCVS) ;; 2 times M-: (progn (setq xxx (copy-sequence vc-handled-backends)) (setq xxx (nconc '(Hg) (delq 'Hg xxx))) (setq xxx (nconc '(Hg) (delq 'Hg xxx))) xxx) RET ==> (Hg RCS CVS SCCS Bzr Git Arch MCVS) ;; 3 times M-: (progn (setq xxx (copy-sequence vc-handled-backends)) (setq xxx (nconc '(Hg) (delq 'Hg xxx))) (setq xxx (nconc '(Hg) (delq 'Hg xxx))) (setq xxx (nconc '(Hg) (delq 'Hg xxx))) xxx) RET ==> (Hg RCS CVS SCCS Bzr Git Arch MCVS) ;; dotimes M-: (progn (setq xxx (copy-sequence vc-handled-backends)) (dotimes (i 3) (setq xxx (nconc '(Hg) (delq 'Hg xxx)))) xxx) RET ==> INFINITE LOOP!!!! ?