working on pass 2

This commit is contained in:
Jaka Furlan 2025-12-13 16:11:31 +01:00
parent 7810346819
commit f79aa96359
4 changed files with 83 additions and 7 deletions

View file

@ -9,4 +9,7 @@ let add_symbol (tab : symtab) (label : string) (addr : int) =
if Hashtbl.mem tab label then
failwith "Duplicate symbol in simtab"
else
Hashtbl.add tab label addr
Hashtbl.add tab label addr
let find_symbol (tab : symtab) (label : string) : int =
Hashtbl.find tab label