[
Home
]
[ Index:
by date
|
by threads
]
[ Message by date: previous | next ] [ Message in thread: previous | next ] [ Thread: previous | next ]
[ Message by date: previous | next ] [ Message in thread: previous | next ] [ Thread: previous | next ]
| Date: | -- (:) |
| From: | Peng Zhang <pczhang@g...> |
| Subject: | Re: call ocaml from R |
Is it at all possible?
Following the manual, I know I can call ocaml when C is the main
program. I want to compile C file to Dynamic-link library, and call it
from R.
Can somebody help to answer it?
Thanks,
Peng
On Tue, Jun 24, 2008 at 10:17 PM, Peng Zhang <pczhang@gmail.com> wrote:
> Hi folks,
>
> I need some help from you. What I want to do is that my main program
> is in R and I want to implement part of it with ocaml.
>
> The following is an example.
>
> /* mysin.R */
> dyn.load("mysin.so")
> mysin <- function(x)
> .C("mysin", as.double(x), r = double(1))$r
>
> /* mycode.ml */
> let sin_ml x = sin x
> let _ = Callback.register "sin_ml" sin_ml
>
> I want to use sin defined in mycode.ml in mysin.R
>
> Then I write the following stub code
>
> /* mysin.c */
> #include <caml/mlvalues.h>
> #include <caml/memory.h>
> #include <caml/alloc.h>
> #include <caml/custom.h>
> #include <caml/callback.h>
>
> void mysin(double * x, double * r){
> value * closure_f;
> caml_startup(NULL);
> closure_f = caml_named_value("sin_ml");
> *r = Double_val(caml_callback(*closure_f, caml_copy_double(*x)));
> }
>
> It isn't working right now. What I am not sure about is what to put in
> caml_startup.
>
> Can somebody help with me this? Thank you very much!
>
> Best,
> Peng
>