diff options
| author | Alex AUVOLAT <alex.auvolat@ens.fr> | 2013-12-17 11:37:54 +0100 |
|---|---|---|
| committer | Alex AUVOLAT <alex.auvolat@ens.fr> | 2013-12-17 11:37:54 +0100 |
| commit | 1e5b58007da3be94755b017004cd5fe484ccbed7 (patch) | |
| tree | 0b285c48f3151add05cf7c8dfbb960646c7df49f /camlsim/netlist.ml | |
| parent | f91d7484c8d5af62dff97eb9ce5a5ac85aba2005 (diff) | |
| download | SystDigit-Projet-1e5b58007da3be94755b017004cd5fe484ccbed7.tar.gz SystDigit-Projet-1e5b58007da3be94755b017004cd5fe484ccbed7.zip | |
Tabs to spaces ; deleted Caml simulator (useless anyways)
Diffstat (limited to 'camlsim/netlist.ml')
| -rw-r--r-- | camlsim/netlist.ml | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/camlsim/netlist.ml b/camlsim/netlist.ml deleted file mode 100644 index b1d7932..0000000 --- a/camlsim/netlist.ml +++ /dev/null @@ -1,17 +0,0 @@ -exception Parse_error of string - -let find_file filename = - try - open_in filename - with - | _ -> raise (Parse_error "No such file '%s'") - -let read_file filename = - let ic = find_file filename in - let lexbuf = Lexing.from_channel ic in - lexbuf.Lexing.lex_curr_p <- { lexbuf.Lexing.lex_curr_p with Lexing.pos_fname = filename }; - try - Netlist_parser.program Netlist_lexer.token lexbuf - with - | e -> raise (Parse_error ("Syntax error (exception: "^(Printexc.to_string e)^")")) - |