tools.gc-decode: fix for 64-bit.
parent
048ed1e5fd
commit
d65876021b
|
@ -53,10 +53,10 @@ IN: tools.gc-decode.tests
|
||||||
{ -1 -1 -1 -1 -1 -1 -1 }
|
{ -1 -1 -1 -1 -1 -1 -1 }
|
||||||
{ -1 -1 -1 -1 -1 -1 -1 }
|
{ -1 -1 -1 -1 -1 -1 -1 }
|
||||||
{ -1 -1 -1 -1 -1 -1 -1 }
|
{ -1 -1 -1 -1 -1 -1 -1 }
|
||||||
{ -1 -1 -1 -1 -1 -1 5 }
|
{ -1 -1 -1 -1 -1 -1 4 }
|
||||||
{ -1 -1 -1 -1 -1 -1 5 }
|
{ -1 -1 -1 -1 -1 -1 4 }
|
||||||
{ -1 -1 -1 -1 -1 -1 -1 }
|
{ -1 -1 -1 -1 -1 -1 -1 }
|
||||||
}
|
} ! 64-bit
|
||||||
{
|
{
|
||||||
{ -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 }
|
{ -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 }
|
||||||
{ -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 }
|
{ -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 }
|
||||||
|
@ -73,7 +73,7 @@ IN: tools.gc-decode.tests
|
||||||
{ t } [
|
{ t } [
|
||||||
\ llvm.types:resolve-types word>gc-info
|
\ llvm.types:resolve-types word>gc-info
|
||||||
{
|
{
|
||||||
S{ gc-info f 0 2 2 1 6 7 6 } ! 64-bit
|
S{ gc-info f 0 2 2 1 5 8 6 } ! 64-bit
|
||||||
S{ gc-info f 0 2 2 1 9 12 6 } ! 32-bit
|
S{ gc-info f 0 2 2 1 9 12 6 } ! 32-bit
|
||||||
} member?
|
} member?
|
||||||
] unit-test
|
] unit-test
|
||||||
|
|
Loading…
Reference in New Issue