vhdlpp: file_open_status enum.

This commit is contained in:
Maciej Suminski 2016-01-22 12:12:55 +01:00
parent f2c8fb0479
commit b707228171
3 changed files with 14 additions and 0 deletions

View File

@ -370,6 +370,7 @@ static void import_std_use(const YYLTYPE&loc, ActiveScope*res, perm_string packa
res->use_name(perm_string::literal("text"), &primitive_INTEGER);
res->use_name(perm_string::literal("line"), &primitive_STRING);
res->use_name(type_FILE_OPEN_KIND.peek_name(), &type_FILE_OPEN_KIND);
res->use_name(type_FILE_OPEN_STATUS.peek_name(), &type_FILE_OPEN_STATUS);
return;
} else {
sorrymsg(loc, "package %s of library %s not yet supported", package.str(), name.str());

View File

@ -34,6 +34,7 @@ const VTypePrimitive primitive_TIME(VTypePrimitive::TIME);
VTypeDef type_BOOLEAN(perm_string::literal("boolean"));
VTypeDef type_FILE_OPEN_KIND(perm_string::literal("file_open_kind"));
VTypeDef type_FILE_OPEN_STATUS(perm_string::literal("file_open_status"));
const VTypeArray primitive_CHARACTER(&primitive_BIT, 7, 0);
const VTypeArray primitive_BIT_VECTOR(&primitive_BIT, vector<VTypeArray::range_t> (1));
@ -64,6 +65,17 @@ void generate_global_types(ActiveScope*res)
std_types[type_FILE_OPEN_KIND.peek_name()] = &type_FILE_OPEN_KIND;
std_enums.push_back(enum_FILE_OPEN_KIND);
// file_open_status
list<perm_string> enum_FILE_OPEN_STATUS_vals;
enum_FILE_OPEN_STATUS_vals.push_back(perm_string::literal("open_ok"));
enum_FILE_OPEN_STATUS_vals.push_back(perm_string::literal("status_error"));
enum_FILE_OPEN_STATUS_vals.push_back(perm_string::literal("name_error"));
enum_FILE_OPEN_STATUS_vals.push_back(perm_string::literal("mode_error"));
VTypeEnum*enum_FILE_OPEN_STATUS = new VTypeEnum(&enum_FILE_OPEN_STATUS_vals);
type_FILE_OPEN_STATUS.set_definition(enum_FILE_OPEN_STATUS);
std_types[type_FILE_OPEN_STATUS.peek_name()] = &type_FILE_OPEN_STATUS;
std_enums.push_back(enum_FILE_OPEN_STATUS);
res->use_name(type_BOOLEAN.peek_name(), &type_BOOLEAN);
res->use_name(perm_string::literal("bit"), &primitive_BIT);
res->use_name(perm_string::literal("bit_vector"), &primitive_BIT_VECTOR);

View File

@ -39,6 +39,7 @@ extern const VTypePrimitive primitive_LINE;
extern VTypeDef type_BOOLEAN;
extern VTypeDef type_FILE_OPEN_KIND;
extern VTypeDef type_FILE_OPEN_STATUS;
extern const VTypeArray primitive_CHARACTER;
extern const VTypeArray primitive_BIT_VECTOR;