working...1

This commit is contained in:
Jaka Furlan 2025-11-29 21:17:09 +01:00
parent bc78a83838
commit 61bb14b9e3
21 changed files with 1054 additions and 12 deletions

View file

@ -0,0 +1,10 @@
(*decoderjeva naloga je pridobiti mnemonic in tip ukaza iz prvega byta z pogledom v hash-table*)
let table = OpcodeTable.table
let decoder (byte1 : char) : OpcodeTable.info =
let opcode = (Char.code byte1) land 0xFC in
try
Hashtbl.find OpcodeTable.table opcode
with
| Not_found -> failwith "invalid opcode"