Changeset 55 for branches/ByteArray/Cpu.pas

Timestamp:

Nov 22, 2023, 10:09:35 PM (20 months ago)

Author:

chronos

Message:

• Modified: Extended BigInt type implementation.

File:

• branches/ByteArray/Cpu.pas (modified) (4 diffs)

branches/ByteArray/Cpu.pas

@@ -269 +269 @@
   RegIndex := ReadRegIndex;
   Address := Read(AddressWidth);
-  if Byte(Regs[RegIndex]) <> 0 then
+  if Regs[RegIndex] <> 0 then
     PC := Address;
 end;
@@ -284 +284 @@
   RegIndex := ReadRegIndex;
   Address := Read(AddressSize);
-  if Int64(Regs[RegIndex].Copy(DataSize)) <> 0 then
+  if Regs[RegIndex].Copy(DataSize) <> 0 then
     PC := Address;
 end;
@@ -295 +295 @@
   RegIndex := ReadRegIndex;
   Address := Read(AddressWidth);
-  if Byte(Regs[RegIndex]) = 0 then
+  if Regs[RegIndex] = 0 then
     PC := Address;
 end;
@@ -310 +310 @@
   RegIndex := ReadRegIndex;
   Address := Read(AddressSize);
-  if Int64(Regs[RegIndex].Copy(DataSize)) = 0 then
+  if Regs[RegIndex].Copy(DataSize) = 0 then
     PC := Address;
 end;