vishapoberon/compiler
1
0
Fork 0
mirror of https://github.com/vishapoberon/compiler.git synced 2026-04-06 07:32:24 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

OPB little simplifications and ShorterSize/LongerSize functions.

Browse source
This commit is contained in:
David Brown 2016-08-20 18:53:28 +01:00
parent dd4de5aeed
commit e33255b08c
201 changed files with 1167 additions and 1123 deletions
Download patch file Download diff file Expand all files Collapse all files

7
bootstrap/unix-88/OPM.c
View file

@ -1,4 +1,4 @@
/* voc 1.95 [2016/08/16] for gcc LP64 on cygwin xtspkaSfF */
/* voc 1.95 [2016/08/20] for gcc LP64 on cygwin xtspkaSfF */
#define LARGE
#include "SYSTEM.h"
#include "Configuration.h"
@ -552,10 +552,7 @@ void OPM_FPrintReal (LONGINT *fp, REAL real)
void OPM_FPrintLReal (LONGINT *fp, LONGREAL lr)
{
LONGINT l, h;
__GET((LONGINT)(uintptr_t)&lr, l, LONGINT);
__GET((LONGINT)(uintptr_t)&lr + 4, h, LONGINT);
OPM_FPrint(&*fp, l);
OPM_FPrint(&*fp, h);
OPM_FPrint(&*fp, __VAL(LONGINT, lr));
}
static void OPM_GetProperty (Texts_Scanner *S, LONGINT *S__typ, CHAR *name, LONGINT name__len, INTEGER *size, INTEGER *align)