Author: richter Date: Sun Mar 16 13:14:24 2014 New Revision: 1578053 URL: http://svn.apache.org/r1578053 Log: do not use true / false but 1 / 0
Modified: perl/embperl/trunk/epinit.c Modified: perl/embperl/trunk/epinit.c URL: http://svn.apache.org/viewvc/perl/embperl/trunk/epinit.c?rev=1578053&r1=1578052&r2=1578053&view=diff ============================================================================== --- perl/embperl/trunk/epinit.c (original) +++ perl/embperl/trunk/epinit.c Sun Mar 16 13:14:24 2014 @@ -1026,7 +1026,7 @@ static int embperl_GetFormData (/*i/o*/ bool bNoUtf8 = (r -> Config.bOptions & optFormDataNoUtf8) != 0 ; bool bDebug = (r -> Config.bDebug & dbgForm) != 0 ; int mayutf8 = 0 ; - bool bInValue = false ; + bool bInValue = 0 ; char c ; epTHX ; @@ -1076,7 +1076,7 @@ static int embperl_GetFormData (/*i/o*/ break ; case ';': case '&': - bInValue = false ; + bInValue = 0 ; pQueryString++ ; nLen-- ; case '\0': @@ -1162,7 +1162,7 @@ static int embperl_GetFormData (/*i/o*/ pVal = p ; pQueryString++ ; nLen-- ; - bInValue = true ; + bInValue = 1 ; break ; } /* fall through */ --------------------------------------------------------------------- To unsubscribe, e-mail: embperl-cvs-unsubscr...@perl.apache.org For additional commands, e-mail: embperl-cvs-h...@perl.apache.org