Rim Chaabane. Analyse dynamique de ... - Université Paris 8
Rim Chaabane. Analyse dynamique de ... - Université Paris 8
Rim Chaabane. Analyse dynamique de ... - Université Paris 8
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
<strong>Analyse</strong> <strong>dynamique</strong> <strong>de</strong> programmes C<br />
328 break;<br />
329 case stofloat:<br />
330 AR[InSt[p].ext][InSt[p].val.ival].v.fval =<br />
(float)STK[ToP].v.dval; /*if(EiC_traceON) {printf("stofloat ");}*/<br />
331 break;<br />
332<br />
333<br />
334 /* specific short stuff */<br />
335 case rvalshort:<br />
336 STK[ToP].v.ival=AR[InSt[p].ext][InSt[p].val.ival].v.sval;<br />
/*if(EiC_traceON) {printf("rvalshort ");}*/<br />
337 break;<br />
338 case rvalushort:<br />
339 STK[ToP].v.ival=AR[InSt[p].ext][InSt[p].val.ival].v.usval;/*<br />
if(EiC_traceON) { printf("rvalushort ");}*/<br />
340 break;<br />
341 case drefushort:<br />
342 drefTYPE(unsigned short, ival);/*if(EiC_traceON)<br />
{ printf("drefushort ");}*/<br />
343 break;<br />
344 case drefshort:<br />
345 drefTYPE(short, ival);/* if(EiC_traceON) {printf("drefshort<br />
");}*/<br />
346 break;<br />
347 case refshort: refTYPE(short, ival); /*if(EiC_traceON)<br />
{printf("refshort ");} */<br />
348 break;<br />
349 case stoshort:<br />
350 AR[InSt[p].ext][InSt[p].val.ival].v.sval = STK[ToP].v.ival;<br />
351 /*if(EiC_traceON) {printf("stoshort ");}*/<br />
352 break;<br />
353<br />
354 /* specific char stuff */<br />
355 case rvalchar:<br />
356 STK[ToP].v.ival=AR[InSt[p].ext][InSt[p].val.ival].v.cval;<br />
357 /*if(EiC_traceON) {printf("rvalchar "); }*/<br />
358 break;<br />
359 case rvaluchar:<br />
360 STK[ToP].v.ival=AR[InSt[p].ext][InSt[p].val.ival].v.ucval;<br />
361 /*if(EiC_traceON) {printf("rvaluchar "); }*/<br />
362 break;<br />
363 case stochar:<br />
364 AR[InSt[p].ext][InSt[p].val.ival].v.cval = STK[ToP].v.ival;<br />
365 /*if(EiC_traceON) {printf("stochar ");}*/<br />
366 break;<br />
367 case drefuchar:<br />
368 drefTYPE(unsigned char, ival); /*if(EiC_traceON)<br />
{printf("drefuchar "); }*/<br />
369 break;<br />
370 case drefchar:<br />
371 drefTYPE(char, ival); /*if(EiC_traceON) {printf("drefchar<br />
"); }*/<br />
372 break;<br />
373 case refchar: refTYPE(char, ival); /*if(EiC_traceON)<br />
{printf("refchar "); }*/<br />
374 break;<br />
375 case neguchar: STK[ToP].v.uival = 256 - STK[ToP].v.uival;<br />
/*if(EiC_traceON) {printf("neguchar "); }*/<br />
376 break;<br />
377<br />
378 /* specific int stuff */<br />
379 case incint: STK[ToP].v.ival += InSt[p].val.ival; /*if(EiC_traceON)<br />
{printf("incrint ");}*/<br />
380 break;<br />
381 case <strong>de</strong>cint: STK[ToP].v.ival -= InSt[p].val.ival;/*if(EiC_traceON)<br />
{ printf("<strong>de</strong>crint"); }*/<br />
382 break;<br />
383 case drefint:<br />
105