    Unit
        Bug02_U;

    {$X+}

    Interface

    Type
        TProcRec = Record
            Name1 : ^Function : CString;
            Name2 : ^Function : CString;
        End;


    Implementation

    End.

