Hi,
I have successfully embedded librep in a small toy of
mine and it's working fairly well.
Unfortunately, my Lisp isn't very good, so I'm causing
a lot of errors which are hard to track down because
I can't test without calls back into my C functions.
Looking around the headers, I see a Qerror_message
but I can't get anything but the empty string from it.
Stripped down, the code looks like:
DEFSYM(myfun, "myfun");
sub {
..
res = Fsymbol_value(Qmyfun, Qt);
if(!res || rep_NILP(res))
barf();
res = rep_call_lisp1(res, rep_box_pointer((void*)handle));
if(!res) {
complain("call returned NULL\n");
if(Qerror_message)
complain("error message: %s\n", rep_STR(Qerror_message));
return FAILED;
}
..
}
Am I doing something terribly wrong here?
Matthew.
|