void Context2D::setSize(int width, int height)
{
endPainting();
QImage newi(width, height, QImage::Format_ARGB32_Premultiplied);
newi.fill(qRgba(0,0,0,0));
QPainter p(&newi);
p.drawImage(0, 0, m_image);
p.end();
m_image = newi;
scheduleChange();
}
int
yyparse(void)
{
struct
{
YYSTYPE yyv;
int yys;
} yys[YYMAXDEPTH], *yyp, *yypt;
short *yyxi;
int yyj, yym, yystate, yyn, yyg;
long yychar;
YYSTYPE save1, save2;
int save3, save4;
save1 = yylval;
save2 = yyval;
save3 = yynerrs;
save4 = yyerrflag;
yystate = 0;
yychar = -1;
yynerrs = 0;
yyerrflag = 0;
yyp = &yys[-1];
goto yystack;
ret0:
yyn = 0;
goto ret;
ret1:
yyn = 1;
goto ret;
ret:
yylval = save1;
yyval = save2;
yynerrs = save3;
yyerrflag = save4;
return yyn;
yystack:
/* put a state and value onto the stack */
if(yydebug >= 4)
fprint(2, "char %s in %s", yytokname(yychar), yystatname(yystate));
yyp++;
if(yyp >= &yys[YYMAXDEPTH]) {
yyerror("yacc stack overflow");
goto ret1;
}
yyp->yys = yystate;
yyp->yyv = yyval;
yynewstate:
yyn = yypact[yystate];
if(yyn <= YYFLAG)
goto yydefault; /* simple state */
if(yychar < 0)
yychar = yylex1();
yyn += yychar;
if(yyn < 0 || yyn >= YYLAST)
goto yydefault;
yyn = yyact[yyn];
if(yychk[yyn] == yychar) { /* valid shift */
yychar = -1;
yyval = yylval;
yystate = yyn;
if(yyerrflag > 0)
yyerrflag--;
goto yystack;
}
yydefault:
/* default state action */
yyn = yydef[yystate];
if(yyn == -2) {
if(yychar < 0)
yychar = yylex1();
/* look through exception table */
for(yyxi=yyexca;; yyxi+=2)
if(yyxi[0] == -1 && yyxi[1] == yystate)
break;
for(yyxi += 2;; yyxi += 2) {
yyn = yyxi[0];
if(yyn < 0 || yyn == yychar)
break;
}
yyn = yyxi[1];
if(yyn < 0)
goto ret0;
}
if(yyn == 0) {
/* error ... attempt to resume parsing */
switch(yyerrflag) {
case 0: /* brand new error */
yyerror("syntax error");
yynerrs++;
if(yydebug >= 1) {
fprint(2, "%s", yystatname(yystate));
fprint(2, "saw %s\n", yytokname(yychar));
}
case 1:
case 2: /* incompletely recovered error ... try again */
yyerrflag = 3;
/* find a state where "error" is a legal shift action */
while(yyp >= yys) {
yyn = yypact[yyp->yys] + YYERRCODE;
if(yyn >= 0 && yyn < YYLAST) {
yystate = yyact[yyn]; /* simulate a shift of "error" */
if(yychk[yystate] == YYERRCODE)
goto yystack;
}
/* the current yyp has no shift onn "error", pop stack */
if(yydebug >= 2)
fprint(2, "error recovery pops state %d, uncovers %d\n",
yyp->yys, (yyp-1)->yys );
yyp--;
}
/* there is no state on the stack with an error shift ... abort */
goto ret1;
case 3: /* no shift yet; clobber input char */
if(yydebug >= 2)
fprint(2, "error recovery discards %s\n", yytokname(yychar));
if(yychar == YYEOFCODE)
goto ret1;
yychar = -1;
goto yynewstate; /* try again in the same state */
}
}
/* reduction by production yyn */
if(yydebug >= 2)
fprint(2, "reduce %d in:\n\t%s", yyn, yystatname(yystate));
yypt = yyp;
yyp -= yyr2[yyn];
yyval = (yyp+1)->yyv;
yym = yyn;
/* consult goto table to find next state */
yyn = yyr1[yyn];
yyg = yypgo[yyn];
yyj = yyg + yyp->yys + 1;
if(yyj >= YYLAST || yychk[yystate=yyact[yyj]] != -yyn)
yystate = yyact[yyg];
switch(yym) {
case 1:
#line 41 "asm.y"
{
assem(yypt[-0].yyv.inst);
} break;
case 2:
#line 47 "asm.y"
{ yyval.inst = nil; } break;
case 3:
#line 49 "asm.y"
{
if(yypt[-0].yyv.inst != nil) {
yypt[-0].yyv.inst->link = yypt[-1].yyv.inst;
yyval.inst = yypt[-0].yyv.inst;
}
else
yyval.inst = yypt[-1].yyv.inst;
} break;
case 4:
#line 60 "asm.y"
{
yypt[-0].yyv.inst->sym = yypt[-2].yyv.sym;
yyval.inst = yypt[-0].yyv.inst;
} break;
case 5:
#line 65 "asm.y"
{
heap(yypt[-3].yyv.ival, yypt[-1].yyv.ival, yypt[-0].yyv.string);
yyval.inst = nil;
} break;
case 6:
#line 70 "asm.y"
{
yyval.inst = nil;
} break;
case 8:
#line 77 "asm.y"
{
yyval.ival = yypt[-0].yyv.ival;
} break;
case 9:
#line 81 "asm.y"
{
yypt[-0].yyv.sym->value = heapid++;
yyval.ival = yypt[-0].yyv.sym->value;
} break;
case 10:
#line 88 "asm.y"
{ yyval.string = nil; } break;
case 11:
#line 90 "asm.y"
{
yyval.string = yypt[-0].yyv.string;
} break;
case 12:
#line 96 "asm.y"
{
yyval.list = newi(yypt[-0].yyv.ival, nil);
} break;
case 13:
#line 100 "asm.y"
{
yyval.list = newi(yypt[-0].yyv.ival, yypt[-2].yyv.list);
} break;
case 14:
#line 106 "asm.y"
{
yyval.inst = ai(yypt[-3].yyv.ival);
yyval.inst->src = yypt[-2].yyv.addr;
yyval.inst->dst = yypt[-0].yyv.addr;
} break;
case 15:
#line 112 "asm.y"
{
yyval.inst = ai(yypt[-5].yyv.ival);
yyval.inst->src = yypt[-4].yyv.addr;
yyval.inst->reg = yypt[-2].yyv.addr;
yyval.inst->dst = yypt[-0].yyv.addr;
} break;
case 16:
#line 119 "asm.y"
{
yyval.inst = ai(yypt[-3].yyv.ival);
yyval.inst->src = yypt[-2].yyv.addr;
yyval.inst->dst = yypt[-0].yyv.addr;
} break;
case 17:
#line 125 "asm.y"
{
yyval.inst = ai(yypt[-1].yyv.ival);
yyval.inst->dst = yypt[-0].yyv.addr;
} break;
case 18:
#line 130 "asm.y"
{
yyval.inst = ai(yypt[-0].yyv.ival);
} break;
case 19:
#line 136 "asm.y"
{
data(DEFB, yypt[-2].yyv.ival, yypt[-0].yyv.list);
} break;
case 20:
#line 140 "asm.y"
{
data(DEFW, yypt[-2].yyv.ival, yypt[-0].yyv.list);
} break;
case 21:
#line 144 "asm.y"
{
data(DEFL, yypt[-2].yyv.ival, yypt[-0].yyv.list);
} break;
case 22:
#line 148 "asm.y"
{
data(DEFF, yypt[-2].yyv.ival, newi(dtocanon((double)yypt[-0].yyv.ival), nil));
} break;
case 23:
#line 152 "asm.y"
{
data(DEFF, yypt[-2].yyv.ival, newi(dtocanon(yypt[-0].yyv.fval), nil));
} break;
case 24:
#line 156 "asm.y"
{
if(strcmp(yypt[-0].yyv.sym->name, "Inf") == 0 || strcmp(yypt[-0].yyv.sym->name, "Infinity") == 0) {
u.l = (uvlong)0x7ff00000<<32;
data(DEFF, yypt[-2].yyv.ival, newi(dtocanon(u.d), nil));
} else if(strcmp(yypt[-0].yyv.sym->name, "NaN") == 0) {
u.l = ((uvlong)0x7fffffff<<32) | (uvlong)0xffffffffUL;
data(DEFF, yypt[-2].yyv.ival, newi(dtocanon(u.d), nil));
} else
diag("bad value for real: %s", yypt[-0].yyv.sym->name);
} break;
case 25:
#line 167 "asm.y"
{
data(DEFF, yypt[-3].yyv.ival, newi(dtocanon(-(double)yypt[-0].yyv.ival), nil));
} break;
case 26:
#line 171 "asm.y"
{
data(DEFF, yypt[-3].yyv.ival, newi(dtocanon(-yypt[-0].yyv.fval), nil));
} break;
case 27:
#line 175 "asm.y"
{
if(strcmp(yypt[-0].yyv.sym->name, "Inf") == 0 || strcmp(yypt[-0].yyv.sym->name, "Infinity") == 0) {
u.l = (uvlong)0xfff00000<<32;
data(DEFF, yypt[-3].yyv.ival, newi(dtocanon(u.d), nil));
} else
diag("bad value for real: %s", yypt[-0].yyv.sym->name);
} break;
case 28:
#line 183 "asm.y"
{
data(DEFS, yypt[-2].yyv.ival, news(yypt[-0].yyv.string, nil));
} break;
case 29:
#line 187 "asm.y"
{
if(yypt[-2].yyv.sym->ds != 0)
diag("%s declared twice", yypt[-2].yyv.sym->name);
yypt[-2].yyv.sym->ds = yypt[-0].yyv.ival;
yypt[-2].yyv.sym->value = dseg;
dseg += yypt[-0].yyv.ival;
} break;
case 30:
#line 195 "asm.y"
{
ext(yypt[-4].yyv.ival, yypt[-2].yyv.ival, yypt[-0].yyv.string);
} break;
case 31:
#line 199 "asm.y"
{
mklink(yypt[-6].yyv.ival, yypt[-4].yyv.ival, yypt[-2].yyv.ival, yypt[-0].yyv.string);
} break;
case 32:
#line 203 "asm.y"
{
if(module != nil)
diag("this module already defined as %s", yypt[-0].yyv.sym->name);
else
module = yypt[-0].yyv.sym;
} break;
case 33:
#line 210 "asm.y"
{
if(pcentry >= 0)
diag("this module already has entry point %d, %d" , pcentry, dentry);
pcentry = yypt[-2].yyv.ival;
dentry = yypt[-0].yyv.ival;
} break;
case 34:
#line 217 "asm.y"
{
data(DEFA, yypt[-4].yyv.ival, newa(yypt[-2].yyv.ival, yypt[-0].yyv.ival));
} break;
case 35:
#line 221 "asm.y"
{
data(DIND, yypt[-2].yyv.ival, newa(yypt[-0].yyv.ival, 0));
} break;
case 36:
#line 225 "asm.y"
{
data(DAPOP, 0, newa(0, 0));
} break;
case 37:
#line 229 "asm.y"
{
ldts(yypt[-0].yyv.ival);
} break;
case 38:
#line 233 "asm.y"
{
excs(yypt[-0].yyv.ival);
} break;
case 39:
#line 237 "asm.y"
{
exc(yypt[-10].yyv.ival, yypt[-8].yyv.ival, yypt[-6].yyv.ival, yypt[-4].yyv.ival, yypt[-2].yyv.ival, yypt[-0].yyv.ival);
} break;
case 40:
#line 241 "asm.y"
{
etab(yypt[-2].yyv.string, yypt[-0].yyv.ival);
} break;
case 41:
#line 245 "asm.y"
{
etab(nil, yypt[-0].yyv.ival);
} break;
case 42:
#line 249 "asm.y"
{
source(yypt[-0].yyv.string);
} break;
case 43:
#line 255 "asm.y"
{
yyval.addr = aa(yypt[-0].yyv.ival);
yyval.addr->mode = AXIMM;
if(yyval.addr->val > 0x7FFF || yyval.addr->val < -0x8000)
diag("immediate %d too large for middle operand", yyval.addr->val);
} break;
case 44:
#line 262 "asm.y"
{
if(yypt[-0].yyv.addr->mode == AMP)
yypt[-0].yyv.addr->mode = AXINM;
else
yypt[-0].yyv.addr->mode = AXINF;
if(yypt[-0].yyv.addr->mode == AXINM && (ulong)yypt[-0].yyv.addr->val > 0xFFFF)
diag("register offset %d(mp) too large", yypt[-0].yyv.addr->val);
if(yypt[-0].yyv.addr->mode == AXINF && (ulong)yypt[-0].yyv.addr->val > 0xFFFF)
diag("register offset %d(fp) too large", yypt[-0].yyv.addr->val);
yyval.addr = yypt[-0].yyv.addr;
} break;
case 45:
#line 276 "asm.y"
{
yyval.addr = aa(yypt[-0].yyv.ival);
yyval.addr->mode = AIMM;
} break;
case 46:
#line 281 "asm.y"
{
yyval.addr = aa(0);
yyval.addr->sym = yypt[-0].yyv.sym;
} break;
case 48:
#line 289 "asm.y"
{
yypt[-0].yyv.addr->mode |= AIND;
yyval.addr = yypt[-0].yyv.addr;
} break;
case 49:
#line 294 "asm.y"
{
yypt[-1].yyv.addr->mode |= AIND;
if(yypt[-1].yyv.addr->val & 3)
diag("indirect offset must be word size");
if(yypt[-1].yyv.addr->mode == (AMP|AIND) && ((ulong)yypt[-1].yyv.addr->val > 0xFFFF || (ulong)yypt[-3].yyv.ival > 0xFFFF))
diag("indirect offset %d(%d(mp)) too large", yypt[-3].yyv.ival, yypt[-1].yyv.addr->val);
if(yypt[-1].yyv.addr->mode == (AFP|AIND) && ((ulong)yypt[-1].yyv.addr->val > 0xFFFF || (ulong)yypt[-3].yyv.ival > 0xFFFF))
diag("indirect offset %d(%d(fp)) too large", yypt[-3].yyv.ival, yypt[-1].yyv.addr->val);
yypt[-1].yyv.addr->off = yypt[-1].yyv.addr->val;
yypt[-1].yyv.addr->val = yypt[-3].yyv.ival;
yyval.addr = yypt[-1].yyv.addr;
} break;
case 51:
#line 310 "asm.y"
{
yyval.addr = aa(yypt[-3].yyv.ival);
yyval.addr->mode = AMP;
} break;
case 52:
#line 315 "asm.y"
{
yyval.addr = aa(yypt[-3].yyv.ival);
yyval.addr->mode = AFP;
} break;
case 54:
#line 323 "asm.y"
{
yyval.ival = yypt[-0].yyv.sym->value;
} break;
case 55:
#line 327 "asm.y"
{
yyval.ival = -yypt[-0].yyv.ival;
} break;
case 56:
#line 331 "asm.y"
{
yyval.ival = yypt[-0].yyv.ival;
} break;
case 57:
#line 335 "asm.y"
{
yyval.ival = ~yypt[-0].yyv.ival;
} break;
case 58:
#line 339 "asm.y"
{
yyval.ival = yypt[-1].yyv.ival;
} break;
case 60:
#line 346 "asm.y"
{
yyval.ival = yypt[-2].yyv.ival + yypt[-0].yyv.ival;
} break;
case 61:
#line 350 "asm.y"
{
yyval.ival = yypt[-2].yyv.ival - yypt[-0].yyv.ival;
} break;
case 62:
#line 354 "asm.y"
{
yyval.ival = yypt[-2].yyv.ival * yypt[-0].yyv.ival;
} break;
case 63:
#line 358 "asm.y"
{
yyval.ival = yypt[-2].yyv.ival / yypt[-0].yyv.ival;
} break;
case 64:
#line 362 "asm.y"
{
yyval.ival = yypt[-2].yyv.ival % yypt[-0].yyv.ival;
} break;
case 65:
#line 366 "asm.y"
{
yyval.ival = yypt[-3].yyv.ival << yypt[-0].yyv.ival;
} break;
case 66:
#line 370 "asm.y"
{
yyval.ival = yypt[-3].yyv.ival >> yypt[-0].yyv.ival;
} break;
case 67:
#line 374 "asm.y"
{
yyval.ival = yypt[-2].yyv.ival & yypt[-0].yyv.ival;
} break;
case 68:
#line 378 "asm.y"
{
yyval.ival = yypt[-2].yyv.ival ^ yypt[-0].yyv.ival;
} break;
case 69:
#line 382 "asm.y"
{
yyval.ival = yypt[-2].yyv.ival | yypt[-0].yyv.ival;
} break;
}
goto yystack; /* stack new state and value */
}
static Class * CO(HelloWindow);
struct CM(HelloWindow) { Label label; };
typedef Instance HelloWindow;
static bool HelloWindow_constructor(HelloWindow this)
{
struct CM(HelloWindow) * self = IPTR(this, HelloWindow);
Window_set_caption(this, $("My First Ecere/C Bindings App"));
Window_set_borderStyle(this, BorderStyle_sizable);
Window_set_size(this, &(Size){ 380, 190 });
Window_set_hasClose(this, true);
FontResource font = newi(FontResource);
FontResource_set_faceName(font, "Arial");
FontResource_set_size(font, 30);
/*char tmp[256];
String s = Instance_onGetString(0, font, tmp, null, null);
PrintLn(CO(String), s, null); // Need to terminate with a null!*/
self->label = newi(Label);
Window_set_parent(self->label, this);
Window_set_position(self->label, &(Point){ 10, 10 });
Window_set_font(self->label, font);
Window_set_caption(self->label, $("Hello, Bindings!!"));
return true;
}
