pike.git / src / post_modules / GL / gen.pike

version» Context lines:

pike.git/src/post_modules/GL/gen.pike:127:    int a=1;    for(int i=1; i<sizeof(ty); i++)    switch(ty[i]) {    case 'B':    case 'E':    case 'O':    case 'I':    argt += ({"int"});    args += ({ "arg"+a });    res += " INT32 arg"+a+";\n"; -  got += " arg"+a+"=sp["+(a-1)+"-args].u.integer;\n"; +  got += " arg"+a+"=Pike_sp["+(a-1)+"-args].u.integer;\n";    a++;    break;    case 'D':    argt += ({"float"});    args += ({ "arg"+a });    res += " double arg"+a+";\n"; -  got += " arg"+a+"=sp["+(a-1)+"-args].u.float_number;\n"; +  got += " arg"+a+"=Pike_sp["+(a-1)+"-args].u.float_number;\n";    a++;    break;    case 'F':    argt += ({"float"});    args += ({ "arg"+a });    res += " float arg"+a+";\n"; -  got += " arg"+a+"=sp["+(a-1)+"-args].u.float_number;\n"; +  got += " arg"+a+"=Pike_sp["+(a-1)+"-args].u.float_number;\n";    a++;    break;    case 'Z':    argt += ({"float|int"}); -  args += ({ "sp["+(a-1)+"-args]" }); +  args += ({ "Pike_sp["+(a-1)+"-args]" });    polya = (a++)-1;    break;    case '+':    int mi, mx;    switch(sizeof(ty[i+1..])) {    case 1:    mi = 1; mx = 4; break;    case 2:    mi = 1; mx = 2; break;    case 3:
pike.git/src/post_modules/GL/gen.pike:211:    rtypes=atfix[3];    i=sizeof(ty);    break;    case '[':    int nn;    string rst;    sscanf(ty[i+1..], "%d%s", nn, rst);    array arrfix = special_234(nn, nn, rst, 1);    res += " union zvalue16 zv16;\n int r1n;\n";    argt += arrfix[0]; -  got += " if(sp["+(a-1)+"-args].u.array->size != "+nn+")\n" +  got += " if(Pike_sp["+(a-1)+"-args].u.array->size != "+nn+")\n"    " Pike_error(\""+name+": Array length is wrong (is %d, should be "+nn+ -  ")\\n\", sp["+(a-1)+"-args].u.array->size);\n\n"; +  ")\\n\", Pike_sp["+(a-1)+"-args].u.array->size);\n\n";    got += " r1n=check_1n_args(\""+name+"\", args-"+(a-1)+", "+    arrfix[1]+", "+arrfix[2]+", &zv16);\n";    r234=-1;    rtypes=arrfix[3];    i=sizeof(ty);    break;    case 'w':    img_obj=1;    args += ({ "img.width" });    break;
pike.git/src/post_modules/GL/gen.pike:248:    args += ({ "img.pixels" });    break;       default:    error("%s: Unknown parameter type '%c'.", name, ty[i]);    }       if(img_obj) {    argt += ({"object|mapping(string:object)"});    res += " struct zimage img;\n"; -  got += " check_img_arg(&sp["+(a-1)+"-args], &img, "+a+ +  got += " check_img_arg(&Pike_sp["+(a-1)+"-args], &img, "+a+    ", \""+name+"\");\n";    }       prot = (argt*",")+prot;       if(sizeof(argt))    res += "\n check_all_args(\""+name+"\", args, "+    ((Array.map((argt_cut<0?argt:argt[..argt_cut-1]),    lambda(string t) {    string t2;