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

Added the #@ mangling extension

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@5752 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Marcelo Matus 2004-03-17 08:32:11 +00:00
commit 238cc1455c
1 changed files with 25 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

25
SWIG/Source/Preprocessor/cpp.c
View file

@ -341,6 +341,10 @@ Hash *Preprocessor_define(const String_or_char *_str, int swigmacro)
}
/* Replace '##' with a special token */
Replace(macrovalue,"\001\001","\002", DOH_REPLACE_ANY);
/* Replace '#@' with a special token */
Replace(macrovalue,"\001@","\004", DOH_REPLACE_ANY);
/* Replace '##@' with a special token */
Replace(macrovalue,"\002@","\005", DOH_REPLACE_ANY);
/* Go create the macro */
macro = NewHash();
@ -673,6 +677,26 @@ expand_macro(String_or_char *name, List *args)
}
Replace(ns,temp,rep, DOH_REPLACE_ANY);
}
/* Non-standard mangle expansions.
The #@Name is replaced by mangle_arg(Name). */
if (strstr(Char(ns),"\004")) {
String* marg = Swig_string_mangle(arg);
Clear(temp);
Printf(temp,"\004%s", aname);
Replace(ns, temp, marg, DOH_REPLACE_ID_END);
Delete(marg);
}
if (strstr(Char(ns),"\005")) {
String* marg = Swig_string_mangle(arg);
Clear(temp);
Clear(tempa);
Printf(temp,"\005%s", aname);
Printf(tempa,"\"%s\"", marg);
Replace(ns, temp, tempa, DOH_REPLACE_ID_END);
Delete(marg);
}
if (isvarargs && i == l-1 && Len(arg) == 0) {
/* Zero length varargs macro argument. We search for commas that might appear before and nuke them */
char *a, *s, *t, *name;
@ -706,6 +730,7 @@ expand_macro(String_or_char *name, List *args)
}
Replace(ns,"\002","",DOH_REPLACE_ANY); /* Get rid of concatenation tokens */
Replace(ns,"\001","#",DOH_REPLACE_ANY); /* Put # back (non-standard C) */
Replace(ns,"\004","#@",DOH_REPLACE_ANY); /* Put # back (non-standard C) */
/* Expand this macro even further */
Setattr(macro,"*expanded*","1");