[Caml-list] problem with array access in a c function

[Caml-list] problem with array access in a c function

[Joel Reymont]

The types are at the bottom here, in the Poll module:

https://github.com/wagerlabs/ocaml-zmq/blob/master/src/ZMQ.ml

The C function in question is caml_zmq_poll_of_pollitem_array here:

https://github.com/wagerlabs/ocaml-zmq/blob/master/src/poll.c

I can grab the number of elements in the array just fine, e.g.
	
	int n = Wosize_val(pollitem_array); 

This will give me n of 1 or 2, depending on the number of tuples in the array. 

This sets current_elem to 0x400 (1024)

	current_elem = Field(pollitem_array, n); 

This returns 1

	int block = Is_block(current_elem); 

And this crashes

	int tag = Tag_val(current_elem); 

Subsequent attempts to pull out the custom data crash as well. 

Interestingly enough, Field(current_value, 0) and Field(current_value, 1) are 8 bytes apart. 

I'm on a 64-bit machine and I expect tuple elements to be pointers since one is a custom block and the other a variant.

What am I doing wrong?

	Thanks, Joel

--------------------------------------------------------------------------
- for hire: mac osx device driver ninja, kernel extensions and usb drivers
---------------------+------------+---------------------------------------
http://wagerlabs.com | @wagerlabs | http://www.linkedin.com/in/joelreymont
---------------------+------------+---------------------------------------

[Caml-list] Re: problem with array access in a c function

[Joel Reymont]

On May 15, 2011, at 3:50 PM, Joel Reymont wrote:

> This sets current_elem to 0x400 (1024)
> 
> 	current_elem = Field(pollitem_array, n); 

I'm an idiot, forgive me! A fresh look by ygrek immediately pointed out the issue above ;-).

Problem solved!

--------------------------------------------------------------------------
- for hire: mac osx device driver ninja, kernel extensions and usb drivers
---------------------+------------+---------------------------------------
http://wagerlabs.com | @wagerlabs | http://www.linkedin.com/in/joelreymont
---------------------+------------+---------------------------------------