mirror of
https://github.com/QB64Official/qb64.git
synced 2024-07-05 15:50:25 +00:00
Fix regression introduced in previous commit in LCASE$ function
This commit is contained in:
parent
6e01fc8dce
commit
c3c79964cf
|
@ -7922,7 +7922,7 @@ qbs *qbs_lcase(qbs *str){
|
||||||
}
|
}
|
||||||
unsigned char *c=tqbs->chr;
|
unsigned char *c=tqbs->chr;
|
||||||
for (int32 i=0;i<str->len; i++) {
|
for (int32 i=0;i<str->len; i++) {
|
||||||
if ((*c>='a')&&(*c<='z')) *c=*c|32;
|
if ((*c>='A')&&(*c<='Z')) *c=*c|32;
|
||||||
c++;
|
c++;
|
||||||
}
|
}
|
||||||
if (tqbs!=str&&str->tmp) qbs_free(str);
|
if (tqbs!=str&&str->tmp) qbs_free(str);
|
||||||
|
@ -34650,4 +34650,4 @@ render_state.cull_mode=CULL_MODE__UNKNOWN;
|
||||||
#endif
|
#endif
|
||||||
}
|
}
|
||||||
|
|
||||||
#include "User Mods/Users Routines-List.cpp"
|
#include "User Mods/Users Routines-List.cpp"
|
||||||
|
|
Loading…
Reference in a new issue