Date: Thu, 24 Apr 2003 15:01:16 +0200 (CEST)
From: henridf at lcavsun1.epfl.ch
Reply-To: Henri DF <henri.dubois-ferriere at epfl.ch>
To: lablgtk at kaba.or.jp
Subject: bug when drawing#segments []
Message-ID: <Pine.LNX.4.44.0304241457080.24099-100000 at lcmpc4.epfl.ch>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII

Lablgtk crashes (runs out of memory) when you try draw an empty segments 
list.

This can be seen with a simple patch to lablgtk-1.2.5/examples/drawing.ml 
below.

Henri

--- drawing.ml	2003/04/24 14:50:10	1.1
+++ drawing.ml	2003/04/24 14:50:15
@@ -15,6 +15,7 @@ let redraw _ =
   drawing#polygon ~filled:true
     [ 10,100; 35,35; 100,10; 165,35; 190,100;
       165,165; 100,190; 35,165; 10,100 ];
+  drawing#segments [];
   false
 
 let _ =




[henri@ffnet: ~/newwork/caml] lablgtk /gig/caml/lablgtk-1.2.5/examples/drawing.ml
Out of memory during evaluation.