#line 20990 "ide/ide_methods.bas"
qbs* FUNC_GETWORDATCURSOR(){
#line 20990 "ide/ide_methods.bas"
qbs *tqbs;
#line 20990 "ide/ide_methods.bas"
ptrszint tmp_long;
#line 20990 "ide/ide_methods.bas"
int32 tmp_fileno;
#line 20990 "ide/ide_methods.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 20990 "ide/ide_methods.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 20990 "ide/ide_methods.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 20990 "ide/ide_methods.bas"
#include "data479.txt"
#line 20990 "ide/ide_methods.bas"
mem_lock *sf_mem_lock;
#line 20990 "ide/ide_methods.bas"
new_mem_lock();
#line 20990 "ide/ide_methods.bas"
sf_mem_lock=mem_lock_tmp;
#line 20990 "ide/ide_methods.bas"
sf_mem_lock->type=3;
#line 20990 "ide/ide_methods.bas"
libqb_check_stack();
#line 20990 "ide/ide_methods.bas"
if (is_error_pending()) goto exit_subfunc;
#line 20991 "ide/ide_methods.bas"
do{
#line 20991 "ide/ide_methods.bas"
qbs_set(_FUNC_GETWORDATCURSOR_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY));
#line 20991 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20991 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20991,"ide_methods.bas");}while(r);
#line 20992 "ide/ide_methods.bas"
do{
#line 20992 "ide/ide_methods.bas"
*_FUNC_GETWORDATCURSOR_LONG_X=*__LONG_IDECX;
#line 20992 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20992,"ide_methods.bas");}while(r);
#line 20993 "ide/ide_methods.bas"
S_68275:;
#line 20993 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_GETWORDATCURSOR_LONG_X<=_FUNC_GETWORDATCURSOR_STRING_A->len)))||is_error_pending()){
#line 20993 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20993,"ide_methods.bas");if(r)goto S_68275;}
#line 20994 "ide/ide_methods.bas"
S_68276:;
#line 20994 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X)== 32 ))&(-(*_FUNC_GETWORDATCURSOR_LONG_X> 1 ))))||is_error_pending()){
#line 20994 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20994,"ide_methods.bas");if(r)goto S_68276;}
#line 20995 "ide/ide_methods.bas"
S_68277:;
#line 20995 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X- 1 )!= 32 )))||is_error_pending()){
#line 20995 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20995,"ide_methods.bas");if(r)goto S_68277;}
#line 20995 "ide/ide_methods.bas"
do{
#line 20995 "ide/ide_methods.bas"
*_FUNC_GETWORDATCURSOR_LONG_X=*_FUNC_GETWORDATCURSOR_LONG_X- 1 ;
#line 20995 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20995,"ide_methods.bas");}while(r);
#line 20995 "ide/ide_methods.bas"
}
#line 20996 "ide/ide_methods.bas"
}
#line 20997 "ide/ide_methods.bas"
LABEL_TRY:;
#line 20997 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20997,"ide_methods.bas");r=0;}
#line 20998 "ide/ide_methods.bas"
S_68281:;
#line 20998 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]))||is_error_pending()){
#line 20998 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20998,"ide_methods.bas");if(r)goto S_68281;}
#line 20999 "ide/ide_methods.bas"
do{
#line 20999 "ide/ide_methods.bas"
*_FUNC_GETWORDATCURSOR_LONG_X1=*_FUNC_GETWORDATCURSOR_LONG_X;
#line 20999 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20999,"ide_methods.bas");}while(r);
#line 21000 "ide/ide_methods.bas"
S_68283:;
#line 21000 "ide/ide_methods.bas"
while((-(*_FUNC_GETWORDATCURSOR_LONG_X1> 1 ))||is_error_pending()){
#line 21000 "ide/ide_methods.bas"
if(qbevent){evnt(28819,21000,"ide_methods.bas");if(r)goto S_68283;}
#line 21001 "ide/ide_methods.bas"
S_68284:;
#line 21001 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X1- 1 ))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]|(-(qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X1- 1 )== 36 ))))||is_error_pending()){
#line 21001 "ide/ide_methods.bas"
if(qbevent){evnt(28819,21001,"ide_methods.bas");if(r)goto S_68284;}
#line 21001 "ide/ide_methods.bas"
do{
#line 21001 "ide/ide_methods.bas"
*_FUNC_GETWORDATCURSOR_LONG_X1=*_FUNC_GETWORDATCURSOR_LONG_X1- 1 ;
#line 21001 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21001,"ide_methods.bas");}while(r);
#line 21001 "ide/ide_methods.bas"
}else{
#line 21001 "ide/ide_methods.bas"
do{
#line 21001 "ide/ide_methods.bas"
goto dl_exit_7000;
#line 21001 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21001,"ide_methods.bas");}while(r);
#line 21001 "ide/ide_methods.bas"
}
#line 21002 "ide/ide_methods.bas"
dl_continue_7000:;
#line 21002 "ide/ide_methods.bas"
}
#line 21002 "ide/ide_methods.bas"
dl_exit_7000:;
#line 21003 "ide/ide_methods.bas"
do{
#line 21003 "ide/ide_methods.bas"
*_FUNC_GETWORDATCURSOR_LONG_X2=*_FUNC_GETWORDATCURSOR_LONG_X;
#line 21003 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21003,"ide_methods.bas");}while(r);
#line 21004 "ide/ide_methods.bas"
S_68291:;
#line 21004 "ide/ide_methods.bas"
while((qbs_cleanup(qbs_tmp_base,-(*_FUNC_GETWORDATCURSOR_LONG_X2<_FUNC_GETWORDATCURSOR_STRING_A->len)))||is_error_pending()){
#line 21004 "ide/ide_methods.bas"
if(qbevent){evnt(28819,21004,"ide_methods.bas");if(r)goto S_68291;}
#line 21005 "ide/ide_methods.bas"
S_68292:;
#line 21005 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X2+ 1 ))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]|(-(qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X2+ 1 )== 36 ))))||is_error_pending()){
#line 21005 "ide/ide_methods.bas"
if(qbevent){evnt(28819,21005,"ide_methods.bas");if(r)goto S_68292;}
#line 21005 "ide/ide_methods.bas"
do{
#line 21005 "ide/ide_methods.bas"
*_FUNC_GETWORDATCURSOR_LONG_X2=*_FUNC_GETWORDATCURSOR_LONG_X2+ 1 ;
#line 21005 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21005,"ide_methods.bas");}while(r);
#line 21005 "ide/ide_methods.bas"
}else{
#line 21005 "ide/ide_methods.bas"
do{
#line 21005 "ide/ide_methods.bas"
goto dl_exit_7002;
#line 21005 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21005,"ide_methods.bas");}while(r);
#line 21005 "ide/ide_methods.bas"
}
#line 21006 "ide/ide_methods.bas"
dl_continue_7002:;
#line 21006 "ide/ide_methods.bas"
}
#line 21006 "ide/ide_methods.bas"
dl_exit_7002:;
#line 21007 "ide/ide_methods.bas"
do{
#line 21007 "ide/ide_methods.bas"
qbs_set(_FUNC_GETWORDATCURSOR_STRING_A2,func_mid(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X1,*_FUNC_GETWORDATCURSOR_LONG_X2-*_FUNC_GETWORDATCURSOR_LONG_X1+ 1 ,0|1));
#line 21007 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 21007 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21007,"ide_methods.bas");}while(r);
#line 21008 "ide/ide_methods.bas"
}else{
#line 21009 "ide/ide_methods.bas"
do{
#line 21009 "ide/ide_methods.bas"
qbs_set(_FUNC_GETWORDATCURSOR_STRING_SYMBOL,func_chr(qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X)));
#line 21009 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 21009 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21009,"ide_methods.bas");}while(r);
#line 21010 "ide/ide_methods.bas"
S_68301:;
#line 21010 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GETWORDATCURSOR_STRING_SYMBOL,func_chr( 32 ))))||is_error_pending()){
#line 21010 "ide/ide_methods.bas"
if(qbevent){evnt(28819,21010,"ide_methods.bas");if(r)goto S_68301;}
#line 21010 "ide/ide_methods.bas"
do{
#line 21010 "ide/ide_methods.bas"
goto exit_subfunc;
#line 21010 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21010,"ide_methods.bas");}while(r);
#line 21010 "ide/ide_methods.bas"
}
#line 21011 "ide/ide_methods.bas"
S_68304:;
#line 21011 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GETWORDATCURSOR_STRING_SYMBOL,qbs_new_txt_len("~",1))))||is_error_pending()){
#line 21011 "ide/ide_methods.bas"
if(qbevent){evnt(28819,21011,"ide_methods.bas");if(r)goto S_68304;}
#line 21011 "ide/ide_methods.bas"
do{
#line 21011 "ide/ide_methods.bas"
qbs_set(_FUNC_GETWORDATCURSOR_STRING_GETWORDATCURSOR,qbs_new_txt_len("~",1));
#line 21011 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 21011 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21011,"ide_methods.bas");}while(r);
#line 21011 "ide/ide_methods.bas"
do{
#line 21011 "ide/ide_methods.bas"
goto exit_subfunc;
#line 21011 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21011,"ide_methods.bas");}while(r);
#line 21011 "ide/ide_methods.bas"
}
#line 21012 "ide/ide_methods.bas"
S_68308:;
#line 21012 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GETWORDATCURSOR_STRING_SYMBOL,qbs_new_txt_len("`",1))))||is_error_pending()){
#line 21012 "ide/ide_methods.bas"
if(qbevent){evnt(28819,21012,"ide_methods.bas");if(r)goto S_68308;}
#line 21012 "ide/ide_methods.bas"
do{
#line 21012 "ide/ide_methods.bas"
qbs_set(_FUNC_GETWORDATCURSOR_STRING_GETWORDATCURSOR,qbs_new_txt_len("`",1));
#line 21012 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 21012 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21012,"ide_methods.bas");}while(r);
#line 21012 "ide/ide_methods.bas"
do{
#line 21012 "ide/ide_methods.bas"
goto exit_subfunc;
#line 21012 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21012,"ide_methods.bas");}while(r);
#line 21012 "ide/ide_methods.bas"
}
#line 21013 "ide/ide_methods.bas"
S_68312:;
#line 21013 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_GETWORDATCURSOR_STRING_SYMBOL,qbs_new_txt_len("%",1)))&(qbs_equal(func_mid(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X+ 1 ,NULL,0),qbs_new_txt_len("&",1)))))||is_error_pending()){
#line 21013 "ide/ide_methods.bas"
if(qbevent){evnt(28819,21013,"ide_methods.bas");if(r)goto S_68312;}
#line 21013 "ide/ide_methods.bas"
do{
#line 21013 "ide/ide_methods.bas"
qbs_set(_FUNC_GETWORDATCURSOR_STRING_GETWORDATCURSOR,qbs_new_txt_len("%&",2));
#line 21013 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 21013 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21013,"ide_methods.bas");}while(r);
#line 21013 "ide/ide_methods.bas"
do{
#line 21013 "ide/ide_methods.bas"
goto exit_subfunc;
#line 21013 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21013,"ide_methods.bas");}while(r);
#line 21013 "ide/ide_methods.bas"
}
#line 21014 "ide/ide_methods.bas"
S_68316:;
#line 21014 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_GETWORDATCURSOR_STRING_SYMBOL,qbs_new_txt_len("&",1)))&(qbs_equal(func_mid(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X- 1 ,NULL,0),qbs_new_txt_len("%",1)))))||is_error_pending()){
#line 21014 "ide/ide_methods.bas"
if(qbevent){evnt(28819,21014,"ide_methods.bas");if(r)goto S_68316;}
#line 21014 "ide/ide_methods.bas"
do{
#line 21014 "ide/ide_methods.bas"
qbs_set(_FUNC_GETWORDATCURSOR_STRING_GETWORDATCURSOR,qbs_new_txt_len("%&",2));
#line 21014 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 21014 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21014,"ide_methods.bas");}while(r);
#line 21014 "ide/ide_methods.bas"
do{
#line 21014 "ide/ide_methods.bas"
goto exit_subfunc;
#line 21014 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21014,"ide_methods.bas");}while(r);
#line 21014 "ide/ide_methods.bas"
}
#line 21015 "ide/ide_methods.bas"
do{
#line 21015 "ide/ide_methods.bas"
*_FUNC_GETWORDATCURSOR_LONG_X1=*_FUNC_GETWORDATCURSOR_LONG_X;
#line 21015 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21015,"ide_methods.bas");}while(r);
#line 21016 "ide/ide_methods.bas"
S_68321:;
#line 21016 "ide/ide_methods.bas"
while((-(*_FUNC_GETWORDATCURSOR_LONG_X1> 1 ))||is_error_pending()){
#line 21016 "ide/ide_methods.bas"
if(qbevent){evnt(28819,21016,"ide_methods.bas");if(r)goto S_68321;}
#line 21017 "ide/ide_methods.bas"
S_68322:;
#line 21017 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X1- 1 , 1 ,0|1),_FUNC_GETWORDATCURSOR_STRING_SYMBOL)))||is_error_pending()){
#line 21017 "ide/ide_methods.bas"
if(qbevent){evnt(28819,21017,"ide_methods.bas");if(r)goto S_68322;}
#line 21017 "ide/ide_methods.bas"
do{
#line 21017 "ide/ide_methods.bas"
*_FUNC_GETWORDATCURSOR_LONG_X1=*_FUNC_GETWORDATCURSOR_LONG_X1- 1 ;
#line 21017 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21017,"ide_methods.bas");}while(r);
#line 21017 "ide/ide_methods.bas"
}else{
#line 21017 "ide/ide_methods.bas"
do{
#line 21017 "ide/ide_methods.bas"
goto dl_exit_7003;
#line 21017 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21017,"ide_methods.bas");}while(r);
#line 21017 "ide/ide_methods.bas"
}
#line 21018 "ide/ide_methods.bas"
dl_continue_7003:;
#line 21018 "ide/ide_methods.bas"
}
#line 21018 "ide/ide_methods.bas"
dl_exit_7003:;
#line 21019 "ide/ide_methods.bas"
do{
#line 21019 "ide/ide_methods.bas"
*_FUNC_GETWORDATCURSOR_LONG_X2=*_FUNC_GETWORDATCURSOR_LONG_X;
#line 21019 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21019,"ide_methods.bas");}while(r);
#line 21020 "ide/ide_methods.bas"
S_68329:;
#line 21020 "ide/ide_methods.bas"
while((qbs_cleanup(qbs_tmp_base,-(*_FUNC_GETWORDATCURSOR_LONG_X2<_FUNC_GETWORDATCURSOR_STRING_A->len)))||is_error_pending()){
#line 21020 "ide/ide_methods.bas"
if(qbevent){evnt(28819,21020,"ide_methods.bas");if(r)goto S_68329;}
#line 21021 "ide/ide_methods.bas"
S_68330:;
#line 21021 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X2+ 1 , 1 ,0|1),_FUNC_GETWORDATCURSOR_STRING_SYMBOL)))||is_error_pending()){
#line 21021 "ide/ide_methods.bas"
if(qbevent){evnt(28819,21021,"ide_methods.bas");if(r)goto S_68330;}
#line 21021 "ide/ide_methods.bas"
do{
#line 21021 "ide/ide_methods.bas"
*_FUNC_GETWORDATCURSOR_LONG_X2=*_FUNC_GETWORDATCURSOR_LONG_X2+ 1 ;
#line 21021 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21021,"ide_methods.bas");}while(r);
#line 21021 "ide/ide_methods.bas"
}else{
#line 21021 "ide/ide_methods.bas"
do{
#line 21021 "ide/ide_methods.bas"
goto dl_exit_7005;
#line 21021 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21021,"ide_methods.bas");}while(r);
#line 21021 "ide/ide_methods.bas"
}
#line 21022 "ide/ide_methods.bas"
dl_continue_7005:;
#line 21022 "ide/ide_methods.bas"
}
#line 21022 "ide/ide_methods.bas"
dl_exit_7005:;
#line 21023 "ide/ide_methods.bas"
do{
#line 21023 "ide/ide_methods.bas"
qbs_set(_FUNC_GETWORDATCURSOR_STRING_A2,func_mid(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X1,*_FUNC_GETWORDATCURSOR_LONG_X2-*_FUNC_GETWORDATCURSOR_LONG_X1+ 1 ,0|1));
#line 21023 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 21023 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21023,"ide_methods.bas");}while(r);
#line 21024 "ide/ide_methods.bas"
}
#line 21025 "ide/ide_methods.bas"
do{
#line 21025 "ide/ide_methods.bas"
qbs_set(_FUNC_GETWORDATCURSOR_STRING_GETWORDATCURSOR,_FUNC_GETWORDATCURSOR_STRING_A2);
#line 21025 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 21025 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21025,"ide_methods.bas");}while(r);
#line 21026 "ide/ide_methods.bas"
S_68339:;
#line 21026 "ide/ide_methods.bas"
}else{
#line 21026 "ide/ide_methods.bas"
if (qbs_cleanup(qbs_tmp_base,(-(*_FUNC_GETWORDATCURSOR_LONG_X==(_FUNC_GETWORDATCURSOR_STRING_A->len+ 1 )))&(-(*_FUNC_GETWORDATCURSOR_LONG_X> 1 )))){
#line 21026 "ide/ide_methods.bas"
if(qbevent){evnt(28819,21026,"ide_methods.bas");if(r)goto S_68339;}
#line 21027 "ide/ide_methods.bas"
S_68340:;
#line 21027 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X- 1 )!= 32 )))||is_error_pending()){
#line 21027 "ide/ide_methods.bas"
if(qbevent){evnt(28819,21027,"ide_methods.bas");if(r)goto S_68340;}
#line 21027 "ide/ide_methods.bas"
do{
#line 21027 "ide/ide_methods.bas"
*_FUNC_GETWORDATCURSOR_LONG_X=*_FUNC_GETWORDATCURSOR_LONG_X- 1 ;
#line 21027 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21027,"ide_methods.bas");}while(r);
#line 21027 "ide/ide_methods.bas"
do{
#line 21027 "ide/ide_methods.bas"
goto LABEL_TRY;
#line 21027 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,21027,"ide_methods.bas");}while(r);
#line 21027 "ide/ide_methods.bas"
}
#line 21028 "ide/ide_methods.bas"
}
#line 21028 "ide/ide_methods.bas"
}
#line 21029 "ide/ide_methods.bas"
exit_subfunc:;
#line 21029 "ide/ide_methods.bas"
free_mem_lock(sf_mem_lock);
#line 21029 "ide/ide_methods.bas"
#include "free479.txt"
#line 21029 "ide/ide_methods.bas"
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;
#line 21029 "ide/ide_methods.bas"
cmem_sp=tmp_cmem_sp;
#line 21029 "ide/ide_methods.bas"
qbs_maketmp(_FUNC_GETWORDATCURSOR_STRING_GETWORDATCURSOR);return _FUNC_GETWORDATCURSOR_STRING_GETWORDATCURSOR;
#line 21029 "ide/ide_methods.bas"
}
