Check for ordinal type

This commit is contained in:
Neelesh Chandola
2018-12-13 14:12:22 +05:30
parent b2411db541
commit fa4644006a

View File

@@ -618,8 +618,8 @@ proc semRecordCase(c: PContext, n: PNode, check: var IntSet, pos: var int,
of tyFloat..tyFloat128, tyString, tyError:
discard
else:
localError(c.config, n.info, "selector must be of an ordinal type, float or string")
return
if not isOrdinalType(typ):
localError(c.config, n.info, "selector must be of an ordinal type, float or string")
for i in countup(1, sonsLen(n) - 1):
var b = copyTree(n.sons[i])
addSon(a, b)