http://gcc.gnu.org/bugzilla/show_bug.cgi?id=48995
Summary: Function called twice during initialization of an allocated packed unconstrained array. Product: gcc Version: unknown Status: UNCONFIRMED Severity: normal Priority: P3 Component: ada AssignedTo: unassig...@gcc.gnu.org ReportedBy: roda...@tpg.com.au Created attachment 24246 --> http://gcc.gnu.org/bugzilla/attachment.cgi?id=24246 simple test case code Please see the attached archive for a reproducer of this issue. The expected output can be obtained by constraining the declaration of Media.Image, or by removing the "pragma Pack (Image);" from the specification of the Media package. It is understood that this problem has been resolved within AdaCores private codebase. Discussion on 'comp.lang.ada' of the problem may be found at: http://groups.google.com/group/comp.lang.ada/browse_thread/thread/75d2eb9e2e52a8c5#