25de8be212
Fix TProgram.Uses reserved-word clash (renamed to UsedUnits), nested brace-comment in uParser.pas, and missing uAST in Blaise.pas uses clause. Vendor QBE 1.2 source in vendor/qbe/ (built locally with make; binary excluded via .gitignore). End-to-end pipeline confirmed: Blaise compiles Hello World and Calc (6*7=42) to native x86_64 Linux binaries. 71/71 FPCUnit tests passing.
26 lines
407 B
C
26 lines
407 B
C
#include "all.h"
|
|
|
|
/* eliminate sub-word abi op
|
|
* variants for targets that
|
|
* treat char/short/... as
|
|
* words with arbitrary high
|
|
* bits
|
|
*/
|
|
void
|
|
elimsb(Fn *fn)
|
|
{
|
|
Blk *b;
|
|
Ins *i;
|
|
|
|
for (b=fn->start; b; b=b->link) {
|
|
for (i=b->ins; i<&b->ins[b->nins]; i++) {
|
|
if (isargbh(i->op))
|
|
i->op = Oarg;
|
|
if (isparbh(i->op))
|
|
i->op = Opar;
|
|
}
|
|
if (isretbh(b->jmp.type))
|
|
b->jmp.type = Jretw;
|
|
}
|
|
}
|