[Caml-list] custom toplevel with threads

[Caml-list] custom toplevel with threads

[Rolf Wester]

Hi,

I made a custom toplevel with:

ocamlmktop -custom -thread -o ocaml_all.exe  -I +labltk unix.cma nums.cma str.cma 
bigarray.cma labltk.cma -I +threads threads.cma

When running this toplevel it starts normally but as soon as I hit <return> the
toplevel excits without any message. When I make the toplevel omitting
threads.cma the toplevel works.

I'm using the native Windows OCaml3.04 distribution. Did I do anything wrong?
I would be appreciative for help.

Thanks in advance

Rolf Wester
-------------------------------------
Rolf Wester
rolf.wester@ilt.fraunhofer.de
-------------------
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

Re: [Caml-list] custom toplevel with threads

[mattwb]

From: "Rolf Wester" <wester@ilt.fhg.de>
Subject: [Caml-list] custom toplevel with threads
Date: Fri, 22 Mar 2002 10:47:48 +0200
Message-ID: <3C9B0BD4.5940.25DC91@localhost>
>
> Hi,
> 
> I made a custom toplevel with:
> 
> ocamlmktop -custom -thread -o ocaml_all.exe  -I +labltk unix.cma nums.cma str.cma 
> bigarray.cma labltk.cma -I +threads threads.cma
> 
> When running this toplevel it starts normally but as soon as I hit <return> the
> toplevel excits without any message. When I make the toplevel omitting
> threads.cma the toplevel works.
> 
> I'm using the native Windows OCaml3.04 distribution. Did I do anything wrong?
> I would be appreciative for help.
> 
> Thanks in advance
> 
> Rolf Wester
> -------------------------------------
> Rolf Wester
> rolf.wester@ilt.fraunhofer.de
> -------------------

The problem is on line 54 of the file
ocaml-3.04/otherlibs/systhreads/thread_win32.ml.  
Change

    let preempt signal = yield()

to:

    let preempt signal =
      if not (!Sys.interactive && signal=(-11)) then yield()

Then recompile ocaml-3.04
-------------------
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