Làm cách nào để chuyển một mảng từ perl sang inline C++?

Question

Tôi không thể biết đây có phải là lỗi hay không.

Các mã sau đây làm việc với Inline::C nhưng không Inline::CPP

#!/usr/bin/perl 
use warnings; 
use Inline C; 

my @array = (1..10); 
print findAvLen(\@array), "\n"; 

__END__ 
__C__ 

int findAvLen(AV* arrayIn) { 
    return av_len(arrayIn); 
} 

Máy chạy trên tốt, nhưng thay thế C với CPP, và tôi nhận được lỗi Can't locate auto/main/findAvLen.al in @INC...

tôi có thể nhận inline khác C++ mã để làm việc . Ví dụ, có thể chuyển danh sách các biến sang mã nội tuyến bằng dấu chấm lửng như chúng in this example, nhưng tôi tự hỏi tại sao AV * không hoạt động! Ví dụ, tôi sẽ muốn sử dụng một chương trình con để chuyển đổi các mảng perl được chuyển tới C++ thành các vectơ, ví dụ: void perl2vector(AV* ar, std::vector<T> &v) {...}, thay vì chèn mã để thực hiện chuyển đổi như vậy vào mọi hàm C++ mà tôi viết có tham số mảng. Làm thế nào tôi có thể sử dụng cú pháp của ví dụ đó để chuyển mảng perl đến một trình chuyển đổi như vậy?

---

này dường như là một lỗi, nhưng trong khi chờ đợi, uesp đã tìm thấy một workaround:

int findAvLen(SV* arrRef) { 
    AV * arr = MUTABLE_AV(SvRV(arrRef)); 
    return av_len(arr); 
} 

arr tại là tương đương với arrayIn mong muốn trong các mã ví dụ trên.

Answer 1

Điều này có vẻ giống hệt với this Perl bug tồn tại trong 5.10.0 và phải được sửa trong bản phát hành 5.10.29. Nếu bạn đang chạy 5.10.0-28, hãy thử cập nhật. Nếu bạn không chạy các phiên bản này và vẫn gặp lỗi, bạn có thể thử thực hiện những gì được đề cập trong this forum post bằng cách thay đổi AV thành SV.