From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Stephen Leake Newsgroups: gmane.emacs.bugs Subject: bug#56236: Package: emacs, ada-mode Date: Tue, 28 Jun 2022 16:55:33 -0700 Message-ID: <867d502vii.fsf@stephe-leake.org> References: <302935684.2763160.1656258301795.ref@mail.yahoo.com> <302935684.2763160.1656258301795@mail.yahoo.com> <87ilonctee.fsf@gnus.org> <1632297600.4892837.1656259625032@mail.yahoo.com> <87edzbcsog.fsf@gnus.org> <2026151234.5124962.1656347169126@mail.yahoo.com> <87letgq5u4.fsf@gnus.org> Mime-Version: 1.0 Content-Type: text/plain Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="8676"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/29.0.50 (windows-nt) To: 56236@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Wed Jun 29 01:56:10 2022 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1o6L3x-00023u-QM for geb-bug-gnu-emacs@m.gmane-mx.org; Wed, 29 Jun 2022 01:56:10 +0200 Original-Received: from localhost ([::1]:39370 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1o6L3w-0003cH-A7 for geb-bug-gnu-emacs@m.gmane-mx.org; Tue, 28 Jun 2022 19:56:08 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:35372) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1o6L3q-0003c9-9f for bug-gnu-emacs@gnu.org; Tue, 28 Jun 2022 19:56:02 -0400 Original-Received: from debbugs.gnu.org ([209.51.188.43]:34516) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1o6L3q-0005MF-1J for bug-gnu-emacs@gnu.org; Tue, 28 Jun 2022 19:56:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1o6L3p-00061g-UN for bug-gnu-emacs@gnu.org; Tue, 28 Jun 2022 19:56:01 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Stephen Leake Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Tue, 28 Jun 2022 23:56:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 56236 X-GNU-PR-Package: emacs Original-Received: via spool by 56236-submit@debbugs.gnu.org id=B56236.165646054823141 (code B ref 56236); Tue, 28 Jun 2022 23:56:01 +0000 Original-Received: (at 56236) by debbugs.gnu.org; 28 Jun 2022 23:55:48 +0000 Original-Received: from localhost ([127.0.0.1]:56646 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1o6L3c-00061B-86 for submit@debbugs.gnu.org; Tue, 28 Jun 2022 19:55:48 -0400 Original-Received: from gproxy4-pub.mail.unifiedlayer.com ([69.89.23.142]:36855) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1o6L3W-00060t-AT for 56236@debbugs.gnu.org; Tue, 28 Jun 2022 19:55:47 -0400 Original-Received: from cmgw10.mail.unifiedlayer.com (unknown [10.0.90.125]) by progateway6.mail.pro1.eigbox.com (Postfix) with ESMTP id 88ED310047D67 for <56236@debbugs.gnu.org>; Tue, 28 Jun 2022 23:55:36 +0000 (UTC) Original-Received: from host2007.hostmonster.com ([67.20.76.71]) by cmsmtp with ESMTP id 6L3QowbFANVEz6L3QoXlzw; Tue, 28 Jun 2022 23:55:36 +0000 X-Authority-Reason: nr=8 X-Authority-Analysis: v=2.4 cv=I5+g+Psg c=1 sm=1 tr=0 ts=62bb94f8 a=dWLzHQi6WpdymmZIwiVdBw==:117 a=HlCpoMJyzbfmKqni6+j5Yg==:17 a=dLZJa+xiwSxG16/P+YVxDGlgEgI=:19 a=JPEYwPQDsx4A:10:nop_rcvd_month_year a=vvvmwbhNdt4A:10:endurance_base64_authed_username_1 a=xo9wN3ZvbqB8iDzAtNEA:9 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=stephe-leake.org; s=default; h=Content-Type:MIME-Version:Message-ID: In-Reply-To:Date:References:Subject:To:From:Sender:Reply-To:Cc: Content-Transfer-Encoding:Content-ID:Content-Description:Resent-Date: Resent-From:Resent-Sender:Resent-To:Resent-Cc:Resent-Message-ID:List-Id: List-Help:List-Unsubscribe:List-Subscribe:List-Post:List-Owner:List-Archive; bh=pTTp4tlRqD85aypsPV83DtdoF+m0wfUIoyXeD5nha0Q=; b=Z3sDlUvoAdV/cqhG9Egz7n8axq xwu0vosLA6if/V+C3j8zfMUkDT/mcPAppBOZXxHThW/jGdkHsgU9VdDgh5xtG+QpBu0Ed1nHNbudl SUQw1ZFa4EvlNLUUGEPnXm5g6eCEIJ9uMw7+X6SM5YEvvCHZMfPNnl+41lc+vHfFBIgivc1JShFIB qUk3Giutc9p3gSeW9mS2wV0LQowQlT28lM4j3IZwWqZghnV8U8MDEkaW1/rt/oVJ0NKuJhNY2OWzu R2meU0dHfVUZ87r98umRm85PAlA5L9WNPfgvopomKvRgf3dRZI4wL+G6dH9P6kKLx0P/ClgR/zPMf Hy+aX58A==; Original-Received: from 192-184-171-126.fiber.dynamic.sonic.net ([192.184.171.126]:52540 helo=Takver4) by host2007.hostmonster.com with esmtpsa (TLS1.2) tls TLS_ECDHE_RSA_WITH_AES_256_GCM_SHA384 (Exim 4.95) (envelope-from ) id 1o6L3Q-001mK5-6v for 56236@debbugs.gnu.org; Tue, 28 Jun 2022 17:55:36 -0600 In-Reply-To: <87letgq5u4.fsf@gnus.org> (Lars Ingebrigtsen's message of "Tue, 28 Jun 2022 15:24:03 +0200") X-AntiAbuse: This header was added to track abuse, please include it with any abuse report X-AntiAbuse: Primary Hostname - host2007.hostmonster.com X-AntiAbuse: Original Domain - debbugs.gnu.org X-AntiAbuse: Originator/Caller UID/GID - [47 12] / [47 12] X-AntiAbuse: Sender Address Domain - stephe-leake.org X-BWhitelist: no X-Source-IP: 192.184.171.126 X-Source-L: No X-Exim-ID: 1o6L3Q-001mK5-6v X-Source-Sender: 192-184-171-126.fiber.dynamic.sonic.net (Takver4) [192.184.171.126]:52540 X-Source-Auth: stephen_leake@stephe-leake.org X-Email-Count: 1 X-Source-Cap: c3RlcGhlbGU7c3RlcGhlbGU7aG9zdDIwMDcuaG9zdG1vbnN0ZXIuY29t X-Local-Domain: yes X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Original-Sender: "bug-gnu-emacs" Xref: news.gmane.io gmane.emacs.bugs:235580 Archived-At: The development verison of ada-mode parses this, and indents it nicely: procedure Absolute_Difference (X, Y : Integer; Diff : out Integer) with Post => (declare Min : constant Integer := Integer'Min (X, Y); Max : constant Integer := Integer'Max (X, Y); begin Diff = Max - Min) is begin Diff := abs X - Y; end Absolute_Difference; Time for a new release. -- -- Stephe