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

The default attribute value is 1.

This commit is contained in:
steve 2002-08-10 21:59:39 +00:00
parent 27178cedda
commit 1bcacf06d4
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
eval_attrib.cc
View File

@ -17,7 +17,7 @@
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
*/ */
#if !defined(WINNT) #if !defined(WINNT)
#ident "$Id: eval_attrib.cc,v 1.3 2002/06/06 18:57:18 steve Exp $" #ident "$Id: eval_attrib.cc,v 1.4 2002/08/10 21:59:39 steve Exp $"
#endif #endif
# include "config.h" # include "config.h"
@ -51,11 +51,14 @@ attrib_list_t* evaluate_attributes(const map<string,PExpr*>&att,
table[idx].key = (*cur).first; table[idx].key = (*cur).first;
PExpr*exp = (*cur).second; PExpr*exp = (*cur).second;
/* If the attribute value is given in the source, then
evalulate it as a constant. If the value is not
given, then assume the value is 1. */
verinum*tmp; verinum*tmp;
if (exp) if (exp)
tmp = exp->eval_const(des, scope); tmp = exp->eval_const(des, scope);
else else
tmp = new verinum(); tmp = new verinum(1);
if (tmp == 0) if (tmp == 0)
cerr << "internal error: no result for " << *exp << endl; cerr << "internal error: no result for " << *exp << endl;
@ -71,6 +74,9 @@ attrib_list_t* evaluate_attributes(const map<string,PExpr*>&att,
/* /*
* $Log: eval_attrib.cc,v $ * $Log: eval_attrib.cc,v $
* Revision 1.4 2002/08/10 21:59:39 steve
* The default attribute value is 1.
*
* Revision 1.3 2002/06/06 18:57:18 steve * Revision 1.3 2002/06/06 18:57:18 steve
* Use standard name for iostream. * Use standard name for iostream.
* *