Added Swig_string_mangle() function
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@734 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
7baa90abee
commit
b240e6dea8
2 changed files with 16 additions and 0 deletions
|
|
@ -131,3 +131,18 @@ String *Swig_string_escape(String *s) {
|
||||||
return ns;
|
return ns;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/* -----------------------------------------------------------------------------
|
||||||
|
* Swig_string_mangle()
|
||||||
|
*
|
||||||
|
* Take a string and mangle it by stripping all non-valid C identifier characters
|
||||||
|
* ----------------------------------------------------------------------------- */
|
||||||
|
|
||||||
|
String *Swig_string_mangle(String *s) {
|
||||||
|
String *t = Copy(s);
|
||||||
|
char *c = Char(t);
|
||||||
|
while (*c) {
|
||||||
|
if (!isalnum(*c)) *c = '_';
|
||||||
|
c++;
|
||||||
|
}
|
||||||
|
return t;
|
||||||
|
}
|
||||||
|
|
|
||||||
|
|
@ -278,6 +278,7 @@ extern char *Swig_copy_string(const char *c);
|
||||||
extern void Swig_banner(File *f);
|
extern void Swig_banner(File *f);
|
||||||
extern DOH *Swig_temp_result(DOH *x);
|
extern DOH *Swig_temp_result(DOH *x);
|
||||||
extern String *Swig_string_escape(String *s);
|
extern String *Swig_string_escape(String *s);
|
||||||
|
extern String *Swig_string_mangle(String *s);
|
||||||
|
|
||||||
/* --- C Wrappers --- */
|
/* --- C Wrappers --- */
|
||||||
extern String *Swig_clocal(SwigType *t, String_or_char *name, String_or_char *value);
|
extern String *Swig_clocal(SwigType *t, String_or_char *name, String_or_char *value);
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue