pike.git / src / post_modules / GTK2 / output / split.pike

version» Context lines:

pike.git/src/post_modules/GTK2/output/split.pike:83:    "#ifdef "+cls->c_type_define()+"\n"    " if(PGTK_CHECK_TYPE(widget, "+cls->c_type_define()+"))\n"    " return "+glue_c_name(cls->c_name())+"_program;\n"    "#endif\n"+type_switch;    }    res = "static void _"+init_n+"()\n{\n";       if( cls->name != "_global" )    {    res += -  " start_new_program(); /* "+cls->name+" */\n"; +  " start_new_program(); /* "+cls->name+" */\n" + +  " Pike_compiler->new_program->id = " + cls->class_id() + ";\n";    if( sizeof(cls->inherits) )    foreach( cls->inherits, Class c )    res += " low_inherit( "+glue_c_name(c->c_name())+    "_program,0,0,0,0,0);\n";    else    {    res += " ADD_STORAGE(struct "+    (cls->mixin_for? "mixin_wrapper":"object_wrapper")+    ");\n";    }    }       foreach( sort( indices( cls->functions ) ), string f )    output_thing( cls->functions[ f ] );    foreach( sort( indices( cls->members ) ), string f )    output_thing( cls->members[ f ] );    if( cls->name != "_global" )    { -  res += (" "+glue_c_name(cls->c_name())+"_program = end_program();\n" -  " "+glue_c_name(cls->c_name())+"_program->id = "+cls->class_id()+";\n"); +  res += (" "+glue_c_name(cls->c_name())+"_program = end_program();\n"); +     res += (" add_program_constant("+S(cls->pike_name(),1,0,26)+",\n"    " "+glue_c_name(cls->c_name())+"_program, ID_FINAL);\n");   // predef::write("pike_name==%s\n",cls->pike_name());   /*    string str=S(cls->pike_name(),1,0,26);    predef::write("pike_name==%s\n",str);    array aaa=str/"\n";    string str1;    sscanf(aaa[1],"%*[ \t](%s)",str1);    predef::write("PSTR==%s\n",str1);