如何在0(1)运算中将c++向量转换为lisp向量

How would I convert a c++ vector to a lisp vector in a 0(1) operation

本文关键字:向量 c++ 转换 lisp 运算      更新时间:2023-10-16

我有C++vector<int>的这些C绑定,我已经将其封装在CFFI中。

我知道如何用std_carrayTovector创建vector<int>,并用std_vectorToCArray将数据转换回int指针,这样我就可以使用CFFI函数MEM-AREF在Lisp中从中检索数据。我已经为以下内容编写了正确的defcfun

我的问题是:如何将std_vectorToCArraydefcfun的输出转换为Lisp向量(例如#(1 2 3)),并使其成为O(1)运算——即同时复制所有数据。

vector_int* std_carrayTovector(int* a, size_t len) {
    vector<int>* v = new vector<int>;
    for(size_t i = 0; i < len; i++) 
        v->push_back(a[i]);
    return v;
}
int* std_vectorToCArray(vector_int* s) {
    return s->data();
}

(defcfun ("std_vectori_to_carray" %vector-int-to-c-array) :pointer 
  (s (:pointer vector-int)))

我还没有尝试过,但我认为以下方法应该有效。关于std::vector,我们可以使用的重要一点是,它保证有一个诚实的阵列支持。也就是说,& my_vector [0]指向my_vector的对象的阵列。(当然,这对std::list或其他任何东西都不起作用)

所以你所要做的就是(在你的C++代码中)制作一个CFFI可以调用的函数,它返回一个指向向量开头的指针。大概是这样的:

extern "C"
Foo*
start_of_foo_vector (std::vector<Foo> vec)
{
    return & vec[0];
}

你会想要一个extern "C",这样你就不必担心名字被篡改了。当然,您必须为每种类型编写不同的函数(我不认为不能将模板和extern "C"一起使用)。

在下一次修改矢量之前,所获得的指针是有效的。