Mailing list for all users of the OCaml language and system.
 help / color / mirror / Atom feed
From: Brian Hurt <bhurt@spnz.org>
To: Dustin Sallings <dustin@spy.net>
Cc: Stefano Zacchiroli <zack@bononia.it>,
	Caml Mailing List <caml-list@inria.fr>
Subject: Re: [Caml-list] removing an item from a list efficiently
Date: Sat, 8 Nov 2003 12:57:16 -0600 (CST)	[thread overview]
Message-ID: <Pine.LNX.4.44.0311081253120.5009-100000@localhost.localdomain> (raw)
In-Reply-To: <8245A4CA-11C8-11D8-95B0-000393CFE6B8@spy.net>

On Sat, 8 Nov 2003, Dustin Sallings wrote:

> type 'a link = Nothing | Link of 'a t;;
> 
> type 'a t = {
>      data: 'a;
>      mutable prev: 'a link;
>      mutable next: 'a link;
> };;
> 
> 	But, link and t don't know about each other.  How does one go about 
> doing this kind of thing in ocaml?
>

Use and:

type 'a link = Nothing | Something of 'a t 
and 'a t = { data: 'a; mutable next: 'a link; mutable prev: 'a link }

The other alternative is to not redefine option:

type 'a t = 
    { data: 'a; mutable next: 'a t option; mutable prev: 'a t option } 

Brian

-- 
"Usenet is like a herd of performing elephants with diarrhea -- massive,
difficult to redirect, awe-inspiring, entertaining, and a source of
mind-boggling amounts of excrement when you least expect it."
                                - Gene Spafford 
Brian

-------------------
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


  parent reply	other threads:[~2003-11-08 18:00 UTC|newest]

Thread overview: 10+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2003-11-07  9:32 Dustin Sallings
2003-11-07  9:49 ` jrouquie
2003-11-07 12:46 ` Stefano Zacchiroli
2003-11-08  8:49   ` Dustin Sallings
2003-11-08  9:16     ` Stefano Zacchiroli
2003-11-09  1:13       ` Dustin Sallings
2003-11-08 10:59     ` Oleg Trott
2003-11-08 11:02       ` Oleg Trott
2003-11-08 18:57     ` Brian Hurt [this message]
2003-11-07 16:50 ` Brian Hurt

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=Pine.LNX.4.44.0311081253120.5009-100000@localhost.localdomain \
    --to=bhurt@spnz.org \
    --cc=caml-list@inria.fr \
    --cc=dustin@spy.net \
    --cc=zack@bononia.it \
    /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