No longer segfault when using a typeclass with a self referencing type (#19467)

(cherry picked from commit 1830a3b505)
This commit is contained in:
Jason Beetham
2022-02-02 01:38:21 -07:00
committed by narimiran
parent 196e93f9e1
commit da325b0822
2 changed files with 14 additions and 1 deletions

View File

@@ -1688,7 +1688,8 @@ proc typeRel(c: var TCandidate, f, aOrig: PType,
var aa = a
while aa.kind in {tyTypeDesc, tyGenericParam} and aa.len > 0:
aa = lastSon(aa)
if aa.kind == tyGenericParam:
if aa.kind in {tyGenericParam} + tyTypeClasses:
# If the constraint is a genericParam or typeClass this isGeneric
return isGeneric
result = typeRel(c, f.base, aa, flags)
if result > isGeneric: result = isGeneric

View File

@@ -860,3 +860,15 @@ type
var a: Tile3[int]
block: # Ensure no segfault from constraint
type
Regex[A: SomeOrdinal] = ref object
val: Regex[A]
MyConstraint = (seq or enum or set)
MyOtherType[A: MyConstraint] = ref object
val: MyOtherType[A]
var
a = Regex[int]()
b = Regex[bool]()
c = MyOtherType[seq[int]]()