qbs* FUNC_IDEZCHANGEPATH(qbs*_FUNC_IDEZCHANGEPATH_STRING_PATH,qbs*_FUNC_IDEZCHANGEPATH_STRING_NEWPATH){
qbs *tqbs;
ptrszint tmp_long;
int32 tmp_fileno;
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
uint8 *tmp_mem_static_pointer=mem_static_pointer;
uint32 tmp_cmem_sp=cmem_sp;
#include "data386.txt"
mem_lock *sf_mem_lock;
new_mem_lock();
sf_mem_lock=mem_lock_tmp;
sf_mem_lock->type=3;
libqb_check_stack();
if (is_error_pending()) goto exit_subfunc;
do{
qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,_FUNC_IDEZCHANGEPATH_STRING_PATH);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15519,"ide_methods.bas");}while(r);
S_60867:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||is_error_pending()){
if(qbevent){evnt(28182,15521,"ide_methods.bas");if(r)goto S_60867;}
S_60868:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZCHANGEPATH_STRING_NEWPATH,qbs_new_txt_len("..",2))))||is_error_pending()){
if(qbevent){evnt(28182,15523,"ide_methods.bas");if(r)goto S_60868;}
S_60869:;
fornext_value7149=_FUNC_IDEZCHANGEPATH_STRING_PATH->len;
fornext_finalvalue7149= 1 ;
fornext_step7149= -1 ;
if (fornext_step7149<0) fornext_step_negative7149=1; else fornext_step_negative7149=0;
if (is_error_pending()) goto fornext_error7149;
goto fornext_entrylabel7149;
while(1){
fornext_value7149=fornext_step7149+(*_FUNC_IDEZCHANGEPATH_LONG_X);
fornext_entrylabel7149:
*_FUNC_IDEZCHANGEPATH_LONG_X=fornext_value7149;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative7149){
if (fornext_value7149<fornext_finalvalue7149) break;
}else{
if (fornext_value7149>fornext_finalvalue7149) break;
}
fornext_error7149:;
if(qbevent){evnt(28182,15524,"ide_methods.bas");if(r)goto S_60869;}
do{
qbs_set(_FUNC_IDEZCHANGEPATH_STRING_A,func_mid(_FUNC_IDEZCHANGEPATH_STRING_PATH,*_FUNC_IDEZCHANGEPATH_LONG_X, 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15525,"ide_methods.bas");}while(r);
S_60871:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZCHANGEPATH_STRING_A,qbs_new_txt_len("\\",1))))||is_error_pending()){
if(qbevent){evnt(28182,15526,"ide_methods.bas");if(r)goto S_60871;}
do{
qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,qbs_left(_FUNC_IDEZCHANGEPATH_STRING_PATH,*_FUNC_IDEZCHANGEPATH_LONG_X- 1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15527,"ide_methods.bas");}while(r);
do{
goto fornext_exit_7148;
if(!qbevent)break;evnt(28182,15528,"ide_methods.bas");}while(r);
}
fornext_continue_7148:;
}
fornext_exit_7148:;
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28182,15531,"ide_methods.bas");}while(r);
}
S_60878:;
if ((qbs_cleanup(qbs_tmp_base,(-(_FUNC_IDEZCHANGEPATH_STRING_NEWPATH->len== 2 ))&(qbs_equal(qbs_right(_FUNC_IDEZCHANGEPATH_STRING_NEWPATH, 1 ),qbs_new_txt_len(":",1)))))||is_error_pending()){
if(qbevent){evnt(28182,15534,"ide_methods.bas");if(r)goto S_60878;}
do{
qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,_FUNC_IDEZCHANGEPATH_STRING_NEWPATH);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15535,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28182,15536,"ide_methods.bas");}while(r);
}
do{
qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,qbs_add(qbs_add(_FUNC_IDEZCHANGEPATH_STRING_PATH,qbs_new_txt_len("\\",1)),_FUNC_IDEZCHANGEPATH_STRING_NEWPATH));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15538,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28182,15539,"ide_methods.bas");}while(r);
}
S_60885:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||is_error_pending()){
if(qbevent){evnt(28182,15542,"ide_methods.bas");if(r)goto S_60885;}
S_60886:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZCHANGEPATH_STRING_NEWPATH,qbs_new_txt_len("..",2))))||is_error_pending()){
if(qbevent){evnt(28182,15545,"ide_methods.bas");if(r)goto S_60886;}
S_60887:;
fornext_value7153=_FUNC_IDEZCHANGEPATH_STRING_PATH->len;
fornext_finalvalue7153= 1 ;
fornext_step7153= -1 ;
if (fornext_step7153<0) fornext_step_negative7153=1; else fornext_step_negative7153=0;
if (is_error_pending()) goto fornext_error7153;
goto fornext_entrylabel7153;
while(1){
fornext_value7153=fornext_step7153+(*_FUNC_IDEZCHANGEPATH_LONG_X);
fornext_entrylabel7153:
*_FUNC_IDEZCHANGEPATH_LONG_X=fornext_value7153;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative7153){
if (fornext_value7153<fornext_finalvalue7153) break;
}else{
if (fornext_value7153>fornext_finalvalue7153) break;
}
fornext_error7153:;
if(qbevent){evnt(28182,15546,"ide_methods.bas");if(r)goto S_60887;}
do{
qbs_set(_FUNC_IDEZCHANGEPATH_STRING_A,func_mid(_FUNC_IDEZCHANGEPATH_STRING_PATH,*_FUNC_IDEZCHANGEPATH_LONG_X, 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15547,"ide_methods.bas");}while(r);
S_60889:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZCHANGEPATH_STRING_A,qbs_new_txt_len("/",1))))||is_error_pending()){
if(qbevent){evnt(28182,15548,"ide_methods.bas");if(r)goto S_60889;}
do{
qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,qbs_left(_FUNC_IDEZCHANGEPATH_STRING_PATH,*_FUNC_IDEZCHANGEPATH_LONG_X- 1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15549,"ide_methods.bas");}while(r);
S_60891:;
if ((-(*_FUNC_IDEZCHANGEPATH_LONG_X== 1 ))||is_error_pending()){
if(qbevent){evnt(28182,15550,"ide_methods.bas");if(r)goto S_60891;}
do{
qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,qbs_new_txt_len("/",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15550,"ide_methods.bas");}while(r);
}
do{
goto fornext_exit_7152;
if(!qbevent)break;evnt(28182,15551,"ide_methods.bas");}while(r);
}
fornext_continue_7152:;
}
fornext_exit_7152:;
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28182,15554,"ide_methods.bas");}while(r);
}
S_60899:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZCHANGEPATH_STRING_PATH,qbs_new_txt_len("/",1))))||is_error_pending()){
if(qbevent){evnt(28182,15556,"ide_methods.bas");if(r)goto S_60899;}
do{
qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,qbs_add(qbs_new_txt_len("/",1),_FUNC_IDEZCHANGEPATH_STRING_NEWPATH));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15556,"ide_methods.bas");}while(r);
}else{
do{
qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,qbs_add(qbs_add(_FUNC_IDEZCHANGEPATH_STRING_PATH,qbs_new_txt_len("/",1)),_FUNC_IDEZCHANGEPATH_STRING_NEWPATH));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15556,"ide_methods.bas");}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28182,15557,"ide_methods.bas");}while(r);
}
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free386.txt"
if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static;
cmem_sp=tmp_cmem_sp;
qbs_maketmp(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH);return _FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH;
}
