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

Fix generalised ReadNum and use for Sym reading.

Browse source
This commit is contained in:
David Brown 2016-09-30 18:15:46 +01:00
parent 3dc5049d5a
commit 1fa182c7ce
24 changed files with 59 additions and 163 deletions
Download patch file Download diff file Expand all files Collapse all files

8
bootstrap/unix-44/OPM.c
View file

@ -745,7 +745,7 @@ int32 OPM_SymRInt (void)
{
int32 _o_result;
int32 k;
Files_ReadNum(&OPM_oldSF, Files_Rider__typ, &k);
Files_ReadNum(&OPM_oldSF, Files_Rider__typ, (void*)&k, 4);
_o_result = k;
return _o_result;
}
@ -754,19 +754,19 @@ int64 OPM_SymRInt64 (void)
{
int64 _o_result;
int64 k;
Files_ReadNum64(&OPM_oldSF, Files_Rider__typ, (void*)&k, 8);
Files_ReadNum(&OPM_oldSF, Files_Rider__typ, (void*)&k, 8);
_o_result = k;
return _o_result;
}
void OPM_SymRSet64 (uint64 *s)
{
Files_ReadNum64(&OPM_oldSF, Files_Rider__typ, (void*)&*s, 8);
Files_ReadNum(&OPM_oldSF, Files_Rider__typ, (void*)&*s, 8);
}
void OPM_SymRSet (uint32 *s)
{
Files_ReadNum(&OPM_oldSF, Files_Rider__typ, (int32*)&*s);
Files_ReadNum(&OPM_oldSF, Files_Rider__typ, (void*)&*s, 4);
}
void OPM_SymRReal (REAL *r)