Apple-2-Tools
/
apple2-go
mirror of https://github.com/freewilll/apple2-go.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Ensure DOS actually boots in boot test

This commit is contained in:
Will Angenent 2018-05-16 10:39:53 +01:00
parent 699b4923bd
commit 1ea1b10ab0
1 changed files with 10 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
dos33_boot_test.go
View File

@ -28,11 +28,18 @@ func TestDOS33Boot(t *testing.T) {
system.FrameCycles = 0
system.LastAudioCycles = 0
showInstructions := false
var breakAddress uint16
exitAtBreak := true
disableFirmwareWait := false
// Break at the BASIC interpreter to ensure DOS has started
breakAddress := uint16(0xa503)
exitAtBreak := false
t0 := time.Now()
cpu.Run(showInstructions, &breakAddress, exitAtBreak, disableFirmwareWait, system.CpuFrequency*1000)
cpu.Run(showInstructions, &breakAddress, exitAtBreak, disableFirmwareWait, system.CpuFrequency*7)
if cpu.State.PC != 0xa503 {
t.Fatal("Did not reach BASIC entrypoint")
}
elapsed := float64(time.Since(t0) / time.Millisecond)
fmt.Printf("CPU Cycles: %d\n", system.FrameCycles)