Hi,

I am using the latest ada-mode from monotone repo. The attached code
demonstrates wrong indentation of "is" in expression function
definition.

I also attached a patch that works for me.

-- Piotr
#
# old_revision [7f3ebb8b84d91f026f472a06a25ff6bcdff529d1]
#
# patch "ada-grammar.wy"
#  from [c58d885764d7918d16bf5992ec88d36055de39a7]
#    to [501092a84f08896304d21c2515bdd8c31d109c2b]
#
============================================================
--- ada-grammar.wy      c58d885764d7918d16bf5992ec88d36055de39a7
+++ ada-grammar.wy      501092a84f08896304d21c2515bdd8c31d109c2b
@@ -960,7 +960,7 @@ expression_function_declaration
   : overriding_indicator_opt function_specification IS paren_expression 
aspect_specification_opt SEMICOLON
  ;; IS does not start a block, so it is not cached
     (progn
-      (wisi-statement-action [1 statement-start 2 statement-other 6 
statement-end])
+      (wisi-statement-action [1 statement-start 2 statement-other 3 
block-middle 6 statement-end])
       (wisi-containing-action 2 4)
       (wisi-containing-action 2 5))
   ;
package body P1 is

   function Fun1 (Arg : Boolean)
                  return Boolean
                    is            --  wrong indentiation of "is"
     (True);

   function Fun2 (Arg : Boolean)
                  return Boolean
   is                             --  correct indentation of "is"
   begin
      return True;
   end Fun2;

end;
_______________________________________________
Emacs-ada-mode mailing list
[email protected]
http://host114.hostmonster.com/mailman/listinfo/emacs-ada-mode_stephe-leake.org

Reply via email to