Cyclone Scheme  0.9
#define opaque_ptr (   x)    (((c_opaque)x)->ptr)

Access the Opaque's pointer