jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Some updates to the chicken documenatation, a few more fixes

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@7080 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
John Lenz 2005-03-17 22:19:46 +00:00
commit a09045ab5c
6 changed files with 136 additions and 55 deletions
Download patch file Download diff file Expand all files Collapse all files

12
Lib/exception.i
View file

@ -252,17 +252,15 @@ SWIGINTERN void SWIG_exception_(int code, const char *msg) {
#ifdef SWIGCHICKEN
%{
#define CHICKEN_MSG_BUF_LEN 1024
SWIGINTERN void SWIG_exception_(int code, const char *msg) {
char msg_buf[CHICKEN_MSG_BUF_LEN];
C_word *a;
C_word scmmsg;
C_word list;
sprintf (msg_buf, "Exception(%d): %.950s\n", code, msg);
a = C_alloc (C_SIZEOF_STRING (strlen (msg_buf)));
scmmsg = C_string2 (&a, msg_buf);
C_halt (scmmsg);
a = C_alloc (C_SIZEOF_STRING (strlen (msg)) + C_SIZEOF_LIST(2));
scmmsg = C_string2 (&a, (char *) msg);
list = C_list(&a, 2, C_fix(code), scmmsg);
SWIG_ThrowException(list);
}
#define SWIG_exception(a,b) SWIG_exception_((a),(b))
%}