caml-list - the Caml user's mailing list
 help / color / mirror / Atom feed
From: james woodyatt <jhw@wetware.com>
To: Vitaly Lugovsky <vsl@ontil.ihep.su>
Cc: The Trade <caml-list@inria.fr>
Subject: Re: [Caml-list] let rec
Date: Wed, 15 Jan 2003 11:27:38 -0800	[thread overview]
Message-ID: <687F778F-28BF-11D7-9380-000393BA7EBA@wetware.com> (raw)
In-Reply-To: <Pine.LNX.4.52L.0301152209070.28020@ontil.ihep.su>

On Wednesday, Jan 15, 2003, at 11:15 US/Pacific, Vitaly Lugovsky wrote:
>
> let rec f (il,al,ht) =
>       let il2 = Array.make (n2+1) Lnil in
>       acopy il il2;
>       Array.iteri (fun i x -> il2.(all.(i)) <- x) al;
>       xprs (il2,anul,ht)
>     and xprs =
>       (Hashtbl.replace ht name (CTfun(f));
>        compile_exprs env2 exprs) in
>     f

I run into the same sort of problem all the time.  It's that 'let rec' 
requires the patten on the left to be a function (okay, there's a weird 
exception, but you don't care about it).

Try this:
	
     let rec f (il,al,ht) =
       let il2 = Array.make (n2+1) Lnil in
       acopy il il2;
       Array.iteri (fun i x -> il2.(all.(i)) <- x) al;
       xprs (il2,anul,ht)
     and xprs x =
       (Hashtbl.replace ht name (CTfun(f));
        compile_exprs env2 exprs) x in
     f


-- 
j h woodyatt <jhw@wetware.com>
that's my village calling... no doubt, they want their idiot back.

-------------------
To unsubscribe, mail caml-list-request@inria.fr Archives: http://caml.inria.fr
Bug reports: http://caml.inria.fr/bin/caml-bugs FAQ: http://caml.inria.fr/FAQ/
Beginner's list: http://groups.yahoo.com/group/ocaml_beginners


  reply	other threads:[~2003-01-15 19:27 UTC|newest]

Thread overview: 8+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2003-01-15 19:15 Vitaly Lugovsky
2003-01-15 19:27 ` james woodyatt [this message]
2003-01-15 19:54   ` Vitaly Lugovsky
2003-01-15 19:53 ` Max Kirillov
2003-01-16 14:38 ` Mike Potanin
2003-01-18 12:08   ` Damien Doligez
2003-01-18 15:31     ` Mike Potanin
2003-01-18 19:22     ` Vitaly Lugovsky

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=687F778F-28BF-11D7-9380-000393BA7EBA@wetware.com \
    --to=jhw@wetware.com \
    --cc=caml-list@inria.fr \
    --cc=vsl@ontil.ihep.su \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).