git-svn-id: https://sdcc.svn.sourceforge.net/svnroot/sdcc/trunk/sdcc@2827
4a8a32a2-be11-0410-ad9d-
d568d2c75423
valCastLiteral (sym_link * dtype, double fval)
{
value *val;
valCastLiteral (sym_link * dtype, double fval)
{
value *val;
+ TYPE_UDWORD l = (TYPE_UDWORD)fval;
val = newValue ();
val->etype = getSpec (val->type = copyLinkChain (dtype));
SPEC_SCLS (val->etype) = S_LITERAL;
val = newValue ();
val->etype = getSpec (val->type = copyLinkChain (dtype));
SPEC_SCLS (val->etype) = S_LITERAL;
- TYPE_UDWORD l = (TYPE_UDWORD)fval;
/* if it is not a specifier then we can assume that */
/* it will be an unsigned long */
/* if it is not a specifier then we can assume that */
/* it will be an unsigned long */