17.01.2013 Views

COMPORT – Compilador Portugol - Nilo Menezes

COMPORT – Compilador Portugol - Nilo Menezes

COMPORT – Compilador Portugol - Nilo Menezes

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

ComPort <strong>–</strong> <strong>Compilador</strong> <strong>Portugol</strong><br />

void<br />

Put (long op, long a, long b, long c)<br />

{<br />

if (op >= 32)<br />

op = op - 64;<br />

code[pc] = fASH (fASH (fASH (op, 5) + a, 5) + b, 16) + (c % 0x10000);<br />

pc++;<br />

}<br />

void<br />

EXCL (char *reg, int p)<br />

{<br />

reg[p] = 0;<br />

}<br />

void<br />

TestRange (long x)<br />

{<br />

if (x >= 0x8000 || x form != Boolean)<br />

88

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!