1 files changed, 6 insertions, 1 deletions
diff --git a/asm/asm.ml b/asm/asm.ml
index 8404654..47f5f7b 100644
--- a/asm/asm.ml
+++ b/asm/asm.ml
@@ -54,10 +54,13 @@ type instr =
 	| Liu of (reg * imm)
 	| Liuz of (reg * imm)
 	| Lra of imm
+	| Byte of int
+	| Word of int
+	| Hlt
 
 module Imap = Map.Make(String)
 
-type program = { text : instr list; data : (int * bool) list;
+type program = { text : instr list;
 	lbls : (int * bool) Imap.t }
 
 let keywords_r = [
@@ -93,3 +96,5 @@ let keywords_r = [
 		"swr",Swr;
 		"sbr",Sbr
 	]
+	
+exception Lexer_error