From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <krohrer@student.ethz.ch>
X-Spam-Checker-Version: SpamAssassin 3.1.3 (2006-06-01) on yquem.inria.fr
X-Spam-Level: 
X-Spam-Status: No, score=0.1 required=5.0 tests=AWL autolearn=disabled 
	version=3.1.3
X-Original-To: caml-list@yquem.inria.fr
Delivered-To: caml-list@yquem.inria.fr
Received: from concorde.inria.fr (concorde.inria.fr [192.93.2.39])
	by yquem.inria.fr (Postfix) with ESMTP id C28DCBC69
	for <caml-list@yquem.inria.fr>; Mon, 30 Jul 2007 10:22:20 +0200 (CEST)
Received: from XSMTP0.ethz.ch (xsmtp0.ethz.ch [82.130.70.14])
	by concorde.inria.fr (8.13.6/8.13.6) with ESMTP id l6U8MIHG010807
	for <caml-list@yquem.inria.fr>; Mon, 30 Jul 2007 10:22:20 +0200
Received: from xfe2.d.ethz.ch ([82.130.124.42]) by XSMTP0.ethz.ch with Microsoft SMTPSVC(6.0.3790.3959);
	 Mon, 30 Jul 2007 10:22:18 +0200
Received: from [10.0.1.3] ([80.219.210.76]) by xfe2.d.ethz.ch over TLS secured channel with Microsoft SMTPSVC(6.0.3790.3959);
	 Mon, 30 Jul 2007 10:22:17 +0200
In-Reply-To: <20070730054047.GA11678@jiyu.gnu>
References: <950BC328-B571-4736-A779-8E3EE9CF6F3E@student.ethz.ch> <20070730054047.GA11678@jiyu.gnu>
Mime-Version: 1.0 (Apple Message framework v752.3)
Content-Type: text/plain; charset=US-ASCII; delsp=yes; format=flowed
Message-Id: <A8B2857F-4F5E-41DF-BF8D-5F8451E88EA3@student.ethz.ch>
Cc: caml-list@yquem.inria.fr
Content-Transfer-Encoding: 7bit
From: Kaspar Rohrer <krohrer@student.ethz.ch>
Subject: Re: [Caml-list] Native multithreaded LablGTK2?
Date: Mon, 30 Jul 2007 10:22:17 +0200
To: Julien Moutinho <julien.moutinho@gmail.com>
X-Mailer: Apple Mail (2.752.3)
X-OriginalArrivalTime: 30 Jul 2007 08:22:17.0700 (UTC) FILETIME=[BDE79240:01C7D282]
X-Miltered: at concorde with ID 46AD9FBA.001 by Joe's j-chkmail (http://j-chkmail . ensmp . fr)!
X-Spam: no; 0.00; lablgtk:01 lablgtk:01 ocamlfind:01 -predicates:01 cmxa:01 gtkthread:01 cmx:01 lablgl:01 ocamlfind:01 -predicates:01 lablgl:01 cmxa:01 gtkinit:01 cmx:01 gtkthread:01 

On 30.07.2007, at 07:40, Julien Moutinho wrote:

> Check the META.lablgtk2 file:
> $ ocamlfind query lablgtk2 -format "%A" -predicates native,mt
> lablgtk.cmxa gtkThread.cmx
>
> If you get this, lablgtk2 is not likely to be guilty.
Ok, I rechecked this: I think the lablgtk2 META file is the culprit:
I'm using OpenGL. So if I add the lablGL predicate, I effectively get  
this:

$ ocamlfind query lablgtk2 -format "%A" -predicates native,mt,lablGL
lablgtk.cmxa lablgtkgl.cmxa lablglade.cmxa lablgnomecanvas.cmxa  
lablgnomeui.cmxa lablpanel.cmxa gtkInit.cmx gtkThread.cmx gtkThread.cmx

Which explains the error. But how would I fix this?

$ more META
description = "Bindings for gtk2"
requires=""
requires(lablGL)="lablGL"
version="20051028"
archive(byte)="lablgtk.cma  lablglade.cma lablgnomecanvas.cma  
lablgnomeui.cma lablpanel.cma gtkInit.
cmo"
archive(native)="lablgtk.cmxa  lablglade.cmxa lablgnomecanvas.cmxa  
lablgnomeui.cmxa lablpanel.cmxa g
tkInit.cmx"
archive(byte,lablGL)="lablgtk.cma lablgtkgl.cma  lablglade.cma  
lablgnomecanvas.cma lablgnomeui.cma l
ablpanel.cma gtkInit.cmo"
archive(native,lablGL)="lablgtk.cmxa lablgtkgl.cmxa  lablglade.cmxa  
lablgnomecanvas.cmxa lablgnomeui
.cmxa lablpanel.cmxa gtkInit.cmx"
archive(byte,mt) += "gtkThread.cmo"
archive(native,mt) += "gtkThread.cmx"
archive(byte,lablGL,mt) += "gtkThread.cmo"
archive(native,lablGL,mt) += "gtkThread.cmx"
archive(toploop,mt) += "gtkThInit.cmo"