This commit is contained in:
Jaka Furlan 2025-12-10 16:21:03 +01:00
parent 1bbc80de29
commit 858db4dc0e
4 changed files with 109 additions and 29 deletions

View file

@ -0,0 +1,12 @@
(*simbolna tabela*)
type symtab = (string, int) Hashtbl.t
let create_symtab () : symtab =
Hashtbl.create 64
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