nbc/NXT/uNXCComp.pas

4638   svar : string;
4647   svar := tos;
4648   EmitLn(Format('mov %s, %s',[svar, RegisterName]));
4650   StoreDec(svar);
4651   EmitLn('brtst LT,' + L2 + ', ' + svar);
6540   op, arg1, svar : string;
6554   svar := tos;
6555   EmitLn(Format('mov %s, %s',[svar, RegisterName]));
6560   EmitLn(Format('%s(%s, %s, %s)',[op, arg1, svar, RegisterName]));
6566   op, arg1, svar, arg4 : string;
6580   svar := tos;
6581   EmitLn(Format('mov %s, %s',[svar, RegisterName]));
6591   EmitLn(Format('%s(%s, %s, %s, %s)',[op, arg1, svar, RegisterName, arg4]));
6654   op, arg1, svar, regvar, pvar, ivar : string;
6668   svar := tos;
6669   EmitLn(Format('mov %s, %s',[svar, RegisterName]));
6692   EmitLn(Format('%s(%s, %s, %s, %s, %s, %s)',[op, arg1, svar, regvar, pvar, ivar, RegisterName]));
6701   op, arg1, svar, arg4, regvar, pvar, ivar : string;
6715   svar := tos;
6716   EmitLn(Format('mov %s, %s',[svar, RegisterName]));
6743 …EmitLn(Format('%s(%s, %s, %s, %s, %s, %s, %s)',[op, arg1, svar, regvar, arg4, pvar, ivar, Register…