String *
Swig_clocal(SwigType *t, String_or_char *name, String_or_char *value) {
String *decl;
decl = NewString("");
switch(SwigType_type(t)) {
case T_REFERENCE:
if (value) {
Printf(decl,"%s = (%s) &%s_defvalue", SwigType_lstr(t,name), SwigType_lstr(t,0), name);
} else {
Printf(decl,"%s = 0", SwigType_lstr(t,name));
}
break;
case T_VOID:
break;
case T_VARARGS:
Printf(decl,"void *%s = 0", name);
break;
default:
if (value) {
Printf(decl,"%s = (%s) %s", SwigType_lstr(t,name), SwigType_lstr(t,0), SwigType_lcaststr(t,value));
} else {
Printf(decl,"%s", SwigType_lstr(t,name));
}
}
return decl;
}
String *
Swig_wrapped_var_assign(SwigType *t, String_or_char *name) {
if (SwigType_isclass(t)) {
return NewStringf("&%s",name);
} else {
return SwigType_lcaststr(t,name);
}
}
static String *Swig_wrapped_var_assign(SwigType *t, const String_or_char *name, int varcref) {
if (SwigType_isclass(t)) {
if (varcref) {
return NewStringf("%s", name);
} else {
return NewStringf("&%s", name);
}
} else {
return SwigType_lcaststr(t, name);
}
}
static String *Swig_clocal(SwigType *t, const String_or_char *name, const String_or_char *value) {
String *decl;
decl = NewStringEmpty();
switch (SwigType_type(t)) {
case T_REFERENCE:
if (value) {
String *lstrname = SwigType_lstr(t, name);
String *lstr = SwigType_lstr(t, 0);
Printf(decl, "%s = (%s) &%s_defvalue", lstrname, lstr, name);
Delete(lstrname);
Delete(lstr);
} else {
String *lstrname = SwigType_lstr(t, name);
Printf(decl, "%s = 0", lstrname);
Delete(lstrname);
}
break;
case T_VOID:
break;
case T_VARARGS:
Printf(decl, "void *%s = 0", name);
break;
default:
if (value) {
String *lcaststr = SwigType_lcaststr(t, value);
String *lstr = SwigType_lstr(t, 0);
String *lstrn = SwigType_lstr(t, name);
Printf(decl, "%s = (%s) %s", lstrn, lstr, lcaststr);
Delete(lcaststr);
Delete(lstr);
Delete(lstrn);
} else {
String *lstrname = SwigType_lstr(t, name);
Append(decl, lstrname);
Delete(lstrname);
}
}
return decl;
}
