I’m never sure when assigning an aggregate that won’t fit on one line whether
to put the := at the end of the line before the aggregate (New_Cell below) or
at the beginning of the line on which the aggregate starts (Another_Cell below).
ada-mode 5.1.4 gets slightly confused about the second case, as indicated.
In the mean time, I’ll train myself to use the first form!
procedure Formatting is
New_Cell : Output_Cell :=
(Stream => Stream_Pointers.Create
(new ColdFrame.Memory_Streams.Stream_Type (Size)),
Copy => Stream_Pointers.Create
(new ColdFrame.Memory_Streams.Stream_Type (Size)));
Another_Cell : Output_Cell
:= (Stream => Stream_Pointers.Create
(new ColdFrame.Memory_Streams.Stream_Type (Size)), -- <<<<<<<
Copy => Stream_Pointers.Create
(new ColdFrame.Memory_Streams.Stream_Type (Size)));
begin
New_Cell :=
(Stream => Stream_Pointers.Create
(new ColdFrame.Memory_Streams.Stream_Type (Size)),
Copy => Stream_Pointers.Create
(new ColdFrame.Memory_Streams.Stream_Type (Size)));
Another_Cell
:= (Stream => Stream_Pointers.Create
(new ColdFrame.Memory_Streams.Stream_Type (Size)), -- <<<<<<<
Copy => Stream_Pointers.Create
(new ColdFrame.Memory_Streams.Stream_Type (Size)));
end Formatting;
_______________________________________________
Emacs-ada-mode mailing list
[email protected]
http://host114.hostmonster.com/mailman/listinfo/emacs-ada-mode_stephe-leake.org
