luke
/
iverilog
mirror of https://github.com/steveicarus/iverilog.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Add support for primitive types of ports. 

The infrastructure is already there, all that's missing is the
syntax in the parser.
This commit is contained in:
Stephen Williams 2010-03-11 12:22:41 -08:00
parent fe5c8f5e82
commit 70fc742c9d
3 changed files with 43 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

68
parse.y
View File

@ -1857,6 +1857,7 @@ list_of_port_declarations
pform_module_define_port(@3, name,
port_declaration_context.port_type,
port_declaration_context.port_net_type,
port_declaration_context.var_type,
port_declaration_context.sign_flag,
port_declaration_context.range, 0);
delete[]$3;
@ -1876,91 +1877,96 @@ list_of_port_declarations
port_declaration
: attribute_list_opt
K_input net_type_opt signed_opt range_opt IDENTIFIER
K_input net_type_opt primitive_type_opt signed_opt range_opt IDENTIFIER
{ Module::port_t*ptmp;
perm_string name = lex_strings.make($6);
perm_string name = lex_strings.make($7);
ptmp = pform_module_port_reference(name, @2.text,
@2.first_line);
pform_module_define_port(@2, name, NetNet::PINPUT,
$3, $4, $5, $1);
$3, $4, $5, $6, $1);
port_declaration_context.port_type = NetNet::PINPUT;
port_declaration_context.port_net_type = $3;
port_declaration_context.sign_flag = $4;
port_declaration_context.var_type = $4;
port_declaration_context.sign_flag = $5;
delete port_declaration_context.range;
port_declaration_context.range = $5;
port_declaration_context.range = $6;
delete $1;
delete[]$6;
delete[]$7;
$$ = ptmp;
}
| attribute_list_opt
K_inout net_type_opt signed_opt range_opt IDENTIFIER
K_inout net_type_opt primitive_type_opt signed_opt range_opt IDENTIFIER
{ Module::port_t*ptmp;
perm_string name = lex_strings.make($6);
perm_string name = lex_strings.make($7);
ptmp = pform_module_port_reference(name, @2.text,
@2.first_line);
pform_module_define_port(@2, name, NetNet::PINOUT,
$3, $4, $5, $1);
$3, $4, $5, $6, $1);
port_declaration_context.port_type = NetNet::PINOUT;
port_declaration_context.port_net_type = $3;
port_declaration_context.sign_flag = $4;
port_declaration_context.var_type = $4;
port_declaration_context.sign_flag = $5;
delete port_declaration_context.range;
port_declaration_context.range = $5;
port_declaration_context.range = $6;
delete $1;
delete[]$6;
delete[]$7;
$$ = ptmp;
}
| attribute_list_opt
K_output net_type_opt signed_opt range_opt IDENTIFIER
K_output net_type_opt primitive_type_opt signed_opt range_opt IDENTIFIER
{ Module::port_t*ptmp;
perm_string name = lex_strings.make($6);
perm_string name = lex_strings.make($7);
ptmp = pform_module_port_reference(name, @2.text,
@2.first_line);
pform_module_define_port(@2, name, NetNet::POUTPUT,
$3, $4, $5, $1);
$3, $4, $5, $6, $1);
port_declaration_context.port_type = NetNet::POUTPUT;
port_declaration_context.port_net_type = $3;
port_declaration_context.sign_flag = $4;
port_declaration_context.var_type = $4;
port_declaration_context.sign_flag = $5;
delete port_declaration_context.range;
port_declaration_context.range = $5;
port_declaration_context.range = $6;
delete $1;
delete[]$6;
delete[]$7;
$$ = ptmp;
}
| attribute_list_opt
K_output var_type signed_opt range_opt IDENTIFIER
K_output var_type primitive_type_opt signed_opt range_opt IDENTIFIER
{ Module::port_t*ptmp;
perm_string name = lex_strings.make($6);
perm_string name = lex_strings.make($7);
ptmp = pform_module_port_reference(name, @2.text,
@2.first_line);
pform_module_define_port(@2, name, NetNet::POUTPUT,
$3, $4, $5, $1);
$3, $4, $5, $6, $1);
port_declaration_context.port_type = NetNet::POUTPUT;
port_declaration_context.port_net_type = $3;
port_declaration_context.sign_flag = $4;
port_declaration_context.var_type = $4;
port_declaration_context.sign_flag = $5;
delete port_declaration_context.range;
port_declaration_context.range = $5;
port_declaration_context.range = $6;
delete $1;
delete[]$6;
delete[]$7;
$$ = ptmp;
}
| attribute_list_opt
K_output var_type signed_opt range_opt IDENTIFIER '=' expression
K_output var_type primitive_type_opt signed_opt range_opt IDENTIFIER '=' expression
{ Module::port_t*ptmp;
perm_string name = lex_strings.make($6);
perm_string name = lex_strings.make($7);
ptmp = pform_module_port_reference(name, @2.text,
@2.first_line);
pform_module_define_port(@2, name, NetNet::POUTPUT,
$3, $4, $5, $1);
$3, $4, $5, $6, $1);
port_declaration_context.port_type = NetNet::POUTPUT;
port_declaration_context.port_net_type = $3;
port_declaration_context.sign_flag = $4;
port_declaration_context.var_type = $4;
port_declaration_context.sign_flag = $5;
delete port_declaration_context.range;
port_declaration_context.range = $5;
port_declaration_context.range = $6;
pform_make_reginit(@6, name, $8);
pform_make_reginit(@7, name, $9);
delete $1;
delete[]$6;
delete[]$7;
$$ = ptmp;
}
;

6
pform.cc
View File

@ -1772,6 +1772,7 @@ void pform_module_define_port(const struct vlltype&li,
perm_string name,
NetNet::PortType port_type,
NetNet::Type type,
ivl_variable_type_t data_type,
bool signed_flag,
svector<PExpr*>*range,
svector<named_pexpr_t*>*attr)
@ -1786,8 +1787,11 @@ void pform_module_define_port(const struct vlltype&li,
return;
}
// The default type for all flavor of ports is LOGIC.
if (data_type == IVL_VT_NO_TYPE)
data_type = IVL_VT_LOGIC;
cur = new PWire(name, type, port_type, IVL_VT_LOGIC);
cur = new PWire(name, type, port_type, data_type);
FILE_NAME(cur, li);
cur->set_signed(signed_flag);

1
pform.h
View File

@ -153,6 +153,7 @@ extern void pform_module_define_port(const struct vlltype&li,
perm_string name,
NetNet::PortType,
NetNet::Type type,
ivl_variable_type_t data_type,
bool signed_flag,
svector<PExpr*>*range,
svector<named_pexpr_t*>*attr);