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