fix my perl keyword warning

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@12012 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
William S Fulton 2010-05-07 18:13:15 +00:00
commit 5ff1e34ee6
3 changed files with 4 additions and 4 deletions

View file

@ -90,8 +90,8 @@ enum Exclamation {
enum ContainYourself { enum ContainYourself {
slap = 10, slap = 10,
my, mine,
thigh thigh
} Slap = slap, My = my, Thigh = thigh, *pThigh = &Thigh, arrayContainYourself[3] = {slap, my, thigh}; } Slap = slap, Mine = mine, Thigh = thigh, *pThigh = &Thigh, arrayContainYourself[3] = {slap, mine, thigh};
%} %}

View file

@ -13,7 +13,7 @@ if (enums.cvar.Slap != 10)
error error
endif endif
if (enums.cvar.My != 11) if (enums.cvar.Mine != 11)
error error
endif endif

View file

@ -11,7 +11,7 @@ if _enums.cvar.enumInstance != 2:
if _enums.cvar.Slap != 10: if _enums.cvar.Slap != 10:
raise RuntimeError raise RuntimeError
if _enums.cvar.My != 11: if _enums.cvar.Mine != 11:
raise RuntimeError raise RuntimeError
if _enums.cvar.Thigh != 12: if _enums.cvar.Thigh != 12: