diff options
| author | Alex AUVOLAT <alex.auvolat@ens.fr> | 2014-01-09 15:43:03 +0100 |
|---|---|---|
| committer | Alex AUVOLAT <alex.auvolat@ens.fr> | 2014-01-09 15:43:03 +0100 |
| commit | 9495dd3a9e4aa9e27004ce9718ac39c197db13c0 (patch) | |
| tree | 0d0fe96fc95d4f1ee5055254831b5af96c35e869 /asm/asm.ml | |
| parent | 91bc6bd5554bb4267cbaf147e603791e50462242 (diff) | |
| download | SystDigit-Projet-9495dd3a9e4aa9e27004ce9718ac39c197db13c0.tar.gz SystDigit-Projet-9495dd3a9e4aa9e27004ce9718ac39c197db13c0.zip | |
Données dans .text ; support des chaînes ascii.
Diffstat (limited to 'asm/asm.ml')
| -rw-r--r-- | asm/asm.ml | 7 |
1 files changed, 6 insertions, 1 deletions
@@ -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 |