Rewrite chicken example and test-suite building code

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@5948 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
John Lenz 2004-05-30 07:11:26 +00:00
commit acd0b021b1
35 changed files with 315 additions and 844 deletions

View file

@ -1674,15 +1674,9 @@ void
CHICKEN::addMethod(String *, String *scheme_name, String *function)
{
#ifndef BINDING
/* unless Chicken is run in case-sensitive mode, all symbols need
to be lowercase. Also, the symbols need the prefix. */
/* The symbols need the prefix. */
String *sym = NewString(prefix);
Append(sym, scheme_name);
char *s = Char(sym);
const int L = Len(sym);
for (int i=0; i < L; i++, s++) {
*s = tolower(*s);
}
/* add symbol to Chicken internal symbol table */
Printf(f_sym_size, "+C_SIZEOF_INTERNED_SYMBOL(%d)", Len(sym));