Stephen Leake <[email protected]> writes:
> Stephen Leake <[email protected]> writes:
>
> It indents as:
>
> subtype Integer_String is String
> with Dynamic_Predicate => Integer'Value (Integer_String) in Integer
> or else raise Constraint_Error with "not an integer string";
>
> type Integer_String is new String
> with Dynamic_Predicate => Integer'Value (Integer_String) in Integer or
> else
> raise Constraint_Error with "not an integer string";
It looks a little odd when ada-indent-record-rel-type is 3:
type Limited_Derived_Type_1 is abstract limited new Private_Type_1 with
record
Component_1 : Integer := 0;
Component_2 : Integer := 1;
Component_3 : Integer := 2;
end record
with Pack => True;
--
-- Stephe
_______________________________________________
Emacs-ada-mode mailing list
[email protected]
http://host114.hostmonster.com/mailman/listinfo/emacs-ada-mode_stephe-leake.org