/*
** Splint - annotation-assisted static program checker
-** Copyright (C) 1994-2002 University of Virginia,
+** Copyright (C) 1994-2003 University of Virginia,
** Massachusetts Institute of Technology
**
** This program is free software; you can redistribute it and/or modify it
long multiVal_forceInt (multiVal m)
{
- llassert (multiVal_isInt (m));
-
- return m->value.ival;
+ if (multiVal_isInt (m)) {
+ return m->value.ival;
+ } else {
+ llcontbug (message ("Multival is not int: %s", multiVal_unparse (m)));
+ return 0;
+ }
}
char multiVal_forceChar (multiVal m)
return multiVal_undefined;
}
case MVCHAR:
- if (m2->value.cval != 0)
+ if (m2->value.cval != (char) 0)
{
return (multiVal_makeChar ((char) (m1->value.cval / m2->value.cval)));
}
return multiVal_undefined;
}
case MVDOUBLE:
- if (m2->value.fval != 0.0)
- {
- return (multiVal_makeDouble (m1->value.fval / m2->value.fval));
- }
- else
- {
- return multiVal_undefined;
- }
+ return multiVal_undefined; /* Don't attempt to divide floats */
case MVSTRING: return multiVal_undefined;
}