6502/erc-c
1
0
Fork 0
mirror of https://github.com/pevans/erc-c.git synced 2025-09-25 15:16:19 +00:00
Code Issues Projects Releases Wiki Activity

Add tests for new functions in apple2

Browse Source
This commit is contained in:
Peter Evans
2017-12-26 17:03:32 -06:00
parent 89a6161272
commit 5b35e2294e
1 changed files with 67 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

87
tests/apple2.c
View File

@@ -28,27 +28,31 @@ Test(apple2, create)
cr_assert_neq(mach->drive2, NULL); cr_assert_neq(mach->drive2, NULL);
} }
Test(apple2, press_key) Test(apple2, is_double_video)
{ {
apple2_press_key(mach, 123); for (int i = 0; i <= VIDEO_DOUBLE_HIRES; i++) {
cr_assert_eq(vm_segment_get(mach->memory, 0xC000), 123 | 0x80); mach->video_mode = i;
cr_assert_eq(vm_segment_get(mach->memory, 0xC010), 0x80); switch (i) {
} case VIDEO_40COL_TEXT:
cr_assert_eq(apple2_is_double_video(mach), false);
Test(apple2, clear_strobe) break;
{ case VIDEO_LORES:
apple2_press_key(mach, 123); cr_assert_eq(apple2_is_double_video(mach), false);
cr_assert_eq(vm_segment_get(mach->memory, 0xC000), 123 | 0x80); break;
apple2_clear_strobe(mach); case VIDEO_HIRES:
cr_assert_eq(vm_segment_get(mach->memory, 0xC000), 123); cr_assert_eq(apple2_is_double_video(mach), false);
} break;
case VIDEO_80COL_TEXT:
Test(apple2, release_key) cr_assert_eq(apple2_is_double_video(mach), true);
{ break;
apple2_press_key(mach, 123); case VIDEO_DOUBLE_LORES:
cr_assert_eq(vm_segment_get(mach->memory, 0xC010), 0x80); cr_assert_eq(apple2_is_double_video(mach), true);
apple2_release_key(mach); break;
cr_assert_eq(vm_segment_get(mach->memory, 0xC010), 0); case VIDEO_DOUBLE_HIRES:
cr_assert_eq(apple2_is_double_video(mach), true);
break;
}
}
} }
Test(apple2, boot) Test(apple2, boot)
@@ -65,3 +69,46 @@ Test(apple2, boot)
option_read_file(2, "../data/bad.img"); option_read_file(2, "../data/bad.img");
cr_assert_neq(apple2_boot(mach), OK); cr_assert_neq(apple2_boot(mach), OK);
} }
Test(apple2, press_key)
{
apple2_press_key(mach, 123);
cr_assert_eq(vm_segment_get(mach->memory, 0xC000), 123 | 0x80);
cr_assert_eq(vm_segment_get(mach->memory, 0xC010), 0x80);
}
Test(apple2, clear_strobe)
{
apple2_press_key(mach, 123);
cr_assert_eq(vm_segment_get(mach->memory, 0xC000), 123 | 0x80);
apple2_clear_strobe(mach);
cr_assert_eq(vm_segment_get(mach->memory, 0xC000), 123);
}
/*
* This also tests the press_key function (as does the clear_strobe
* test, in its own way).
*/
Test(apple2, release_key)
{
apple2_press_key(mach, 123);
cr_assert_eq(vm_segment_get(mach->memory, 0xC010), 0x80);
apple2_release_key(mach);
cr_assert_eq(vm_segment_get(mach->memory, 0xC010), 0);
}
Test(apple2, set_color)
{
apple2_set_color(mach, COLOR_AMBER);
cr_assert_eq(mach->color_mode, COLOR_AMBER);
apple2_set_color(mach, COLOR_FULL);
cr_assert_eq(mach->color_mode, COLOR_FULL);
}
Test(apple2, set_video)
{
apple2_set_video(mach, VIDEO_DOUBLE_HIRES);
cr_assert_eq(mach->video_mode, VIDEO_DOUBLE_HIRES);
apple2_set_video(mach, VIDEO_LORES);
cr_assert_eq(mach->video_mode, VIDEO_LORES);
}