Репозитории ALT
S: | 2.0.0.11-alt2 |
5.1: | 0.9.6-alt5.M51.1 |
4.1: | 0.9.6-alt5.M41.1 |
4.0: | 0.9.6-alt5.M40.1 |
Группа :: Разработка/Прочее
Пакет: basic256
Главная Изменения Спек Патчи Sources Загрузить Gear Bugs and FR Repocop
Патч: basic256-0.9.6-alt-fixed-seek-lower-upper-statements.patch
Скачать
Скачать
--- trunk/Interpreter.cpp.orig 2010-11-06 11:38:13 +0300
+++ trunk/Interpreter.cpp 2010-11-06 11:37:55 +0300
@@ -358,7 +358,7 @@ Interpreter::initialize()
for (int t=0;t<NUMFILES;t++) stream[t] = NULL;
emit(resizeGraph(300, 300));
image = graph->image;
- fontfamily = QString::QString();
+ fontfamily = QString();
fontpoint = 0;
fontweight = 0;
nsprites = 0;
@@ -899,13 +899,12 @@ Interpreter::execByteCode()
{
// move file pointer to a specific loaction in file
op++;
+ long pos = stack.popint();
int fn = stack.popint();
if (fn<0||fn>=NUMFILES) {
printError(tr("Invallid File Number"));
return -1;
- }
-
- long pos = stack.popint();
+ }
if (stream[fn] == NULL)
{
@@ -1581,11 +1580,10 @@ Interpreter::execByteCode()
op++;
char *temp = stack.popstring();
- for(unsigned int p=0;p<strlen(temp);p++) {
- if(isalpha(temp[p])) temp[p] = toupper(temp[p]);
- }
+ QString qtemp = QString::fromUtf8(temp);
+ qtemp = qtemp.toUpper();
- stack.push(temp);
+ stack.push(strdup(qtemp.toUtf8().data()));
free(temp);
}
@@ -1596,11 +1594,10 @@ Interpreter::execByteCode()
op++;
char *temp = stack.popstring();
- for(unsigned int p=0;p<strlen(temp);p++) {
- if(isalpha(temp[p])) temp[p] = tolower(temp[p]);
- }
+ QString qtemp = QString::fromUtf8(temp);
+ qtemp = qtemp.toLower();
- stack.push(temp);
+ stack.push(strdup(qtemp.toUtf8().data()));
free(temp);
}
@@ -1627,7 +1624,7 @@ Interpreter::execByteCode()
QChar temp[2];
temp[0] = (QChar) code;
temp[1] = (QChar) 0;
- QString qs = QString::QString(temp,1);
+ QString qs = QString(temp,1);
stack.push(strdup(qs.toUtf8().data()));
}
break;