bugfix: conversions to float32 are allowed again but of lower priority

This commit is contained in:
Araq
2013-08-30 21:47:55 +02:00
parent 74c24f3e6d
commit cf689f7472

View File

@@ -292,10 +292,10 @@ proc handleFloatRange(f, a: PType): TTypeRelation =
if k == f.kind: result = isSubrange
elif isFloatLit(ab): result = isFromIntLit
elif isIntLit(ab): result = isConvertible
elif f.kind == tyFloat32:
elif k >= tyFloat and k <= tyFloat128:
# conversion to "float32" is not as good:
result = isConvertible
elif k >= tyFloat and k <= tyFloat128: result = isIntConv
if f.kind == tyFloat32: result = isConvertible
else: result = isIntConv
else: result = isNone
proc isObjectSubtype(a, f: PType): int =