Hi Thorsten,

welcome back! :)

> I'm playing around with the native function again (after a long long time
> ;-) and somehow I don't manage to call a native wrapper with double arg.

> 
> Using rmath from R, random value from poisson distribution:^
>  ## double›  rpois(double);
> ...
> This works
> : (native "libRmath.so" "rpois" 1.0 (2.567 . 1.0))
> ...
> but this dumps
> : (de rpois (X) (native "libRmath.so" "rpois" 1.0  (X . 1.0) ) )
> ...
> When I debug it, X=3 when the function is called.

The problem is (X . 1.0), it calls 'X' as a function.

So this would work:

   : (de rpois (X)
      (native "libRmath.so" "rpois" 1.0 (cons X 1.0) ) )

☺/ A!ex

-- 
UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe

Reply via email to