From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Tino Calancha Newsgroups: gmane.emacs.devel Subject: Re: humble proposal: New special form progn-1 Date: Wed, 27 Jul 2016 22:58:09 +0900 (JST) Message-ID: References: NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain; format=flowed; charset=US-ASCII X-Trace: ger.gmane.org 1469627934 18529 80.91.229.3 (27 Jul 2016 13:58:54 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Wed, 27 Jul 2016 13:58:54 +0000 (UTC) Cc: emacs-devel@gnu.org, Tino Calancha To: Andreas Schwab Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Wed Jul 27 15:58:31 2016 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1bSPLz-0002Gk-11 for ged-emacs-devel@m.gmane.org; Wed, 27 Jul 2016 15:58:31 +0200 Original-Received: from localhost ([::1]:46684 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bSPLy-00062b-8D for ged-emacs-devel@m.gmane.org; Wed, 27 Jul 2016 09:58:30 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:47176) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bSPLp-0005zl-GJ for emacs-devel@gnu.org; Wed, 27 Jul 2016 09:58:22 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bSPLk-0006Mj-EY for emacs-devel@gnu.org; Wed, 27 Jul 2016 09:58:21 -0400 Original-Received: from mail-pf0-x22a.google.com ([2607:f8b0:400e:c00::22a]:36480) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bSPLk-0006MQ-7G for emacs-devel@gnu.org; Wed, 27 Jul 2016 09:58:16 -0400 Original-Received: by mail-pf0-x22a.google.com with SMTP id h186so11231294pfg.3 for ; Wed, 27 Jul 2016 06:58:14 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113; h=from:date:to:cc:subject:in-reply-to:message-id:references :user-agent:mime-version; bh=xu2P3wHboeZgLBC631IHwp/GaU1VQo/npRMkmRr8+4M=; b=r/PbtGhqHbYitsD0ybPoafjvudTWOA77cUKM6LDHTtLGvLyprh+u2C/hyMbDyUJSWN B3S96VstvIfptA2DrTDxQsnRwHfkEMYQahRqUw7+ZXYACS02HjeWaWbDkt4duKNcIGMk 5sxdrVzMLXPRKeMqH/J3z2cYfdMBL08wJRVP/cj4G1eGBFywr3hHerxTQHtskPDtZ7B/ VBF5BefmYI5RNgBds3HBOVmcAIGzXiEt3Iqv/Yl8VjKkRcJ+DKxCARXFU7eD7F0qt6z8 Qm93jfQpffOtU3naumaeegIs2YqCKcTCh9yqRVPrL9gN3ZvHVu3UJLBO8lB/dKsSClJW 7KhQ== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20130820; h=x-gm-message-state:from:date:to:cc:subject:in-reply-to:message-id :references:user-agent:mime-version; bh=xu2P3wHboeZgLBC631IHwp/GaU1VQo/npRMkmRr8+4M=; b=MrZrsznIorZVK4Gw/y3z9zbdedVmrJRnxEA8iND8+Q/U3tcQxkj7V+s7n49uvjK1Ki 8y3E3nC+Y9n3a4Vt1Ixd34+mkW52P3wDTAEmoJ4u58OL1gUXXLOqeA+y/MxJ3Be9LUkO zeg5wcgOtGGSv0M1/mkuzNfI/69oXv/vcYkxz1erNGngdsR9zq1ttWPaTmuPZEGBKViX gtDh4TWH1H2ml/DZqYYmR5ngZ3iDHBuvRfDRmyHE3JH0lzA9GtNXCR6/YbaLIxtLPEb7 5GHwVfc0J6m2vC8CewlGIvzVXSwXkRYBNa62peq+7Ddzg+2OeJDPJpjje6jX8qr3rj2/ PQLg== X-Gm-Message-State: AEkoouvN8sKBen9SSPW3zl5TqdD98kUwrE+yvW7mHdxaZE/Cku//GZVTTSA4xcgpTE4TBA== X-Received: by 10.98.48.65 with SMTP id w62mr49659804pfw.18.1469627894168; Wed, 27 Jul 2016 06:58:14 -0700 (PDT) Original-Received: from calancha-pc ([210.160.37.26]) by smtp.gmail.com with ESMTPSA id ee3sm9592266pac.25.2016.07.27.06.58.11 (version=TLS1_2 cipher=ECDHE-RSA-AES128-GCM-SHA256 bits=128/128); Wed, 27 Jul 2016 06:58:13 -0700 (PDT) X-Google-Original-From: Tino Calancha X-X-Sender: calancha@calancha-pc In-Reply-To: User-Agent: Alpine 2.20 (DEB 67 2015-01-07) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 2607:f8b0:400e:c00::22a X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.21 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Original-Sender: "Emacs-devel" Xref: news.gmane.org gmane.emacs.devel:206178 Archived-At: On Wed, 27 Jul 2016, Andreas Schwab wrote: > On Mi, Jul 27 2016, Tino Calancha wrote: > >> * Other way to acomplish one usual task. > > How usual is that task? I will estimate it: Running following command on lisp dir: find lisp -type f -exec grep --color -InH -e regexp \{\} + 1) regexp = '(prog1 ' matches: 462 2) regexp = '(prog2 ' matches: 20 3) regexp = '(progn ' matches: 2262 I would say similar order of magnitude as 1), i.e., ~ 20% of 3) >> * Allow lower indentation level (see below): >> >> (progn-1 >> (form1) >> (form2) >> (form3) >> . >> . >> . >> (formN-1) >> (formN)) > > (progn > (form1) > ... > (prog1 > (formN-1) > (formN))) > Its also nice; maybe slightly more readable the first one. You know, it's matter of taste: 2 forms VS 1 form, like: (let ((i 1) (j 2)) (form)) compared with: (let ((i 1)) (let ((j 2)) (form))) Tino