void SUB_GL_SCAN_HEADER(){
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 "data156.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;
S_37420:;
if ((*__LONG_GL_KIT)||is_error_pending()){
if(qbevent){evnt(28166,69,"opengl_methods.bas");if(r)goto S_37420;}
do{
*_SUB_GL_SCAN_HEADER_LONG_HK=func_freefile();
if(!qbevent)break;evnt(28166,69,"opengl_methods.bas");}while(r);
do{
sub_open(qbs_new_txt_len("internal\\c\\parts\\core\\gl_header_for_parsing\\temp\\gl_kit.bas",59), 4 ,NULL,NULL,*_SUB_GL_SCAN_HEADER_LONG_HK,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,69,"opengl_methods.bas");}while(r);
}
S_37424:;
if ((*__LONG_GL_KIT)||is_error_pending()){
if(qbevent){evnt(28166,70,"opengl_methods.bas");if(r)goto S_37424;}
do{
tab_spc_cr_size=2;
tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK;
if (is_error_pending()) goto skip4497;
sub_file_print(tmp_fileno,qbs_new_txt_len("DECLARE LIBRARY",15), 0, 0, 1);
if (is_error_pending()) goto skip4497;
skip4497:
qbs_cleanup(qbs_tmp_base,0);
tab_spc_cr_size=1;
if(!qbevent)break;evnt(28166,70,"opengl_methods.bas");}while(r);
}
do{
*_SUB_GL_SCAN_HEADER_LONG_D= 0 ;
if(!qbevent)break;evnt(28166,72,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,72,"opengl_methods.bas");}while(r);
do{
*_SUB_GL_SCAN_HEADER_LONG_H=func_freefile();
if(!qbevent)break;evnt(28166,73,"opengl_methods.bas");}while(r);
do{
sub_open(qbs_new_txt_len("internal\\c\\parts\\core\\gl_header_for_parsing\\gl.h",48), 2 ,NULL,NULL,*_SUB_GL_SCAN_HEADER_LONG_H,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,74,"opengl_methods.bas");}while(r);
S_37431:;
while((!(func_eof(*_SUB_GL_SCAN_HEADER_LONG_H)))||is_error_pending()){
if(qbevent){evnt(28166,75,"opengl_methods.bas");if(r)goto S_37431;}
do{
tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_H;
if (is_error_pending()) goto skip4499;
sub_file_line_input_string(tmp_fileno,_SUB_GL_SCAN_HEADER_STRING_A);
if (is_error_pending()) goto skip4499;
skip4499:
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,76,"opengl_methods.bas");}while(r);
S_37433:;
if ((qbs_cleanup(qbs_tmp_base,_SUB_GL_SCAN_HEADER_STRING_A->len))||is_error_pending()){
if(qbevent){evnt(28166,77,"opengl_methods.bas");if(r)goto S_37433;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_A,qbs_ltrim(qbs_rtrim(_SUB_GL_SCAN_HEADER_STRING_A)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,78,"opengl_methods.bas");}while(r);
S_37435:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_GL_SCAN_HEADER_STRING_A, 8 ),qbs_new_txt_len("#define ",8))))||is_error_pending()){
if(qbevent){evnt(28166,79,"opengl_methods.bas");if(r)goto S_37435;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,80,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_A,qbs_add(_SUB_GL_SCAN_HEADER_STRING_A,qbs_new_txt_len(" ",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,81,"opengl_methods.bas");}while(r);
S_37438:;
fornext_value4502= 1 ;
fornext_finalvalue4502=_SUB_GL_SCAN_HEADER_STRING_A->len;
fornext_step4502= 1 ;
if (fornext_step4502<0) fornext_step_negative4502=1; else fornext_step_negative4502=0;
if (is_error_pending()) goto fornext_error4502;
goto fornext_entrylabel4502;
while(1){
fornext_value4502=fornext_step4502+(*_SUB_GL_SCAN_HEADER_LONG_X);
fornext_entrylabel4502:
*_SUB_GL_SCAN_HEADER_LONG_X=fornext_value4502;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative4502){
if (fornext_value4502<fornext_finalvalue4502) break;
}else{
if (fornext_value4502>fornext_finalvalue4502) break;
}
fornext_error4502:;
if(qbevent){evnt(28166,82,"opengl_methods.bas");if(r)goto S_37438;}
do{
*_SUB_GL_SCAN_HEADER_LONG_C=qbs_asc(_SUB_GL_SCAN_HEADER_STRING_A,*_SUB_GL_SCAN_HEADER_LONG_X);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,83,"opengl_methods.bas");}while(r);
S_37440:;
if ((-(*_SUB_GL_SCAN_HEADER_LONG_C== 32 ))||is_error_pending()){
if(qbevent){evnt(28166,84,"opengl_methods.bas");if(r)goto S_37440;}
S_37441:;
fornext_value4505= 1 ;
fornext_finalvalue4505=_SUB_GL_SCAN_HEADER_STRING_A2->len;
fornext_step4505= 1 ;
if (fornext_step4505<0) fornext_step_negative4505=1; else fornext_step_negative4505=0;
if (is_error_pending()) goto fornext_error4505;
goto fornext_entrylabel4505;
while(1){
fornext_value4505=fornext_step4505+(*_SUB_GL_SCAN_HEADER_LONG_X2);
fornext_entrylabel4505:
*_SUB_GL_SCAN_HEADER_LONG_X2=fornext_value4505;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative4505){
if (fornext_value4505<fornext_finalvalue4505) break;
}else{
if (fornext_value4505>fornext_finalvalue4505) break;
}
fornext_error4505:;
if(qbevent){evnt(28166,85,"opengl_methods.bas");if(r)goto S_37441;}
do{
*_SUB_GL_SCAN_HEADER_LONG_C2=qbs_asc(_SUB_GL_SCAN_HEADER_STRING_A2,*_SUB_GL_SCAN_HEADER_LONG_X2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,86,"opengl_methods.bas");}while(r);
S_37443:;
if (((-(*_SUB_GL_SCAN_HEADER_LONG_C2>= 65 ))&(-(*_SUB_GL_SCAN_HEADER_LONG_C2<= 90 )))||is_error_pending()){
if(qbevent){evnt(28166,87,"opengl_methods.bas");if(r)goto S_37443;}
do{
goto LABEL_DEFINE_OK;
if(!qbevent)break;evnt(28166,87,"opengl_methods.bas");}while(r);
}
S_37446:;
if (((-(*_SUB_GL_SCAN_HEADER_LONG_C2>= 48 ))&(-(*_SUB_GL_SCAN_HEADER_LONG_C2<= 57 ))&(-(*_SUB_GL_SCAN_HEADER_LONG_X2!= 1 )))||is_error_pending()){
if(qbevent){evnt(28166,88,"opengl_methods.bas");if(r)goto S_37446;}
do{
goto LABEL_DEFINE_OK;
if(!qbevent)break;evnt(28166,88,"opengl_methods.bas");}while(r);
}
S_37449:;
if ((-(*_SUB_GL_SCAN_HEADER_LONG_C2== 95 ))||is_error_pending()){
if(qbevent){evnt(28166,89,"opengl_methods.bas");if(r)goto S_37449;}
do{
goto LABEL_DEFINE_OK;
if(!qbevent)break;evnt(28166,89,"opengl_methods.bas");}while(r);
}
do{
goto LABEL_DEFINE_NOT_OK;
if(!qbevent)break;evnt(28166,90,"opengl_methods.bas");}while(r);
LABEL_DEFINE_OK:;
if(qbevent){evnt(28166,91,"opengl_methods.bas");r=0;}
fornext_continue_4504:;
}
fornext_exit_4504:;
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_VALUE,qbs_ltrim(qbs_rtrim(qbs_right(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_A->len-*_SUB_GL_SCAN_HEADER_LONG_X))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,93,"opengl_methods.bas");}while(r);
S_37455:;
if ((qbs_cleanup(qbs_tmp_base,-(_SUB_GL_SCAN_HEADER_STRING_VALUE->len== 0 )))||is_error_pending()){
if(qbevent){evnt(28166,94,"opengl_methods.bas");if(r)goto S_37455;}
do{
goto LABEL_DEFINE_NOT_OK;
if(!qbevent)break;evnt(28166,94,"opengl_methods.bas");}while(r);
}
S_37458:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_GL_SCAN_HEADER_STRING_VALUE, 2 ),qbs_new_txt_len("0x",2))))||is_error_pending()){
if(qbevent){evnt(28166,96,"opengl_methods.bas");if(r)goto S_37458;}
do{
*_SUB_GL_SCAN_HEADER_INTEGER64_VALUE=qbr(qbs_val<long double>(qbs_add(qbs_add(qbs_new_txt_len("&H",2),qbs_right(_SUB_GL_SCAN_HEADER_STRING_VALUE,_SUB_GL_SCAN_HEADER_STRING_VALUE->len- 2 )),qbs_new_txt_len("&&",2))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,97,"opengl_methods.bas");}while(r);
do{
*_SUB_GL_SCAN_HEADER_LONG_D=*_SUB_GL_SCAN_HEADER_LONG_D+ 1 ;
if(!qbevent)break;evnt(28166,99,"opengl_methods.bas");}while(r);
do{
tmp_long=array_check((*_SUB_GL_SCAN_HEADER_LONG_D)-__ARRAY_STRING_GL_DEFINES[4],__ARRAY_STRING_GL_DEFINES[5]);
if (!is_error_pending()) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[tmp_long])),_SUB_GL_SCAN_HEADER_STRING_A2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,99,"opengl_methods.bas");}while(r);
do{
tmp_long=array_check((*_SUB_GL_SCAN_HEADER_LONG_D)-__ARRAY_INTEGER64_GL_DEFINES_VALUE[4],__ARRAY_INTEGER64_GL_DEFINES_VALUE[5]);
if (!is_error_pending()) ((int64*)(__ARRAY_INTEGER64_GL_DEFINES_VALUE[0]))[tmp_long]=*_SUB_GL_SCAN_HEADER_INTEGER64_VALUE;
if(!qbevent)break;evnt(28166,99,"opengl_methods.bas");}while(r);
S_37463:;
}else{
if (qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_SUB_GL_SCAN_HEADER_STRING_VALUE)>= 48 ))&(-(qbs_asc(_SUB_GL_SCAN_HEADER_STRING_VALUE)<= 57 )))){
if(qbevent){evnt(28166,100,"opengl_methods.bas");if(r)goto S_37463;}
do{
*_SUB_GL_SCAN_HEADER_INTEGER64_VALUE=qbr(qbs_val<long double>(_SUB_GL_SCAN_HEADER_STRING_VALUE));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,101,"opengl_methods.bas");}while(r);
do{
*_SUB_GL_SCAN_HEADER_LONG_D=*_SUB_GL_SCAN_HEADER_LONG_D+ 1 ;
if(!qbevent)break;evnt(28166,103,"opengl_methods.bas");}while(r);
do{
tmp_long=array_check((*_SUB_GL_SCAN_HEADER_LONG_D)-__ARRAY_STRING_GL_DEFINES[4],__ARRAY_STRING_GL_DEFINES[5]);
if (!is_error_pending()) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[tmp_long])),_SUB_GL_SCAN_HEADER_STRING_A2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,103,"opengl_methods.bas");}while(r);
do{
tmp_long=array_check((*_SUB_GL_SCAN_HEADER_LONG_D)-__ARRAY_INTEGER64_GL_DEFINES_VALUE[4],__ARRAY_INTEGER64_GL_DEFINES_VALUE[5]);
if (!is_error_pending()) ((int64*)(__ARRAY_INTEGER64_GL_DEFINES_VALUE[0]))[tmp_long]=*_SUB_GL_SCAN_HEADER_INTEGER64_VALUE;
if(!qbevent)break;evnt(28166,103,"opengl_methods.bas");}while(r);
}else{
S_37469:;
fornext_value4511= 1 ;
fornext_finalvalue4511=*_SUB_GL_SCAN_HEADER_LONG_D;
fornext_step4511= 1 ;
if (fornext_step4511<0) fornext_step_negative4511=1; else fornext_step_negative4511=0;
if (is_error_pending()) goto fornext_error4511;
goto fornext_entrylabel4511;
while(1){
fornext_value4511=fornext_step4511+(*_SUB_GL_SCAN_HEADER_LONG_I);
fornext_entrylabel4511:
*_SUB_GL_SCAN_HEADER_LONG_I=fornext_value4511;
if (fornext_step_negative4511){
if (fornext_value4511<fornext_finalvalue4511) break;
}else{
if (fornext_value4511>fornext_finalvalue4511) break;
}
fornext_error4511:;
if(qbevent){evnt(28166,106,"opengl_methods.bas");if(r)goto S_37469;}
S_37470:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[array_check((*_SUB_GL_SCAN_HEADER_LONG_I)-__ARRAY_STRING_GL_DEFINES[4],__ARRAY_STRING_GL_DEFINES[5])])),_SUB_GL_SCAN_HEADER_STRING_VALUE)))||is_error_pending()){
if(qbevent){evnt(28166,107,"opengl_methods.bas");if(r)goto S_37470;}
do{
*_SUB_GL_SCAN_HEADER_LONG_D=*_SUB_GL_SCAN_HEADER_LONG_D+ 1 ;
if(!qbevent)break;evnt(28166,108,"opengl_methods.bas");}while(r);
do{
tmp_long=array_check((*_SUB_GL_SCAN_HEADER_LONG_D)-__ARRAY_STRING_GL_DEFINES[4],__ARRAY_STRING_GL_DEFINES[5]);
if (!is_error_pending()) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[tmp_long])),_SUB_GL_SCAN_HEADER_STRING_A2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,108,"opengl_methods.bas");}while(r);
do{
tmp_long=array_check((*_SUB_GL_SCAN_HEADER_LONG_D)-__ARRAY_INTEGER64_GL_DEFINES_VALUE[4],__ARRAY_INTEGER64_GL_DEFINES_VALUE[5]);
if (!is_error_pending()) ((int64*)(__ARRAY_INTEGER64_GL_DEFINES_VALUE[0]))[tmp_long]=((int64*)(__ARRAY_INTEGER64_GL_DEFINES_VALUE[0]))[array_check((*_SUB_GL_SCAN_HEADER_LONG_I)-__ARRAY_INTEGER64_GL_DEFINES_VALUE[4],__ARRAY_INTEGER64_GL_DEFINES_VALUE[5])];
if(!qbevent)break;evnt(28166,108,"opengl_methods.bas");}while(r);
do{
goto fornext_exit_4510;
if(!qbevent)break;evnt(28166,110,"opengl_methods.bas");}while(r);
}
fornext_continue_4510:;
}
fornext_exit_4510:;
}
}
do{
goto LABEL_GOT_DEFINE;
if(!qbevent)break;evnt(28166,114,"opengl_methods.bas");}while(r);
LABEL_DEFINE_NOT_OK:;
if(qbevent){evnt(28166,115,"opengl_methods.bas");r=0;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,116,"opengl_methods.bas");}while(r);
}else{
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_add(_SUB_GL_SCAN_HEADER_STRING_A2,func_chr(*_SUB_GL_SCAN_HEADER_LONG_C)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,118,"opengl_methods.bas");}while(r);
}
fornext_continue_4501:;
}
fornext_exit_4501:;
LABEL_GOT_DEFINE:;
if(qbevent){evnt(28166,121,"opengl_methods.bas");r=0;}
}
S_37485:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_SUB_GL_SCAN_HEADER_STRING_A, 1 ),qbs_new_txt_len(";",1))))||is_error_pending()){
if(qbevent){evnt(28166,125,"opengl_methods.bas");if(r)goto S_37485;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_A2,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,126,"opengl_methods.bas");}while(r);
S_37487:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_new_txt_len("WINGDIAPI",9))))||is_error_pending()){
if(qbevent){evnt(28166,126,"opengl_methods.bas");if(r)goto S_37487;}
do{
goto LABEL_DISCARD;
if(!qbevent)break;evnt(28166,126,"opengl_methods.bas");}while(r);
}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_RET_TYPE,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,127,"opengl_methods.bas");}while(r);
S_37491:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_GL_SCAN_HEADER_STRING_RET_TYPE,qbs_new_txt_len("const",5))))||is_error_pending()){
if(qbevent){evnt(28166,128,"opengl_methods.bas");if(r)goto S_37491;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_RET_TYPE,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,128,"opengl_methods.bas");}while(r);
}
do{
*_SUB_GL_SCAN_HEADER_LONG_IS_FUNC= 0 ;
if(!qbevent)break;evnt(28166,130,"opengl_methods.bas");}while(r);
S_37495:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_GL_SCAN_HEADER_STRING_RET_TYPE,qbs_new_txt_len("void",4))))||is_error_pending()){
if(qbevent){evnt(28166,130,"opengl_methods.bas");if(r)goto S_37495;}
do{
*_SUB_GL_SCAN_HEADER_LONG_IS_FUNC= 1 ;
if(!qbevent)break;evnt(28166,130,"opengl_methods.bas");}while(r);
}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_A2,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,132,"opengl_methods.bas");}while(r);
S_37499:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_new_txt_len("*APIENTRY",9))))||is_error_pending()){
if(qbevent){evnt(28166,133,"opengl_methods.bas");if(r)goto S_37499;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_RET_TYPE,qbs_add(_SUB_GL_SCAN_HEADER_STRING_RET_TYPE,qbs_new_txt_len("*",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,133,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_new_txt_len("APIENTRY",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,133,"opengl_methods.bas");}while(r);
}
S_37503:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_new_txt_len("APIENTRY",8))))||is_error_pending()){
if(qbevent){evnt(28166,134,"opengl_methods.bas");if(r)goto S_37503;}
do{
goto LABEL_DISCARD;
if(!qbevent)break;evnt(28166,134,"opengl_methods.bas");}while(r);
}
do{
*__LONG_GL_COMMANDS_LAST=*__LONG_GL_COMMANDS_LAST+ 1 ;
if(!qbevent)break;evnt(28166,136,"opengl_methods.bas");}while(r);
do{
*_SUB_GL_SCAN_HEADER_LONG_C=*__LONG_GL_COMMANDS_LAST;
if(!qbevent)break;evnt(28166,137,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,139,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,140,"opengl_methods.bas");}while(r);
do{
*_SUB_GL_SCAN_HEADER_LONG_NEED_HELPER_FUNCTION= 0 ;
if(!qbevent)break;evnt(28166,141,"opengl_methods.bas");}while(r);
S_37511:;
if ((*_SUB_GL_SCAN_HEADER_LONG_IS_FUNC)||is_error_pending()){
if(qbevent){evnt(28166,143,"opengl_methods.bas");if(r)goto S_37511;}
do{
*(int16*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+64)))= 1 ;
if(!qbevent)break;evnt(28166,144,"opengl_methods.bas");}while(r);
S_37513:;
if ((*__LONG_GL_KIT)||is_error_pending()){
if(qbevent){evnt(28166,145,"opengl_methods.bas");if(r)goto S_37513;}
do{
tab_spc_cr_size=2;
tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK;
if (is_error_pending()) goto skip4512;
sub_file_print(tmp_fileno,qbs_new_txt_len("FUNCTION ",9), 0, 0, 0);
if (is_error_pending()) goto skip4512;
skip4512:
qbs_cleanup(qbs_tmp_base,0);
tab_spc_cr_size=1;
if(!qbevent)break;evnt(28166,145,"opengl_methods.bas");}while(r);
}
}else{
do{
*(int16*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+64)))= 2 ;
if(!qbevent)break;evnt(28166,147,"opengl_methods.bas");}while(r);
S_37518:;
if ((*__LONG_GL_KIT)||is_error_pending()){
if(qbevent){evnt(28166,148,"opengl_methods.bas");if(r)goto S_37518;}
do{
tab_spc_cr_size=2;
tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK;
if (is_error_pending()) goto skip4513;
sub_file_print(tmp_fileno,qbs_new_txt_len("SUB ",4), 0, 0, 0);
if (is_error_pending()) goto skip4513;
skip4513:
qbs_cleanup(qbs_tmp_base,0);
tab_spc_cr_size=1;
if(!qbevent)break;evnt(28166,148,"opengl_methods.bas");}while(r);
}
}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_PROC_NAME,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,151,"opengl_methods.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+0))),64,1),qbs_add(qbs_new_txt_len("_",1),_SUB_GL_SCAN_HEADER_STRING_PROC_NAME));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,153,"opengl_methods.bas");}while(r);
S_37524:;
if ((*__LONG_GL_KIT)||is_error_pending()){
if(qbevent){evnt(28166,153,"opengl_methods.bas");if(r)goto S_37524;}
do{
tab_spc_cr_size=2;
tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK;
if (is_error_pending()) goto skip4514;
sub_file_print(tmp_fileno,_SUB_GL_SCAN_HEADER_STRING_PROC_NAME, 0, 0, 0);
if (is_error_pending()) goto skip4514;
skip4514:
qbs_cleanup(qbs_tmp_base,0);
tab_spc_cr_size=1;
if(!qbevent)break;evnt(28166,153,"opengl_methods.bas");}while(r);
}
do{
qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+66))),64,1),_SUB_GL_SCAN_HEADER_STRING_PROC_NAME);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,154,"opengl_methods.bas");}while(r);
do{
*(int32*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+212)))= 0 ;
if(!qbevent)break;evnt(28166,156,"opengl_methods.bas");}while(r);
S_37529:;
if ((*_SUB_GL_SCAN_HEADER_LONG_IS_FUNC)||is_error_pending()){
if(qbevent){evnt(28166,157,"opengl_methods.bas");if(r)goto S_37529;}
do{
*_SUB_GL_SCAN_HEADER_LONG_POINTER= 0 ;
if(!qbevent)break;evnt(28166,158,"opengl_methods.bas");}while(r);
S_37531:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_SUB_GL_SCAN_HEADER_STRING_RET_TYPE, 1 ),qbs_new_txt_len("*",1))))||is_error_pending()){
if(qbevent){evnt(28166,158,"opengl_methods.bas");if(r)goto S_37531;}
do{
*_SUB_GL_SCAN_HEADER_LONG_POINTER= 1 ;
if(!qbevent)break;evnt(28166,158,"opengl_methods.bas");}while(r);
}
S_37534:;
if ((*_SUB_GL_SCAN_HEADER_LONG_POINTER)||is_error_pending()){
if(qbevent){evnt(28166,159,"opengl_methods.bas");if(r)goto S_37534;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_T,qbs_new_txt_len("_OFFSET",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,160,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_S,qbs_new_txt_len("&&",2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,160,"opengl_methods.bas");}while(r);
do{
*(int32*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+212)))=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(28166,161,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_add(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_new_txt_len("ptrszint ",9)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,162,"opengl_methods.bas");}while(r);
do{
*_SUB_GL_SCAN_HEADER_LONG_NEED_HELPER_FUNCTION= 1 ;
if(!qbevent)break;evnt(28166,163,"opengl_methods.bas");}while(r);
}else{
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_T,FUNC_GL2QB_TYPE_CONVERT(_SUB_GL_SCAN_HEADER_STRING_RET_TYPE,_SUB_GL_SCAN_HEADER_STRING_S,_SUB_GL_SCAN_HEADER_LONG_TYP,_SUB_GL_SCAN_HEADER_STRING_CTYP));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,165,"opengl_methods.bas");}while(r);
do{
*(int32*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+212)))=*_SUB_GL_SCAN_HEADER_LONG_TYP;
if(!qbevent)break;evnt(28166,166,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_add(qbs_add(_SUB_GL_SCAN_HEADER_STRING_HD,_SUB_GL_SCAN_HEADER_STRING_CTYP),qbs_new_txt_len(" ",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,167,"opengl_methods.bas");}while(r);
}
S_37545:;
if ((*__LONG_GL_KIT)||is_error_pending()){
if(qbevent){evnt(28166,169,"opengl_methods.bas");if(r)goto S_37545;}
do{
tab_spc_cr_size=2;
tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK;
if (is_error_pending()) goto skip4515;
sub_file_print(tmp_fileno,_SUB_GL_SCAN_HEADER_STRING_S, 0, 0, 0);
if (is_error_pending()) goto skip4515;
skip4515:
qbs_cleanup(qbs_tmp_base,0);
tab_spc_cr_size=1;
if(!qbevent)break;evnt(28166,169,"opengl_methods.bas");}while(r);
}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_new_txt_len("return (",8)),_SUB_GL_SCAN_HEADER_STRING_CTYP),qbs_new_txt_len(")(",2)),_SUB_GL_SCAN_HEADER_STRING_RET_TYPE),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,170,"opengl_methods.bas");}while(r);
}else{
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_add(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_new_txt_len("void ",5)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,172,"opengl_methods.bas");}while(r);
}
S_37552:;
if ((*__LONG_GL_KIT)||is_error_pending()){
if(qbevent){evnt(28166,175,"opengl_methods.bas");if(r)goto S_37552;}
do{
tab_spc_cr_size=2;
tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK;
if (is_error_pending()) goto skip4516;
sub_file_print(tmp_fileno,qbs_new_txt_len("(",1), 0, 0, 0);
if (is_error_pending()) goto skip4516;
skip4516:
qbs_cleanup(qbs_tmp_base,0);
tab_spc_cr_size=1;
if(!qbevent)break;evnt(28166,175,"opengl_methods.bas");}while(r);
}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_add(qbs_add(_SUB_GL_SCAN_HEADER_STRING_HC,_SUB_GL_SCAN_HEADER_STRING_PROC_NAME),qbs_new_txt_len("(",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,177,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_add(qbs_add(qbs_add(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_new_txt_len("call_",5)),_SUB_GL_SCAN_HEADER_STRING_PROC_NAME),qbs_new_txt_len("(",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,178,"opengl_methods.bas");}while(r);
do{
*(int16*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+130)))= 0 ;
if(!qbevent)break;evnt(28166,181,"opengl_methods.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+132))),80,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,182,"opengl_methods.bas");}while(r);
S_37559:;
do{
if(qbevent){evnt(28166,184,"opengl_methods.bas");if(r)goto S_37559;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,186,"opengl_methods.bas");}while(r);
S_37561:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_new_txt_len("",0)))&(qbs_equal(_SUB_GL_SCAN_HEADER_STRING_L,qbs_new_txt_len("(",1)))))||is_error_pending()){
if(qbevent){evnt(28166,187,"opengl_methods.bas");if(r)goto S_37561;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,187,"opengl_methods.bas");}while(r);
}
S_37564:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_new_txt_len("const",5))))||is_error_pending()){
if(qbevent){evnt(28166,188,"opengl_methods.bas");if(r)goto S_37564;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,188,"opengl_methods.bas");}while(r);
}
S_37567:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_new_txt_len("void",4)))|(qbs_equal(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_new_txt_len("",0)))))||is_error_pending()){
if(qbevent){evnt(28166,189,"opengl_methods.bas");if(r)goto S_37567;}
do{
goto LABEL_NO_ARGUMENTS;
if(!qbevent)break;evnt(28166,189,"opengl_methods.bas");}while(r);
}
S_37570:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_SUB_GL_SCAN_HEADER_STRING_L,qbs_new_txt_len(",",1)))&(qbs_notequal(_SUB_GL_SCAN_HEADER_STRING_L,qbs_new_txt_len(")",1)))))||is_error_pending()){
if(qbevent){evnt(28166,190,"opengl_methods.bas");if(r)goto S_37570;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,191,"opengl_methods.bas");}while(r);
S_37572:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME, 1 ),qbs_new_txt_len("*",1))))||is_error_pending()){
if(qbevent){evnt(28166,192,"opengl_methods.bas");if(r)goto S_37572;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_add(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_new_txt_len("*",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,192,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME,qbs_right(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME,_SUB_GL_SCAN_HEADER_STRING_VAR_NAME->len- 1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,192,"opengl_methods.bas");}while(r);
}
S_37576:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME, 1 ),qbs_new_txt_len("*",1))))||is_error_pending()){
if(qbevent){evnt(28166,193,"opengl_methods.bas");if(r)goto S_37576;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_add(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_new_txt_len("*",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,193,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME,qbs_right(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME,_SUB_GL_SCAN_HEADER_STRING_VAR_NAME->len- 1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,193,"opengl_methods.bas");}while(r);
}
}else{
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME,qbs_new_txt_len("no_name",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,196,"opengl_methods.bas");}while(r);
}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE_BACKUP,_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,199,"opengl_methods.bas");}while(r);
do{
*_SUB_GL_SCAN_HEADER_LONG_POINTER= 0 ;
if(!qbevent)break;evnt(28166,201,"opengl_methods.bas");}while(r);
S_37585:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE, 1 ),qbs_new_txt_len("*",1))))||is_error_pending()){
if(qbevent){evnt(28166,203,"opengl_methods.bas");if(r)goto S_37585;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_left(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE->len- 1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,204,"opengl_methods.bas");}while(r);
do{
*_SUB_GL_SCAN_HEADER_LONG_POINTER= 1 ;
if(!qbevent)break;evnt(28166,205,"opengl_methods.bas");}while(r);
}
S_37589:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE, 1 ),qbs_new_txt_len("*",1))))||is_error_pending()){
if(qbevent){evnt(28166,207,"opengl_methods.bas");if(r)goto S_37589;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_left(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE->len- 1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,208,"opengl_methods.bas");}while(r);
do{
*_SUB_GL_SCAN_HEADER_LONG_POINTER= 2 ;
if(!qbevent)break;evnt(28166,209,"opengl_methods.bas");}while(r);
}
S_37593:;
if ((-(*_SUB_GL_SCAN_HEADER_LONG_POINTER== 2 ))||is_error_pending()){
if(qbevent){evnt(28166,212,"opengl_methods.bas");if(r)goto S_37593;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_QB_TYPE,qbs_new_txt_len("_OFFSET",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,213,"opengl_methods.bas");}while(r);
}else{
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_QB_TYPE,FUNC_GL2QB_TYPE_CONVERT(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,_SUB_GL_SCAN_HEADER_STRING_S,_SUB_GL_SCAN_HEADER_LONG_TYP,_SUB_GL_SCAN_HEADER_STRING_CTYP));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,215,"opengl_methods.bas");}while(r);
}
do{
*_SUB_GL_SCAN_HEADER_LONG_NEED_HELPER_FUNCTION= 1 ;
if(!qbevent)break;evnt(28166,219,"opengl_methods.bas");}while(r);
S_37599:;
if ((*__LONG_GL_KIT)||is_error_pending()){
if(qbevent){evnt(28166,221,"opengl_methods.bas");if(r)goto S_37599;}
S_37600:;
if ((-(*_SUB_GL_SCAN_HEADER_LONG_POINTER== 0 ))||is_error_pending()){
if(qbevent){evnt(28166,222,"opengl_methods.bas");if(r)goto S_37600;}
do{
tab_spc_cr_size=2;
tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK;
if (is_error_pending()) goto skip4522;
sub_file_print(tmp_fileno,qbs_new_txt_len("BYVAL ",6), 0, 0, 0);
if (is_error_pending()) goto skip4522;
skip4522:
qbs_cleanup(qbs_tmp_base,0);
tab_spc_cr_size=1;
if(!qbevent)break;evnt(28166,222,"opengl_methods.bas");}while(r);
}
do{
tab_spc_cr_size=2;
tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK;
if (is_error_pending()) goto skip4523;
sub_file_print(tmp_fileno,qbs_add(qbs_add(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME,qbs_new_txt_len(" AS ",4)),_SUB_GL_SCAN_HEADER_STRING_QB_TYPE), 0, 0, 0);
if (is_error_pending()) goto skip4523;
skip4523:
qbs_cleanup(qbs_tmp_base,0);
tab_spc_cr_size=1;
if(!qbevent)break;evnt(28166,223,"opengl_methods.bas");}while(r);
S_37604:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_GL_SCAN_HEADER_STRING_L,qbs_new_txt_len(")",1))))||is_error_pending()){
if(qbevent){evnt(28166,224,"opengl_methods.bas");if(r)goto S_37604;}
do{
tab_spc_cr_size=2;
tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK;
if (is_error_pending()) goto skip4524;
sub_file_print(tmp_fileno,qbs_new_txt_len(",",1), 0, 0, 0);
if (is_error_pending()) goto skip4524;
skip4524:
qbs_cleanup(qbs_tmp_base,0);
tab_spc_cr_size=1;
if(!qbevent)break;evnt(28166,224,"opengl_methods.bas");}while(r);
}
}
S_37608:;
if ((-(*_SUB_GL_SCAN_HEADER_LONG_POINTER== 0 ))||is_error_pending()){
if(qbevent){evnt(28166,227,"opengl_methods.bas");if(r)goto S_37608;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_ARG,l2string(*_SUB_GL_SCAN_HEADER_LONG_TYP));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,228,"opengl_methods.bas");}while(r);
}
S_37611:;
if ((-(*_SUB_GL_SCAN_HEADER_LONG_POINTER== 1 ))||is_error_pending()){
if(qbevent){evnt(28166,230,"opengl_methods.bas");if(r)goto S_37611;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_ARG,l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,231,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_CTYP,qbs_new_txt_len("ptrszint",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,232,"opengl_methods.bas");}while(r);
}
S_37615:;
if ((-(*_SUB_GL_SCAN_HEADER_LONG_POINTER== 2 ))||is_error_pending()){
if(qbevent){evnt(28166,234,"opengl_methods.bas");if(r)goto S_37615;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_ARG,l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,235,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_CTYP,qbs_new_txt_len("ptrszint",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,236,"opengl_methods.bas");}while(r);
}
do{
*(int16*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+130)))=*(int16*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+130)))+ 1 ;
if(!qbevent)break;evnt(28166,243,"opengl_methods.bas");}while(r);
do{
sub_mid(qbs_new_fixed((((uint8*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+132))),80,1),((*(int16*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+130)))- 1 )* 4 )+( 1 ), 4 ,_SUB_GL_SCAN_HEADER_STRING_ARG,1);
if(!qbevent)break;evnt(28166,245,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_LETTER,func_chr( 96 +*(int16*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+130)))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,250,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_new_txt_len("(",1)),_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE_BACKUP),qbs_new_txt_len(")",1)),_SUB_GL_SCAN_HEADER_STRING_LETTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,252,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_add(qbs_add(qbs_add(_SUB_GL_SCAN_HEADER_STRING_HD,_SUB_GL_SCAN_HEADER_STRING_CTYP),qbs_new_txt_len(" ",1)),_SUB_GL_SCAN_HEADER_STRING_LETTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,253,"opengl_methods.bas");}while(r);
S_37624:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_GL_SCAN_HEADER_STRING_L,qbs_new_txt_len(")",1))))||is_error_pending()){
if(qbevent){evnt(28166,257,"opengl_methods.bas");if(r)goto S_37624;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_add(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_new_txt_len(",",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,257,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_add(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_new_txt_len(",",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,257,"opengl_methods.bas");}while(r);
}
S_37628:;
dl_continue_4517:;
}while((!(qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_GL_SCAN_HEADER_STRING_L,qbs_new_txt_len(")",1)))))&&(!is_error_pending()));
dl_exit_4517:;
if(qbevent){evnt(28166,259,"opengl_methods.bas");if(r)goto S_37628;}
LABEL_NO_ARGUMENTS:;
if(qbevent){evnt(28166,260,"opengl_methods.bas");r=0;}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_add(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_new_txt_len("){",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,263,"opengl_methods.bas");}while(r);
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_add(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_new_txt_len(");",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,264,"opengl_methods.bas");}while(r);
S_37631:;
if ((*__LONG_GL_KIT)||is_error_pending()){
if(qbevent){evnt(28166,265,"opengl_methods.bas");if(r)goto S_37631;}
do{
tab_spc_cr_size=2;
tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK;
if (is_error_pending()) goto skip4525;
sub_file_print(tmp_fileno,qbs_new_txt_len(")",1), 0, 0, 1);
if (is_error_pending()) goto skip4525;
skip4525:
qbs_cleanup(qbs_tmp_base,0);
tab_spc_cr_size=1;
if(!qbevent)break;evnt(28166,265,"opengl_methods.bas");}while(r);
}
do{
qbs_set(_SUB_GL_SCAN_HEADER_STRING_H,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_GL_SCAN_HEADER_STRING_HD,__STRING_CRLF),qbs_new_txt_len("if (!sub_gl_called) error(270);",31)),__STRING_CRLF),_SUB_GL_SCAN_HEADER_STRING_HC),__STRING_CRLF),qbs_new_txt_len("}",1)),__STRING_CRLF));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,266,"opengl_methods.bas");}while(r);
S_37635:;
if ((*_SUB_GL_SCAN_HEADER_LONG_NEED_HELPER_FUNCTION)||is_error_pending()){
if(qbevent){evnt(28166,268,"opengl_methods.bas");if(r)goto S_37635;}
do{
qbs_set(__STRING_GL_HELPER_CODE,qbs_add(__STRING_GL_HELPER_CODE,_SUB_GL_SCAN_HEADER_STRING_H));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,269,"opengl_methods.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+66))),64,1),qbs_add(qbs_new_txt_len("call_",5),_SUB_GL_SCAN_HEADER_STRING_PROC_NAME));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,270,"opengl_methods.bas");}while(r);
}
S_37639:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_GL_SCAN_HEADER_STRING_PROC_NAME,qbs_new_txt_len("glGetString",11))))||is_error_pending()){
if(qbevent){evnt(28166,274,"opengl_methods.bas");if(r)goto S_37639;}
do{
*(int32*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+212)))=*__LONG_STRINGTYPE;
if(!qbevent)break;evnt(28166,275,"opengl_methods.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+66))),64,1),qbs_add(qbs_new_txt_len("(  char*  )",11),qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_GL_COMMANDS[0])+(((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+66))),64,1))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,276,"opengl_methods.bas");}while(r);
}
}
}
LABEL_DISCARD:;
if(qbevent){evnt(28166,290,"opengl_methods.bas");r=0;}
dl_continue_4498:;
}
dl_exit_4498:;
do{
sub_close(*_SUB_GL_SCAN_HEADER_LONG_H,1);
if(!qbevent)break;evnt(28166,292,"opengl_methods.bas");}while(r);
S_37647:;
if ((*__LONG_GL_KIT)||is_error_pending()){
if(qbevent){evnt(28166,294,"opengl_methods.bas");if(r)goto S_37647;}
do{
tab_spc_cr_size=2;
tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK;
if (is_error_pending()) goto skip4526;
sub_file_print(tmp_fileno,qbs_new_txt_len("END DECLARE",11), 0, 0, 1);
if (is_error_pending()) goto skip4526;
skip4526:
qbs_cleanup(qbs_tmp_base,0);
tab_spc_cr_size=1;
if(!qbevent)break;evnt(28166,294,"opengl_methods.bas");}while(r);
}
do{
*__LONG_GL_DEFINES_LAST=*_SUB_GL_SCAN_HEADER_LONG_D;
if(!qbevent)break;evnt(28166,296,"opengl_methods.bas");}while(r);
do{
if (__ARRAY_STRING_GL_DEFINES[2]&2){
error(10);
}else{
static int64 alloc_new_desc[8];
static uint64 alloc_req_elems;
static uint64 alloc_req_bytes;
static uint64 alloc_dim_value;
static uint64 alloc_bytes_per_element;
((mem_lock*)((ptrszint*)__ARRAY_STRING_GL_DEFINES)[8])->id=(++mem_lock_id);
static ptrszint preserve_old_ptr;
static ptrszint preserve_old_flags;
static uint64 preserve_old_total;
static uint64 preserve_new_total;
static uint64 preserve_copy_count;
static ptrszint preserve_new_ptr;
if (__ARRAY_STRING_GL_DEFINES[2]&1){
preserve_old_ptr=__ARRAY_STRING_GL_DEFINES[0];
preserve_old_flags=__ARRAY_STRING_GL_DEFINES[2];
preserve_old_total=__ARRAY_STRING_GL_DEFINES[5];
}else{
preserve_old_total=0; preserve_old_ptr=0; preserve_old_flags=0; preserve_new_total=0; preserve_copy_count=0;
}
alloc_new_desc[4]= 0 ;
alloc_new_desc[5]=(*_SUB_GL_SCAN_HEADER_LONG_D)-alloc_new_desc[4]+1;
if (alloc_new_desc[5]<=0) error(5);
alloc_new_desc[6]=1;
alloc_req_elems=1;
alloc_bytes_per_element=(uint64)(8);
if (!alloc_bytes_per_element) error(257);
if (((int64)((ptrszint)alloc_new_desc[4]))!=alloc_new_desc[4]) error(257);
if (alloc_new_desc[5]<0) error(257);
if (((int64)((ptrszint)alloc_new_desc[5]))!=alloc_new_desc[5]) error(257);
if (alloc_new_desc[6]<0) error(257);
if (((int64)((ptrszint)alloc_new_desc[6]))!=alloc_new_desc[6]) error(257);
alloc_dim_value=(uint64)alloc_new_desc[5];
if (alloc_dim_value){
if (alloc_req_elems>(18446744073709551615ull/alloc_dim_value)) error(257);
alloc_req_elems*=alloc_dim_value;
}
if (alloc_req_elems>(18446744073709551615ull/alloc_bytes_per_element)) error(257);
alloc_req_bytes=alloc_req_elems*alloc_bytes_per_element;
if (((uint64)((ptrszint)alloc_req_elems))!=alloc_req_elems) error(257);
if (((uint64)((size_t)alloc_req_bytes))!=alloc_req_bytes) error(257);
preserve_new_total=alloc_req_elems;
preserve_copy_count=preserve_old_total;
if (preserve_new_total<preserve_copy_count) preserve_copy_count=preserve_new_total;
if (preserve_old_total){
preserve_new_ptr=(ptrszint)malloc((size_t)alloc_req_bytes);
if (!preserve_new_ptr) error(257);
__ARRAY_STRING_GL_DEFINES[0]=preserve_new_ptr;
__ARRAY_STRING_GL_DEFINES[2]|=1;
tmp_long=(ptrszint)alloc_req_elems;
if (__ARRAY_STRING_GL_DEFINES[2]&4){
while(tmp_long--) ((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0);
}else{
while(tmp_long--) ((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[tmp_long]=(uint64)qbs_new(0,0);
}
tmp_long=preserve_copy_count;
while(tmp_long--){
qbs_set((qbs*)((uint64*)(preserve_new_ptr))[tmp_long],(qbs*)((uint64*)(preserve_old_ptr))[tmp_long]);
}
tmp_long=preserve_old_total;
while(tmp_long--) qbs_free((qbs*)((uint64*)(preserve_old_ptr))[tmp_long]);
free((void*)(preserve_old_ptr));
__ARRAY_STRING_GL_DEFINES[0]=preserve_new_ptr;
}else{
__ARRAY_STRING_GL_DEFINES[0]=(ptrszint)malloc((size_t)alloc_req_bytes);
if (!__ARRAY_STRING_GL_DEFINES[0]) error(257);
__ARRAY_STRING_GL_DEFINES[2]|=1;
tmp_long=(ptrszint)alloc_req_elems;
if (__ARRAY_STRING_GL_DEFINES[2]&4){
while(tmp_long--) ((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0);
}else{
while(tmp_long--) ((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[tmp_long]=(uint64)qbs_new(0,0);
}
}
__ARRAY_STRING_GL_DEFINES[4]=alloc_new_desc[4];
__ARRAY_STRING_GL_DEFINES[5]=alloc_new_desc[5];
__ARRAY_STRING_GL_DEFINES[6]=alloc_new_desc[6];
__ARRAY_STRING_GL_DEFINES[7]=alloc_new_desc[7];
}
if(!qbevent)break;evnt(28166,297,"opengl_methods.bas");}while(r);
do{
if (__ARRAY_UDT_GL_COMMANDS[2]&2){
error(10);
}else{
static int64 alloc_new_desc[8];
static uint64 alloc_req_elems;
static uint64 alloc_req_bytes;
static uint64 alloc_dim_value;
static uint64 alloc_bytes_per_element;
((mem_lock*)((ptrszint*)__ARRAY_UDT_GL_COMMANDS)[8])->id=(++mem_lock_id);
static ptrszint preserve_old_ptr;
static ptrszint preserve_old_flags;
static uint64 preserve_old_total;
static uint64 preserve_new_total;
static uint64 preserve_copy_count;
static ptrszint preserve_new_ptr;
if (__ARRAY_UDT_GL_COMMANDS[2]&1){
preserve_old_ptr=__ARRAY_UDT_GL_COMMANDS[0];
preserve_old_flags=__ARRAY_UDT_GL_COMMANDS[2];
preserve_old_total=__ARRAY_UDT_GL_COMMANDS[5];
}else{
preserve_old_total=0; preserve_old_ptr=0; preserve_old_flags=0; preserve_new_total=0; preserve_copy_count=0;
}
alloc_new_desc[4]= 0 ;
alloc_new_desc[5]=(*__LONG_GL_COMMANDS_LAST)-alloc_new_desc[4]+1;
if (alloc_new_desc[5]<=0) error(5);
alloc_new_desc[6]=1;
alloc_req_elems=1;
alloc_bytes_per_element=(uint64)(216);
if (!alloc_bytes_per_element) error(257);
if (((int64)((ptrszint)alloc_new_desc[4]))!=alloc_new_desc[4]) error(257);
if (alloc_new_desc[5]<0) error(257);
if (((int64)((ptrszint)alloc_new_desc[5]))!=alloc_new_desc[5]) error(257);
if (alloc_new_desc[6]<0) error(257);
if (((int64)((ptrszint)alloc_new_desc[6]))!=alloc_new_desc[6]) error(257);
alloc_dim_value=(uint64)alloc_new_desc[5];
if (alloc_dim_value){
if (alloc_req_elems>(18446744073709551615ull/alloc_dim_value)) error(257);
alloc_req_elems*=alloc_dim_value;
}
if (alloc_req_elems>(18446744073709551615ull/alloc_bytes_per_element)) error(257);
alloc_req_bytes=alloc_req_elems*alloc_bytes_per_element;
if (((uint64)((ptrszint)alloc_req_elems))!=alloc_req_elems) error(257);
if (((uint64)((size_t)alloc_req_bytes))!=alloc_req_bytes) error(257);
preserve_new_total=alloc_req_elems;
preserve_copy_count=preserve_old_total;
if (preserve_new_total<preserve_copy_count) preserve_copy_count=preserve_new_total;
if (__ARRAY_UDT_GL_COMMANDS[2]&4){
if (preserve_old_total){
preserve_new_ptr=(ptrszint)cmem_dynamic_malloc((size_t)alloc_req_bytes);
if (!preserve_new_ptr) error(257);
memset((void*)(preserve_new_ptr),0,(size_t)alloc_req_bytes);
if (preserve_copy_count) memcpy((void*)(preserve_new_ptr),(void*)(preserve_old_ptr),preserve_copy_count*216);
if (preserve_old_flags&4){
cmem_dynamic_free((uint8*)(preserve_old_ptr));
}else{
free((void*)(preserve_old_ptr));
}
__ARRAY_UDT_GL_COMMANDS[0]=preserve_new_ptr;
}else{
__ARRAY_UDT_GL_COMMANDS[0]=(ptrszint)cmem_dynamic_malloc((size_t)alloc_req_bytes);
if (!__ARRAY_UDT_GL_COMMANDS[0]) error(257);
memset((void*)(__ARRAY_UDT_GL_COMMANDS[0]),0,(size_t)alloc_req_bytes);
}
}else{
if (preserve_old_total){
preserve_new_ptr=(ptrszint)calloc((size_t)alloc_req_bytes,1);
if (!preserve_new_ptr) error(257);
if (preserve_copy_count) memcpy((void*)(preserve_new_ptr),(void*)(preserve_old_ptr),preserve_copy_count*216);
if (preserve_old_flags&4){
cmem_dynamic_free((uint8*)(preserve_old_ptr));
}else{
free((void*)(preserve_old_ptr));
}
__ARRAY_UDT_GL_COMMANDS[0]=preserve_new_ptr;
}else{
__ARRAY_UDT_GL_COMMANDS[0]=(ptrszint)calloc((size_t)alloc_req_bytes,1);
if (!__ARRAY_UDT_GL_COMMANDS[0]) error(257);
}
}
__ARRAY_UDT_GL_COMMANDS[2]|=1;
__ARRAY_UDT_GL_COMMANDS[4]=alloc_new_desc[4];
__ARRAY_UDT_GL_COMMANDS[5]=alloc_new_desc[5];
__ARRAY_UDT_GL_COMMANDS[6]=alloc_new_desc[6];
__ARRAY_UDT_GL_COMMANDS[7]=alloc_new_desc[7];
}
if(!qbevent)break;evnt(28166,300,"opengl_methods.bas");}while(r);
S_37653:;
if ((*__LONG_GL_KIT)||is_error_pending()){
if(qbevent){evnt(28166,303,"opengl_methods.bas");if(r)goto S_37653;}
S_37654:;
fornext_value4528= 1 ;
fornext_finalvalue4528=*__LONG_GL_DEFINES_LAST;
fornext_step4528= 1 ;
if (fornext_step4528<0) fornext_step_negative4528=1; else fornext_step_negative4528=0;
if (is_error_pending()) goto fornext_error4528;
goto fornext_entrylabel4528;
while(1){
fornext_value4528=fornext_step4528+(*_SUB_GL_SCAN_HEADER_LONG_I);
fornext_entrylabel4528:
*_SUB_GL_SCAN_HEADER_LONG_I=fornext_value4528;
if (fornext_step_negative4528){
if (fornext_value4528<fornext_finalvalue4528) break;
}else{
if (fornext_value4528>fornext_finalvalue4528) break;
}
fornext_error4528:;
if(qbevent){evnt(28166,304,"opengl_methods.bas");if(r)goto S_37654;}
do{
tab_spc_cr_size=2;
tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK;
if (is_error_pending()) goto skip4529;
sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("CONST ",6),((qbs*)(((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[array_check((*_SUB_GL_SCAN_HEADER_LONG_I)-__ARRAY_STRING_GL_DEFINES[4],__ARRAY_STRING_GL_DEFINES[5])]))),qbs_new_txt_len("=",1)), 0, 0, 0);
if (is_error_pending()) goto skip4529;
sub_file_print(tmp_fileno,qbs_str((int64)(((int64*)(__ARRAY_INTEGER64_GL_DEFINES_VALUE[0]))[array_check((*_SUB_GL_SCAN_HEADER_LONG_I)-__ARRAY_INTEGER64_GL_DEFINES_VALUE[4],__ARRAY_INTEGER64_GL_DEFINES_VALUE[5])])), 1, 0, 1);
if (is_error_pending()) goto skip4529;
skip4529:
qbs_cleanup(qbs_tmp_base,0);
tab_spc_cr_size=1;
if(!qbevent)break;evnt(28166,305,"opengl_methods.bas");}while(r);
fornext_continue_4527:;
}
fornext_exit_4527:;
}
S_37658:;
if ((*__LONG_GL_KIT)||is_error_pending()){
if(qbevent){evnt(28166,320,"opengl_methods.bas");if(r)goto S_37658;}
do{
sub_close(*_SUB_GL_SCAN_HEADER_LONG_HK,1);
if(!qbevent)break;evnt(28166,320,"opengl_methods.bas");}while(r);
}
do{
*_SUB_GL_SCAN_HEADER_LONG_FH=func_freefile();
if(!qbevent)break;evnt(28166,323,"opengl_methods.bas");}while(r);
do{
sub_open(qbs_new_txt_len("internal\\c\\parts\\core\\gl_header_for_parsing\\temp\\gl_helper_code.h",65), 4 ,NULL,NULL,*_SUB_GL_SCAN_HEADER_LONG_FH,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28166,324,"opengl_methods.bas");}while(r);
do{
tab_spc_cr_size=2;
tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_FH;
if (is_error_pending()) goto skip4530;
sub_file_print(tmp_fileno,__STRING_GL_HELPER_CODE, 0, 0, 1);
if (is_error_pending()) goto skip4530;
skip4530:
qbs_cleanup(qbs_tmp_base,0);
tab_spc_cr_size=1;
if(!qbevent)break;evnt(28166,325,"opengl_methods.bas");}while(r);
do{
sub_close(*_SUB_GL_SCAN_HEADER_LONG_FH,1);
if(!qbevent)break;evnt(28166,326,"opengl_methods.bas");}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free156.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;
}
