mirror of
https://github.com/vishapoberon/compiler.git
synced 2026-04-06 14:32:24 +00:00
Uppercase internal SYSTEM.H types address, int*, uint*. Completed.
This commit is contained in:
parent
baeb2db81f
commit
a17c087a41
56 changed files with 299 additions and 379 deletions
|
|
@ -710,15 +710,15 @@ void OPM_FPrintReal (INT32 *fp, REAL real)
|
|||
{
|
||||
INT16 i;
|
||||
INT32 l;
|
||||
__GET((address)&real, l, INT32);
|
||||
__GET((ADDRESS)&real, l, INT32);
|
||||
OPM_FPrint(&*fp, l);
|
||||
}
|
||||
|
||||
void OPM_FPrintLReal (INT32 *fp, LONGREAL lr)
|
||||
{
|
||||
INT32 l, h;
|
||||
__GET((address)&lr, l, INT32);
|
||||
__GET((address)&lr + 4, h, INT32);
|
||||
__GET((ADDRESS)&lr, l, INT32);
|
||||
__GET((ADDRESS)&lr + 4, h, INT32);
|
||||
OPM_FPrint(&*fp, l);
|
||||
OPM_FPrint(&*fp, h);
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue