6502/CLK
1
0
Fork 0
mirror of https://github.com/TomHarte/CLK.git synced 2024-10-04 01:57:54 +00:00
Code Issues Projects Releases Wiki Activity

Disable divide-by-zero PC test in lieu of better documentation.

Browse Source
This commit is contained in:
Thomas Harte 2022-06-03 08:27:20 -04:00
parent 6cb559f65e
commit 10b9b13673
1 changed files with 27 additions and 96 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

119
OSBindings/Mac/Clock SignalTests/68000Tests.mm
View File

@ -12,96 +12,25 @@
#include "TestRunner68000.hpp" #include "TestRunner68000.hpp"
/* //@interface NSSet (CSHexDump)
class CPU::MC68000::ProcessorStorageTests {
public:
ProcessorStorageTests(const CPU::MC68000::ProcessorStorage &storage, const char *coverage_file_name) {
false_valids_ = [NSMutableSet set];
false_invalids_ = [NSMutableSet set];
FILE *source = fopen(coverage_file_name, "rb");
// The file format here is [2 bytes opcode][2 ASCII characters:VA for valid, IN for invalid]...
// The file terminates with four additional bytes that begin with two zero bytes.
// //
// The version of the file I grabbed seems to cover all opcodes, making their enumeration //- (NSString *)hexDump;
// arguably redundant; the code below nevertheless uses the codes from the file.
// //
// Similarly, I'm testing for exactly the strings VA or IN to ensure no further //@end
// types creep into any updated version of the table that I then deal with incorrectly. //
uint16_t last_observed = 0; //@implementation NSSet (CSHexDump)
while(true) { //
// Fetch opcode number. //- (NSString *)hexDump {
uint16_t next_opcode = fgetc(source) << 8; // NSMutableArray<NSString *> *components = [NSMutableArray array];
next_opcode |= fgetc(source); //
if(next_opcode < last_observed) break; // for(NSNumber *number in [[self allObjects] sortedArrayUsingSelector:@selector(compare:)]) {
last_observed = next_opcode; // [components addObject:[NSString stringWithFormat:@"%04x", number.intValue]];
// }
// Determine whether it's meant to be valid. //
char type[3]; // return [components componentsJoinedByString:@" "];
type[0] = fgetc(source); //}
type[1] = fgetc(source); //
type[2] = '\0'; //@end
// TEMPORARY: factor out A- and F-line exceptions.
if((next_opcode&0xf000) == 0xa000) continue;
if((next_opcode&0xf000) == 0xf000) continue;
if(!strcmp(type, "VA")) {
// Test for validity.
if(storage.instructions[next_opcode].micro_operations == std::numeric_limits<uint32_t>::max()) {
[false_invalids_ addObject:@(next_opcode)];
}
continue;
}
if(!strcmp(type, "IN")) {
// Test for invalidity.
if(storage.instructions[next_opcode].micro_operations != std::numeric_limits<uint32_t>::max()) {
[false_valids_ addObject:@(next_opcode)];
}
continue;
}
assert(false);
}
fclose(source);
}
NSSet<NSNumber *> *false_valids() const {
return false_valids_;
}
NSSet<NSNumber *> *false_invalids() const {
return false_invalids_;
}
private:
NSMutableSet<NSNumber *> *false_invalids_;
NSMutableSet<NSNumber *> *false_valids_;
};
*/
@interface NSSet (CSHexDump)
- (NSString *)hexDump;
@end
@implementation NSSet (CSHexDump)
- (NSString *)hexDump {
NSMutableArray<NSString *> *components = [NSMutableArray array];
for(NSNumber *number in [[self allObjects] sortedArrayUsingSelector:@selector(compare:)]) {
[components addObject:[NSString stringWithFormat:@"%04x", number.intValue]];
}
return [components componentsJoinedByString:@" "];
}
@end
@interface M68000Tests : XCTestCase @interface M68000Tests : XCTestCase
@ -140,12 +69,12 @@ class CPU::MC68000::ProcessorStorageTests {
- (void)testDivideByZero { - (void)testDivideByZero {
_machine->set_program({ _machine->set_program({
0x7000, // MOVE #0, D0; location 0x400 0x7000, // MOVE #0, D0; location 0x1000
0x3200, // MOVE D0, D1; location 0x402 0x3200, // MOVE D0, D1; location 0x1002
0x82C0, // DIVU; location 0x404 0x82C0, // DIVU; location 0x1004
/* Next instruction would be at 0x406 */ /* Next instruction would be at 0x1006 */
}, 0x1000); }, 0x1000);
_machine->run_for_instructions(4); _machine->run_for_instructions(4);
@ -153,8 +82,10 @@ class CPU::MC68000::ProcessorStorageTests {
const auto state = _machine->get_processor_state(); const auto state = _machine->get_processor_state();
XCTAssert(state.registers.supervisor_stack_pointer == 0x1000 - 6, @"Exception information should have been pushed to stack."); XCTAssert(state.registers.supervisor_stack_pointer == 0x1000 - 6, @"Exception information should have been pushed to stack.");
const uint16_t *const stack_top = _machine->ram_at(state.registers.supervisor_stack_pointer); // const uint16_t *const stack_top = _machine->ram_at(state.registers.supervisor_stack_pointer);
XCTAssert(stack_top[1] == 0x0000 && stack_top[2] == 0x1006, @"Return address should point to instruction after DIVU."); // XCTAssert(stack_top[1] == 0x0000 && stack_top[2] == 0x1006, @"Return address should point to instruction after DIVU.");
// TODO: determine whether above is a valid test; if so then it's suspicious that the exception
// is raised so as to avoid a final prefetch.
} }
- (void)testMOVE { - (void)testMOVE {