GNU bug report logs - #272
indentation error in ada-mode

Previous Next

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 272 in the body.
You can then email your comments to 272 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

Message #5 received at submit <at> emacsbugs.donarmstrong.com (full text, mbox):

From: Allan Gottlieb <gottlieb <at> nyu.edu>
To: bug-gnu-emacs <at> gnu.org
Subject: indentation error in ada-mode
Date: Sat, 17 May 2008 18:20:14 -0400 (EDT)

ran emacs -Q

Following file is /tmp/tt.adb

procedure test(X : Integer) is
   Y : Integer;
begin
   case X is
      when 1 =>                         --  xxx
         if X > 5 then
         Y := 5;
         end if;
      when 2 =>
         if X > 5 then
            Y := 5;
         end if;
   end case;

The second when clause is indented properly the first is not.
The "cause" is the comment xxx.  If it is removed, indentation
is correct.

Thank you for emacs and for ada-mode; both of which are great.


In GNU Emacs 22.2.1 (i686-pc-linux-gnu, GTK+ Version 2.12.8)
 of 2008-05-15 on ajglap
Windowing system distributor `The X.Org Foundation', version 11.0.10300000
configured using `configure  '--prefix=/usr' '--host=i686-pc-linux-gnu' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--datadir=/usr/share' '--sysconfdir=/etc' '--localstatedir=/var/lib' '--program-suffix=-emacs-22' '--infodir=/usr/share/info/emacs-22' '--without-carbon' '--with-sound' '--with-x' '--with-toolkit-scroll-bars' '--with-jpeg' '--with-tiff' '--with-gif' '--with-png' '--with-xpm' '--with-x-toolkit=gtk' '--without-hesiod' '--without-kerberos' '--without-kerberos5' '--build=i686-pc-linux-gnu' 'build_alias=i686-pc-linux-gnu' 'host_alias=i686-pc-linux-gnu' 'CFLAGS=-O2 -march=prescott -pipe''

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: C
  locale-coding-system: nil
  default-enable-multibyte-characters: t

Major mode: Ada

Minor modes in effect:
  tooltip-mode: t
  mouse-wheel-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  blink-cursor-mode: t
  unify-8859-on-encoding-mode: t
  utf-translate-cjk-mode: t
  auto-compression-mode: t
  line-number-mode: t

Recent input:
<tab> <down> <tab> <down> <tab> <down> <tab> <down> 
<down> <tab> <down> <tab> <down> <tab> <down> <tab> 
<down> <tab> <down> <tab> <backspace> <backspace> <tab> 
<down> <tab> <down> <tab> <down> <tab> <tab> <backspace> 
<backspace> <backspace> C-x C-s M-x e m a c s - b u 
g <return> <backspace> <backspace> <backspace> <backspace> 
SPC SPC <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> b u g <tab> C-g C-g M-x a p 
r <return> b u g <return> <down-mouse-5> <mouse-5> 
<down-mouse-5> <mouse-5> <down-mouse-5> <mouse-5> <double-down-mouse-5> 
<double-mouse-5> <down-mouse-5> <mouse-5> <double-down-mouse-5> 
<double-mouse-5> <down-mouse-5> <mouse-5> <double-down-mouse-5> 
<double-mouse-5> <triple-down-mouse-5> <triple-mouse-5> 
<down-mouse-5> <mouse-5> <double-down-mouse-5> <double-mouse-5> 
<down-mouse-5> <mouse-5> <double-down-mouse-5> <double-mouse-5> 
<down-mouse-4> <mouse-4> <double-down-mouse-4> <double-mouse-4> 
<help-echo> M-x r e p o r t - e m <tab> <return>

Recent messages:
Loading advice...done
Loading ada-mode...done
Loading tabify...done
Wrote /tmp/tt.adb
Making completion list...
Quit [2 times]
Loading apropos...done
Loading emacsbug...
Loading regexp-opt...done
Loading emacsbug...done

Message #10 received at 272-done <at> emacsbugs.donarmstrong.com (full text, mbox):

From: "Juanma Barranquero" <lekktu <at> gmail.com>
To: 272-done <at> debbugs.gnu.org
Date: Mon, 28 Jul 2008 13:07:45 +0200

Fixed by this change:

2008-07-28  Stephen Leake  <stephen_leake <at> stephe-leake.org>

        * progmodes/ada-mode.el (ada-mode): Clean up XEmacs handling.
        Add support for add-log.
        (ada-end-stmt-re): Fix bug - allow comment after 'when'.

Message #15 received at 272 <at> emacsbugs.donarmstrong.com (full text, mbox):

From: Stephen Leake <stephen_leake <at> stephe-leake.org>
To: 272 <at> debbugs.gnu.org
Subject: indentation error in ada-mode
Date: Wed, 30 Jul 2008 06:46:26 -0400

This is now fixed in Emacs main CVS.

-- 
-- Stephe

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.