[guile] Fix the guile examples on 64-bit platforms.

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@10074 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Olly Betts 2007-10-30 01:08:24 +00:00
commit 97ce2ae61a
5 changed files with 11 additions and 17 deletions

View file

@ -58,7 +58,9 @@ extern int count(char *bytes, int len, char c);
/* This example shows how to wrap a function that mutates a string */
%typemap(in) (char *str, int len) {
$1 = gh_scm2newstr($input,&$2);
size_t temp;
$1 = gh_scm2newstr($input,&temp);
$2 = temp;
}
/* Return the mutated string as a new object. */