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 {
slap = 10,
my,
mine,
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
endif
if (enums.cvar.My != 11)
if (enums.cvar.Mine != 11)
error
endif

View file

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