>>>>> "Progga" == Progga <[EMAIL PROTECTED]> writes:
Progga> 1. (*) text/plain ( ) text/html
Progga> Here's a code snippet which uses the 'with-alien' function from the
Progga> ALIEN
Progga> package:
First, indent better:
(with-alien ((filename c-string)
(width int)
(height int)
(image_array (* (* unsigned-char))))
(setf filename (car *command-line-words*))
(extract-image filename
(addr width)
(addr height)
(addr image_array))
;;********************************************
(dotimes (w width))
;;********************************************
(setf (array2d image_array 100 100) 0)
(setf filename "del.jpg")
(save-image filename width height image_array))
Progga> This code works fine. But if I remove "( dotimes ( w
Progga> width ))" I get
Progga> the
Progga> following error when loading the fasl file:
Progga> Type-error in KERNEL::OBJECT-NOT-TYPE-ERROR-HANDLER:
Progga> #.(SYSTEM:INT-SAP #x48001020) is not of type ALIEN::ALIEN-VALUE
Since I don't know what extract-image, array2d, and save-image do,
it's kind of hard to figure out, but I suspect what you want and what
you do is wrong.
Can you send a backtrace? I suspect the (setf filename ...) is not
what you want.
Ray
