mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-09-16 17:54:16 +00:00
b586eafd3b
LINE INPUT will now use the faster method if passed a file handle that has been opened FOR BINARY. As such, the _BLINEINPUT command has been removed. qb64.bas now takes advantage of this for reading from '$include files, at least in Include Manager 1. Some tweaking of internal/source/main.txt was required to get things into a sane state, so I'm holing off changing the compiler any further so the auto-builder can make sure everything's smoothed over. Note: Everything should still compile as normal; I'm just being overcautious.
51 lines
2.2 KiB
Text
51 lines
2.2 KiB
Text
if(oldstr2623){
|
|
if(oldstr2623->fixed)qbs_set(oldstr2623,_FUNC_SEPERATEARGS_STRING_A);
|
|
qbs_free(_FUNC_SEPERATEARGS_STRING_A);
|
|
}
|
|
if(oldstr2624){
|
|
if(oldstr2624->fixed)qbs_set(oldstr2624,_FUNC_SEPERATEARGS_STRING_CA);
|
|
qbs_free(_FUNC_SEPERATEARGS_STRING_CA);
|
|
}
|
|
qbs_free(_FUNC_SEPERATEARGS_STRING_S);
|
|
qbs_free(_FUNC_SEPERATEARGS_STRING_S2);
|
|
if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[2]&1){
|
|
if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[2]&4){
|
|
cmem_dynamic_free((uint8*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[0]));
|
|
}else{
|
|
free((void*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[0]));
|
|
}
|
|
}
|
|
free_mem_lock( (mem_lock*)((ptrszint*)_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS)[8] );
|
|
if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[2]&1){
|
|
if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[2]&4){
|
|
cmem_dynamic_free((uint8*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[0]));
|
|
}else{
|
|
free((void*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[0]));
|
|
}
|
|
}
|
|
free_mem_lock( (mem_lock*)((ptrszint*)_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN)[8] );
|
|
if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[2]&1){
|
|
if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[2]&4){
|
|
cmem_dynamic_free((uint8*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[0]));
|
|
}else{
|
|
free((void*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[0]));
|
|
}
|
|
}
|
|
free_mem_lock( (mem_lock*)((ptrszint*)_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS)[8] );
|
|
if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[2]&1){
|
|
if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[2]&4){
|
|
cmem_dynamic_free((uint8*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[0]));
|
|
}else{
|
|
free((void*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[0]));
|
|
}
|
|
}
|
|
free_mem_lock( (mem_lock*)((ptrszint*)_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION)[8] );
|
|
if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[2]&1){
|
|
if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[2]&4){
|
|
cmem_dynamic_free((uint8*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[0]));
|
|
}else{
|
|
free((void*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[0]));
|
|
}
|
|
}
|
|
free_mem_lock( (mem_lock*)((ptrszint*)_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL)[8] );
|
|
qbs_free(_FUNC_SEPERATEARGS_STRING_C);
|