From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <jonathan.roewen@gmail.com>
Received: from nez-perce.inria.fr (nez-perce.inria.fr [192.93.2.78])
	by yquem.inria.fr (Postfix) with ESMTP id 8070ABB9C
	for <caml-list@yquem.inria.fr>; Fri, 23 Dec 2005 01:54:19 +0100 (CET)
Received: from zproxy.gmail.com (zproxy.gmail.com [64.233.162.201])
	by nez-perce.inria.fr (8.13.0/8.13.0) with ESMTP id jBN0sIhw025976
	for <caml-list@yquem.inria.fr>; Fri, 23 Dec 2005 01:54:19 +0100
Received: by zproxy.gmail.com with SMTP id j2so509158nzf
        for <caml-list@yquem.inria.fr>; Thu, 22 Dec 2005 16:54:18 -0800 (PST)
DomainKey-Signature: a=rsa-sha1; q=dns; c=nofws;
        s=beta; d=gmail.com;
        h=received:message-id:date:from:to:subject:in-reply-to:mime-version:content-type:content-transfer-encoding:content-disposition:references;
        b=J9+fsstFnAnHCpB0hxRxy9dt3OoZ902f5GC2yqOb7R4CY9fIbholwbkWdx/5B6KOXMU+LbTjbjM88bzjLisxGwcZkuNSv2ztFISgF/yjC9DjhjogqakHspJx1uHVMsd5ku5Gw8PaiHZpsYxJz5gZaXQFs+hCn7KUA9Jv2MEafOE=
Received: by 10.64.253.2 with SMTP id a2mr669542qbi;
        Thu, 22 Dec 2005 16:54:17 -0800 (PST)
Received: by 10.65.23.16 with HTTP; Thu, 22 Dec 2005 16:54:17 -0800 (PST)
Message-ID: <ad8cfe7e0512221654q7e4962fdw6b766dfbc1f23df0@mail.gmail.com>
Date: Fri, 23 Dec 2005 13:54:17 +1300
From: Jonathan Roewen <jonathan.roewen@gmail.com>
To: caml-list@yquem.inria.fr
Subject: Re: [Caml-list] toplevellib.cma broken?
In-Reply-To: <ad8cfe7e0512221346y255fd3d6s578f72a47946794c@mail.gmail.com>
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: quoted-printable
Content-Disposition: inline
References: <ad8cfe7e0512212157s71f81bcv2bb7556b03cc4f5@mail.gmail.com>
	 <ad8cfe7e0512212159g421e6143ya369c73378d4eadb@mail.gmail.com>
	 <ad8cfe7e0512220021t10bd53e4i9dbbed9fefc4c444@mail.gmail.com>
	 <ad8cfe7e0512221346y255fd3d6s578f72a47946794c@mail.gmail.com>
X-Miltered: at nez-perce with ID 43AB4ABA.000 by Joe's j-chkmail (http://j-chkmail.ensmp.fr)!
X-Spam: no; 0.00; caml-list:01 toplevellib:01 pervasives:01 debugging:01 rec:01 node:01 pervasives:01 functions:01 strings:01 cma:01 int:01 defined:01 defined:01 ident:02 ident:02 
X-Spam-Checker-Version: SpamAssassin 3.0.3 (2005-04-27) on yquem.inria.fr
X-Spam-Level: 
X-Spam-Status: No, score=0.0 required=5.0 tests=RCVD_BY_IP autolearn=disabled 
	version=3.0.3

> > But I have one really weird problem: all the symbols in Pervasives
> > aren't defined.
> >
> > Also: it seems to choke on strings, and invoking functions.
> >
> > For example: "Base_io.print_int 45;;" gets printed, but then it locks u=
p.
>
> Ahh, I'm making progress on the debugging front.

I have found the culprit function, in ident.ml:

let rec find_same id =3D function
    Empty ->
      DEBUG;
      raise Not_found
  | Node(l, k, r, _) ->
    DEBUG;
      let c =3D compare id.name k.ident.name in
      DEBUG;
      if c =3D 0 then (DEBUG;
        if id.stamp =3D k.ident.stamp
        then (DEBUG;k.data)
        else (DEBUG; find_stamp id.stamp k.previous)
      )else(DEBUG;
        find_same id (if c < 0 then l else r))

"let c =3D compare id.name k.ident.name in" gets stuck in an infinite
loop, so it seems we have a structure with a loop in it... is that
correct?

I can't think what else would cause it to not reach the DEBUG
statement after it.

Now begs the question: what the hell is going on? First no symbols
defined automatically from Pervasives, now Ident module is broken???

Jonathan