diff options
Diffstat (limited to 'Source/Core/AbsyExpr.cs')
| -rw-r--r-- | Source/Core/AbsyExpr.cs | 16 |
1 files changed, 6 insertions, 10 deletions
diff --git a/Source/Core/AbsyExpr.cs b/Source/Core/AbsyExpr.cs index 7e7ed10a..181076a7 100644 --- a/Source/Core/AbsyExpr.cs +++ b/Source/Core/AbsyExpr.cs @@ -1519,8 +1519,6 @@ namespace Microsoft.Boogie { return "mod";
case Opcode.RealDiv:
return "/";
- case Opcode.FloatDiv:
- return "/";
case Opcode.Pow:
return "**";
case Opcode.Eq:
@@ -1583,10 +1581,6 @@ namespace Microsoft.Boogie { opBindingStrength = 0x50;
fragileRightContext = true;
break;
- case Opcode.FloatDiv: //TODO: Modify (potentially)
- opBindingStrength = 0x50;
- fragileRightContext = true;
- break;
case Opcode.Pow:
opBindingStrength = 0x60;
fragileRightContext = true;
@@ -1707,10 +1701,12 @@ namespace Microsoft.Boogie { if (arg0type.Unify(Type.Real) && arg1type.Unify(Type.Real)) {
return Type.Real;
}
- //if (arg0type.Unify(Type.Float) && arg1type.Unify(Type.Float))
- //{
- //return Type.Float;
- //}
+ if (arg0type.IsFloat && arg0type.Unify(arg1type)) {
+ return new FloatType(arg0.Type.FloatExponent, arg0.Type.FloatMantissa);
+ }
+ if (arg1type.IsFloat && arg1type.Unify(arg0type)) {
+ return new FloatType(arg1.Type.FloatExponent, arg1.Type.FloatMantissa);
+ }
goto BAD_TYPE;
case Opcode.Div:
case Opcode.Mod:
|