12 Nov
2013
12 Nov
'13
4:55 p.m.
On Mon, 11 Nov 2013 11:29:23 -0800 (PST), Joeish W said:
(defun get-cols-example () (let* ((matrix (create-mat 5 7 +8uc1+)) (submat (foreign-alloc `(:struct cv-mat) :initial-contents '()))) (get-cols matrix submat 0 3) (foreign-free submat)))
when i run the above code with the (get-cols matrix submat 0 3) line commented or without foreign-free it runs fine but as it is above i get below error
What are you trying to achieve by using :initial-contents '() in foreign-alloc? It is wrong because it causes foreign-alloc to make an array of 0 elements.
Also, assuming you don't return submat, then it looks like you should be using with-foreign-object here, rather than foreign-alloc and foreign-free.
__Martin