USING: alien.c-types classes.struct ; STRUCT: device_info { id int } { name char* } ; SPECIALIZED-ARRAY: device_info FUNCTION: device_info* get_device_info ( int* length ) ; 0 [ get_device_info ] keep *int .