Georg Bauhaus <[email protected]> writes:

> Hi,
>
> when trying to write
>
>   type T1 is
>     new T0 with private;
>
> indentation fails. Is this just me?

I can reproduce this. I found a similar error recently; here's a patch
that fixes both:

============================================================
--- ada-wisi.el b9de0c8d2b1a0c34aeea64cce630983ac1d6c2ba
+++ ada-wisi.el 739f9d07bdcf86fd15b6abf1a11e6745c6bf04c0
@@ -507,6 +507,13 @@ point must be on CACHE. PREV-TOKEN is th
                 ;; indenting 'with'
                 (+ (current-column) 1))
 
+               (association_list
+                ;; test/ada_mode-parens.adb
+                ;; Local_13 : Local_11_Type
+                ;;   := (Integer'(1),
+                ;;       Integer'(2));
+                (ada-wisi-indent-cache 0 containing))
+
                (association_opt
                 ;; test/indent.ads
                 ;; 1 =>  --  Used to be aligned on "CSCL_Type'"
@@ -608,6 +615,12 @@ point must be on CACHE. PREV-TOKEN is th
                    (+ (current-indentation) ada-indent-broken))
                   ))
 
+               (private_extension_declaration
+                ;; test/ada_mode-nominal.ads
+                ;; type Limited_Derived_Type_3 is abstract limited
+                ;;   new Private_Type_1 with private;
+                (+ (current-indentation) ada-indent-broken))
+
                (private_type_declaration
                 ;; test/aspects.ads
                 ;; type Vector is tagged private

-- 
-- Stephe

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

Reply via email to