main.ha - edea - A ps1 emulator in harelang

main.ha (397B)
      1 use fmt;
      2 use bios;
      3 use interconnect;
      4 use cpu;
      5 use io;
      6 use os;
      7 use ram;
      8 
      9 
     10 export fn main() void = {
     11 	static const DEBUG = true;
     12 
     13 	let b: bios::BIOS = bios::new()!;
     14 	defer free(b.data);
     15 	let r: ram::ram = ram::new();
     16 	defer free(r.data);
     17 	let inter: interconnect::Interconnect = interconnect::new(b, r);
     18 	let cpu: cpu::CPU = cpu::new(inter);
     19 	for (true) {
     20 		cpu::run_next_instruction(&cpu);
     21 	};
     22 
     23 };