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

Modula-3 convention: enumeration item names shall start with a capital

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@7553 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
amigalemming 2005-09-29 14:38:52 +00:00
commit 5e5d10199c
1 changed files with 15 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

12
SWIG/Source/Modules/modula3.cxx
View file

@ -1923,7 +1923,7 @@ MODULA3 ():
if (name != NIL) {
Printv (file, name, NIL);
} else {
Printf (file, "dummy%d", i);
Printf (file, "Dummy%d", i);
}
}
Printf (file, "\n};\n");
@ -2232,7 +2232,7 @@ MODULA3 ():
newname = NewStringf ("%s%s", newprefix, newstem);
Delete (newstem);
} else {
newname = nameToModula3 (stem, false);
newname = nameToModula3 (stem, true);
}
} else {
if (srcstyle != NIL) {
@ -2322,7 +2322,7 @@ MODULA3 ():
Iterator patternit;
for (patternit = First (patterndesc); patternit.item != NIL;
patternit = Next (patternit)) {
String *patternassign = Split (patternit.item, '=', 2);
List *patternassign = Split (patternit.item, '=', 2);
String *tag = Getitem (patternassign, 0);
String *data = Getitem (patternassign, 1);
if (Strcmp (tag, "prefix") == 0) {
@ -2996,7 +2996,8 @@ MODULA3 ():
}
generateThrowsClause (throws_hash, function_code);
Printf (function_code, " %s\n\n", tm ? (const String *)tm : empty_string);
Printf (function_code, " %s\n\n",
tm ? (const String *) tm : empty_string);
if (proxy_flag && wrapping_member_flag && !enum_constant_flag) {
// Properties
@ -3193,7 +3194,8 @@ MODULA3 ():
String *inmode = getMappedTypeNew (n, "m3wrapinmode", "", false);
String *intype = getMappedTypeNew (n, "m3wrapintype", "");
Printf (methods, "set%s(%s val:%s);\n",
m3name, (inmode != NIL) ? (const String *)inmode : "", intype);
m3name, (inmode != NIL) ? (const String *) inmode : "",
intype);
}
{
/* this was attached by functionWrapper