From 9495dd3a9e4aa9e27004ce9718ac39c197db13c0 Mon Sep 17 00:00:00 2001
From: Alex AUVOLAT <alex.auvolat@ens.fr>
Date: Thu, 9 Jan 2014 15:43:03 +0100
Subject: =?UTF-8?q?Donn=C3=A9es=20dans=20.text=20;=20support=20des=20cha?=
 =?UTF-8?q?=C3=AEnes=20ascii.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 asm/asm.ml | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'asm/asm.ml')

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
-- 
cgit v1.2.3