diff options
| author | Gabriel Kerneis | 2014-06-12 14:34:33 +0100 |
|---|---|---|
| committer | Gabriel Kerneis | 2014-06-12 14:34:33 +0100 |
| commit | 07c2c742b94f35a9c95ebabd58b6799ec58f1059 (patch) | |
| tree | 21a8807cc95bb54e96c169689b51cf37732d46aa /src | |
| parent | f2fa48b95a789fdeca777ea1cb932a3657faeed3 (diff) | |
Add uint* to default type names for lexer
This is necessary to avoid a parse error. It might make sense to merge
this list and the one in type_internal.ml somehow, to avoid duplication
and similar bugs in the future.
Diffstat (limited to 'src')
| -rw-r--r-- | src/process_file.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/process_file.ml b/src/process_file.ml index 26fc1f22..c2a977da 100644 --- a/src/process_file.ml +++ b/src/process_file.ml @@ -62,7 +62,8 @@ let get_lexbuf fn = let parse_file (f : string) : Parse_ast.defs = let scanbuf = get_lexbuf f in - let default_type_names = ["bool";"unit";"vector";"range";"list";"bit";"nat"] in + let default_type_names = ["bool";"unit";"vector";"range";"list";"bit";"nat"; + "uint8";"uint16";"uint32";"uint64"] in let type_names = try Pre_parser.file Pre_lexer.token scanbuf |