GRegistry was a TStringList abused as a list of metaclass pointers — the string slot was always '' (vestigial) and the class reference lived in Objects[] behind Pointer()/TTestCaseClass() casts. Now that generics support metaclass type arguments (alias canonicalisation + space-safe label mangling), it becomes a plain TList<TTestCaseClass>: RegisterTest just Adds the class, GetRegisteredTest just Gets it — no dead string, no casts. 47 stdlib + 3744 compiler tests pass (both suites enumerate the registry to run, so this exercises the metaclass-generic path end to end). |
||
|---|---|---|
| .. | ||
| src | ||
| project.xml | ||