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

Update C bootstrap source.

Browse source
This commit is contained in:
David Brown 2016-12-01 18:40:01 +00:00
parent c65b89daf3
commit 62c6d5c2a4
186 changed files with 854 additions and 870 deletions
Download patch file Download diff file Expand all files Collapse all files

8
bootstrap/windows-88/Files.c
View file

@ -1,4 +1,4 @@
/* voc 2.00 [2016/11/30]. Bootstrapping compiler for address size 8, alignment 8. tspaSF */
/* voc 2.00 [2016/12/01]. Bootstrapping compiler for address size 8, alignment 8. tspaSF */
#define SHORTINT INT8
#define INTEGER INT16
@ -238,7 +238,7 @@ static void Files_Deregister (CHAR *name, ADDRESS name__len)
if (osfile != NIL) {
__ASSERT(!osfile->tempFile, 0);
__ASSERT(osfile->fd >= 0, 0);
__COPY(osfile->workName, osfile->registerName, 101);
__MOVE(osfile->workName, osfile->registerName, 101);
Files_GetTempName(osfile->registerName, 101, (void*)osfile->workName, 101);
osfile->tempFile = 1;
osfile->state = 0;
@ -263,7 +263,7 @@ static void Files_Create (Files_File f)
} else {
__ASSERT(f->state == 2, 0);
Files_Deregister(f->registerName, 101);
__COPY(f->registerName, f->workName, 101);
__MOVE(f->registerName, f->workName, 101);
f->registerName[0] = 0x00;
f->tempFile = 0;
}
@ -825,7 +825,7 @@ void Files_Register (Files_File f)
if (errcode != 0) {
Files_Err((CHAR*)"Couldn't rename temp name as register name", 43, f, errcode);
}
__COPY(f->registerName, f->workName, 101);
__MOVE(f->registerName, f->workName, 101);
f->registerName[0] = 0x00;
f->tempFile = 0;
}