From: Jeff Polakow <jeff.polakow@db.com>
To: Andrej.Bauer@andrej.com
Cc: Caml <caml-list@inria.fr>, caml-list-bounces@yquem.inria.fr
Subject: Re: [Caml-list] Local references in Ocaml vs. state in Haskell
Date: Fri, 23 Nov 2007 10:50:07 -0500 [thread overview]
Message-ID: <OFD6B9BCB3.F4EE06AA-ON8525739C.0056DDFC-8525739C.0056FD27@db.com> (raw)
In-Reply-To: <4746A860.3000106@fmf.uni-lj.si>
[-- Attachment #1: Type: text/plain, Size: 2305 bytes --]
Hello,
The ocaml code can be directly translatedto Haskell using the ST monad
and STRef.
-Jeff
caml-list-bounces@yquem.inria.fr wrote on 11/23/2007 05:16:00 AM:
> I have some programs written in ocaml that use references. I wanted to
> translate them to Haskell, but since I am not an active Haskell user, I
> got stuck with a very simple problem, namely, that the state monad in
> Haskell provides _global_ references while ocaml has _local_ references.
>
> Suppose in ocaml I have this:
>
> (* Does a functional [f] look at its argument [a]? *)
> let touched f a =
> let flag = ref false in
> let _ = f (fun n -> flag := true; a n) in
> !flag
>
> "touched f a" evaluates "f a" and records the fact that f actually
> evaluated a at some argument. Note that flag is a local reference, so f
> does not have access to it.
>
> Using a global flag does not work:
>
> let flag = ref false
>
> let touched' f a =
> flag := false ;
> let _ = f (fun n -> flag := true; a n) in
> !flag
>
> Now we can write an f which touches its argument but fools touched' by
> reversing the value of flag.
>
> let f a =
> let y = a 42 in
> touched := false ; y
>
> If I try to use the State monad I will get a global reference threaded
> thrugh the computation, and f will have access to it. I want a local
> reference that is inaccessible outside its lexical scope. I am probably
> missing something obvious about Haskell.
>
> I am hoping that even though this is a question about Haskell, you won't
> mind, as it gives everyone on this list an opportunity to show how ocaml
> is superior to Haskell. Just kidding :-)
>
> Andrej
>
> _______________________________________________
> Caml-list mailing list. Subscription management:
> http://yquem.inria.fr/cgi-bin/mailman/listinfo/caml-list
> Archives: http://caml.inria.fr
> Beginner's list: http://groups.yahoo.com/group/ocaml_beginners
> Bug reports: http://caml.inria.fr/bin/caml-bugs
---
This e-mail may contain confidential and/or privileged information. If you
are not the intended recipient (or have received this e-mail in error)
please notify the sender immediately and destroy this e-mail. Any
unauthorized copying, disclosure or distribution of the material in this
e-mail is strictly forbidden.
[-- Attachment #2: Type: text/html, Size: 3072 bytes --]
prev parent reply other threads:[~2007-11-23 15:50 UTC|newest]
Thread overview: 2+ messages / expand[flat|nested] mbox.gz Atom feed top
2007-11-23 10:16 Andrej Bauer
2007-11-23 15:50 ` Jeff Polakow [this message]
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=OFD6B9BCB3.F4EE06AA-ON8525739C.0056DDFC-8525739C.0056FD27@db.com \
--to=jeff.polakow@db.com \
--cc=Andrej.Bauer@andrej.com \
--cc=caml-list-bounces@yquem.inria.fr \
--cc=caml-list@inria.fr \
/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