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

Update bootstrap C sources.

Browse source
This commit is contained in:
David Brown 2016-12-13 18:53:34 +00:00
parent 85eeef6ae4
commit 6507b4ede3
5 changed files with 5 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

2
bootstrap/unix-44/Out.c
View file

@ -359,7 +359,7 @@ void Out_DumpHeap (void)
Out_Hex(baddr, 1);
Out_Ln();
b = (block__4)(ADDRESS)baddr;
tag = (adrptr__3)(ADDRESS)b->tag;
tag = (adrptr__3)(ADDRESS)(b->tag - __MASK(b->tag, -2));
Out_String((CHAR*)" tag: ", 15);
Out_Hex(b->tag, 1);
if (__MASK(b->tag, -2) != 0) {

2
bootstrap/unix-48/Out.c
View file

@ -359,7 +359,7 @@ void Out_DumpHeap (void)
Out_Hex(baddr, 1);
Out_Ln();
b = (block__4)(ADDRESS)baddr;
tag = (adrptr__3)(ADDRESS)b->tag;
tag = (adrptr__3)(ADDRESS)(b->tag - __MASK(b->tag, -2));
Out_String((CHAR*)" tag: ", 15);
Out_Hex(b->tag, 1);
if (__MASK(b->tag, -2) != 0) {

2
bootstrap/unix-88/Out.c
View file

@ -359,7 +359,7 @@ void Out_DumpHeap (void)
Out_Hex(baddr, 1);
Out_Ln();
b = (block__4)(ADDRESS)baddr;
tag = (adrptr__3)(ADDRESS)b->tag;
tag = (adrptr__3)(ADDRESS)(b->tag - __MASK(b->tag, -2));
Out_String((CHAR*)" tag: ", 15);
Out_Hex(b->tag, 1);
if (__MASK(b->tag, -2) != 0) {

2
bootstrap/windows-48/Out.c
View file

@ -359,7 +359,7 @@ void Out_DumpHeap (void)
Out_Hex(baddr, 1);
Out_Ln();
b = (block__4)(ADDRESS)baddr;
tag = (adrptr__3)(ADDRESS)b->tag;
tag = (adrptr__3)(ADDRESS)(b->tag - __MASK(b->tag, -2));
Out_String((CHAR*)" tag: ", 15);
Out_Hex(b->tag, 1);
if (__MASK(b->tag, -2) != 0) {

2
bootstrap/windows-88/Out.c
View file

@ -359,7 +359,7 @@ void Out_DumpHeap (void)
Out_Hex(baddr, 1);
Out_Ln();
b = (block__4)(ADDRESS)baddr;
tag = (adrptr__3)(ADDRESS)b->tag;
tag = (adrptr__3)(ADDRESS)(b->tag - __MASK(b->tag, -2));
Out_String((CHAR*)" tag: ", 15);
Out_Hex(b->tag, 1);
if (__MASK(b->tag, -2) != 0) {