basic/source/comp/parser.cxx | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-)
New commits: commit d417059dae303685de7aa0f4b1c192ffcf5304d5 Author: Arnaud Versini <arnaud.vers...@gmail.com> Date: Wed Aug 19 19:23:27 2015 +0200 BASIC : SbiParser::DefXXX Only convert the first letter to uppercase Change-Id: Iccee4712459653b35b11d8dbe99c45df753307be Reviewed-on: https://gerrit.libreoffice.org/17859 Tested-by: Jenkins <c...@libreoffice.org> Reviewed-by: Samuel Mehrbrodt <s.mehrbr...@gmail.com> diff --git a/basic/source/comp/parser.cxx b/basic/source/comp/parser.cxx index b7af29d..2406e1c 100644 --- a/basic/source/comp/parser.cxx +++ b/basic/source/comp/parser.cxx @@ -22,6 +22,7 @@ #include <osl/diagnose.h> #include <com/sun/star/script/ModuleType.hpp> #include <svtools/miscopt.hxx> +#include <rtl/character.hxx> struct SbiParseStack { // "Stack" for statement-blocks SbiParseStack* pNext; // Chain @@ -677,7 +678,7 @@ void SbiParser::DefXXX() while( !bAbort ) { if( Next() != SYMBOL ) break; - ch1 = aSym.toAsciiUpperCase()[0]; + ch1 = rtl::toAsciiUpperCase(aSym[0]); ch2 = 0; if( Peek() == MINUS ) { @@ -685,7 +686,7 @@ void SbiParser::DefXXX() if( Next() != SYMBOL ) Error( ERRCODE_BASIC_SYMBOL_EXPECTED ); else { - ch2 = aSym.toAsciiUpperCase()[0]; + ch2 = rtl::toAsciiUpperCase(aSym[0]); if( ch2 < ch1 ) Error( ERRCODE_BASIC_SYNTAX ), ch2 = 0; } } _______________________________________________ Libreoffice-commits mailing list libreoffice-comm...@lists.freedesktop.org http://lists.freedesktop.org/mailman/listinfo/libreoffice-commits