Added stub C simulator (defined dumb-down syntax for netlists).

1 files changed, 0 insertions, 37 deletions

diff --git a/tp1/netlist_lexer.mll b/tp1/netlist_lexer.mll
deleted file mode 100644
index 78b0410..0000000
--- a/tp1/netlist_lexer.mll
+++ /dev/null
@@ -1,37 +0,0 @@
-{
-open Netlist_parser
-exception Eof
-
-let keyword_list =
-[
-  "AND", AND;
-  "CONCAT", CONCAT;
-  "IN", IN;
-  "INPUT", INPUT;
-  "MUX", MUX;
-  "NAND", NAND;
-  "NOT", NOT;
-  "OR", OR;
-  "OUTPUT", OUTPUT;
-  "RAM", RAM;
-  "REG", REG;
-  "ROM", ROM;
-  "SELECT", SELECT;
-  "SLICE", SLICE;
-  "VAR", VAR;
-  "XOR", XOR;
-]
-
-}
-
-rule token = parse
-    [' ' '\t' '\n']     { token lexbuf }     (* skip blanks *)
-  | "="            { EQUAL }
-  | ":"            { COLON }
-  | ","            { COMMA }
-  | ['0'-'9']+ as lxm { INT(int_of_string lxm) }
-  | ('_' ? ['A'-'Z' 'a'-'z']('_' ? ['A'-'Z' 'a'-'z' ''' '0'-'9']) * as id)
-      { let s = Lexing.lexeme lexbuf in
-        try List.assoc s keyword_list
-        with Not_found -> NAME id }
-  | eof            { EOF }