6502/llvm-6502
1
0
Fork 0
mirror of https://github.com/c64scene-ar/llvm-6502.git synced 2025-07-16 11:24:39 +00:00
Code Issues Projects Releases Wiki Activity

Fix bug where pointers were assumed to always be 64 bits in size!

Browse Source 
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@5890 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Chris Lattner
2003-04-23 20:41:01 +00:00
parent a4dd4e2de8
commit 2be50797a1
1 changed files with 8 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
lib/ExecutionEngine/ExecutionEngine.cpp
View File

@@ -92,6 +92,7 @@ void ExecutionEngine::StoreValueToMemory(GenericValue Val, GenericValue *Ptr,
case Type::ShortTyID: Ptr->Untyped[0] = Val.UShortVal & 255; case Type::ShortTyID: Ptr->Untyped[0] = Val.UShortVal & 255;
Ptr->Untyped[1] = (Val.UShortVal >> 8) & 255; Ptr->Untyped[1] = (Val.UShortVal >> 8) & 255;
break; break;
Store4BytesLittleEndian:
case Type::FloatTyID: case Type::FloatTyID:
case Type::UIntTyID: case Type::UIntTyID:
case Type::IntTyID: Ptr->Untyped[0] = Val.UIntVal & 255; case Type::IntTyID: Ptr->Untyped[0] = Val.UIntVal & 255;
@@ -99,10 +100,11 @@ void ExecutionEngine::StoreValueToMemory(GenericValue Val, GenericValue *Ptr,
Ptr->Untyped[2] = (Val.UIntVal >> 16) & 255; Ptr->Untyped[2] = (Val.UIntVal >> 16) & 255;
Ptr->Untyped[3] = (Val.UIntVal >> 24) & 255; Ptr->Untyped[3] = (Val.UIntVal >> 24) & 255;
break; break;
case Type::PointerTyID: if (CurMod.has32BitPointers())
goto Store4BytesLittleEndian;
case Type::DoubleTyID: case Type::DoubleTyID:
case Type::ULongTyID: case Type::ULongTyID:
case Type::LongTyID: case Type::LongTyID: Ptr->Untyped[0] = Val.ULongVal & 255;
case Type::PointerTyID: Ptr->Untyped[0] = Val.ULongVal & 255;
Ptr->Untyped[1] = (Val.ULongVal >> 8) & 255; Ptr->Untyped[1] = (Val.ULongVal >> 8) & 255;
Ptr->Untyped[2] = (Val.ULongVal >> 16) & 255; Ptr->Untyped[2] = (Val.ULongVal >> 16) & 255;
Ptr->Untyped[3] = (Val.ULongVal >> 24) & 255; Ptr->Untyped[3] = (Val.ULongVal >> 24) & 255;
@@ -123,6 +125,7 @@ void ExecutionEngine::StoreValueToMemory(GenericValue Val, GenericValue *Ptr,
case Type::ShortTyID: Ptr->Untyped[1] = Val.UShortVal & 255; case Type::ShortTyID: Ptr->Untyped[1] = Val.UShortVal & 255;
Ptr->Untyped[0] = (Val.UShortVal >> 8) & 255; Ptr->Untyped[0] = (Val.UShortVal >> 8) & 255;
break; break;
Store4BytesBigEndian:
case Type::FloatTyID: case Type::FloatTyID:
case Type::UIntTyID: case Type::UIntTyID:
case Type::IntTyID: Ptr->Untyped[3] = Val.UIntVal & 255; case Type::IntTyID: Ptr->Untyped[3] = Val.UIntVal & 255;
@@ -130,10 +133,11 @@ void ExecutionEngine::StoreValueToMemory(GenericValue Val, GenericValue *Ptr,
Ptr->Untyped[1] = (Val.UIntVal >> 16) & 255; Ptr->Untyped[1] = (Val.UIntVal >> 16) & 255;
Ptr->Untyped[0] = (Val.UIntVal >> 24) & 255; Ptr->Untyped[0] = (Val.UIntVal >> 24) & 255;
break; break;
case Type::PointerTyID: if (CurMod.has32BitPointers())
goto Store4BytesBigEndian;
case Type::DoubleTyID: case Type::DoubleTyID:
case Type::ULongTyID: case Type::ULongTyID:
case Type::LongTyID: case Type::LongTyID: Ptr->Untyped[7] = Val.ULongVal & 255;
case Type::PointerTyID: Ptr->Untyped[7] = Val.ULongVal & 255;
Ptr->Untyped[6] = (Val.ULongVal >> 8) & 255; Ptr->Untyped[6] = (Val.ULongVal >> 8) & 255;
Ptr->Untyped[5] = (Val.ULongVal >> 16) & 255; Ptr->Untyped[5] = (Val.ULongVal >> 16) & 255;
Ptr->Untyped[4] = (Val.ULongVal >> 24) & 255; Ptr->Untyped[4] = (Val.ULongVal >> 24) & 255;