reference to generic procedure produces Internal error 201202041
## Summary
When declaring a generic record or class with a reference to procedure type compiler reports Internal error 201202041.
## System Information
- **Operating system:** Windows 10
- **Processor architecture:** x86-64
- **Compiler version:** trunk
- **Device:** Computer
## Steps to reproduce
Compile the example project
## Example Project
```
program reftogenrpoc;
{$mode delphi}
{$modeswitch functionreferences}
{$modeswitch anonymousfunctions}
type
TGR1<T> = record
public type
TGRUpdateProc = reference to procedure (var ARec: TGR1<T>);
public
Val: T;
end;
var gr1: TGR1<integer>;
begin
end.
```
## What is the current bug behavior?
reftogenrpoc.lpr(14,4) Error: Internal error 201202041
## What is the expected (correct) behavior?
Successful compile
issue