Here it is a simple QtAda program, which causes Segmentation fault with
throwing exception:
*raised PROGRAM_ERROR : adjust/finalize raised STORAGE_ERROR: stack
overflow (or erroneous memory access)
with Qt_Ada.Application;
with Qt4.Widgets;
with Qt4.Widgets.Constructors;
procedure Main is
begin
Qt_Ada.Application.Initialize;
declare
Widget : constant Qt4.Widgets.Q_Widget_Access
:= Qt4.Widgets.Constructors.Create;
X : Qt4.Q_Integer := Widget.Font_Metrics.Height; <--- Here
segfault occurs
begin
Widget.Show;
Qt_Ada.Application.Execute;
end;
end Main;
QtAda version: qtada-gpl-2.2.0-20090417-3265
GNAT GPL 2008 (20080521)
Copyright 1996-2008, Free Software Foundation, Inc.
Gentoo Linux x86_64
*
-------------- next part --------------
A non-text attachment was scrubbed...
Name: test.tar.gz
Type: application/gzip
Size: 606 bytes
Desc: not available
URL:
<http://lists.qtada.com/pipermail/qtada-users_lists.qtada.com/attachments/20090421/38915533/attachment.bin>
_______________________________________________
qtada-users mailing list
[email protected]
http://lists.qtada.com/mailman/listinfo/qtada-users_lists.qtada.com
