GuiTypeDescriptorBuilder

/*********************************************************************** Author: Zihan Chen (vczh) Licensed under https://github.com/vczh-libraries/License ***********************************************************************/

#ifndef VCZH_REFLECTION_GUITYPEDESCRIPTORBUILDER_FUNCTION

#define VCZH_REFLECTION_GUITYPEDESCRIPTORBUILDER_FUNCTION

#include "GuiTypeDescriptorBuilder.h"

namespace

{

namespace

reflection

{

namespace

description

{

template

typename

...

TArgs

struct

EventHelper

{

using

Handler

const

Func

void

(

TArgs

...)>&;

class

EventHandlerImpl

public

Object

public

reflection

description

IEventHandler

{

public

Ptr

EventHandler

handler

;

EventHandlerImpl

(

Ptr

EventHandler

_handler

) :handler(

_handler

) { }

bool

IsAttached

()

override

{

return

handler

IsAttached

(); } };

static

Ptr

reflection

description

IEventHandler

Attach

(

Event

void

(

TArgs

...)>&

Handler

handler

) {

return

MakePtr

EventHandlerImpl

Add

(

handler

)); }

static

bool

Detach

(

Event

void

(

TArgs

...)>&

Ptr

reflection

description

IEventHandler

handler

) {

auto

impl

handler

Cast

EventHandlerImpl

>();

impl

)

return

false

;

return

Remove

(

impl

handler

); }

static

Event

void

(

TArgs

...)>&

Invoke

(

Event

void

(

TArgs

...)>&

) {

return

; } };

/*********************************************************************** DetailTypeInfoRetriver<Func<R(TArgs...)>> ***********************************************************************/

#ifndef VCZH_DEBUG_NO_REFLECTION

namespace

internal_helper

{

template

typename

struct

GenericArgumentAdder

{

static

void

Add

(

Ptr

GenericTypeInfo

genericType

) { } };

template

typename

...

TNextArgs

struct

GenericArgumentAdder

TypeTuple

TNextArgs

...>> {

static

void

Add

(

Ptr

GenericTypeInfo

genericType

) {

genericType

AddGenericArgument

(

TypeInfoRetriver

>::

CreateTypeInfo

());

GenericArgumentAdder

TypeTuple

TNextArgs

...>>::

Add

(

genericType

); } }; }

#endif

template

typename

...

TArgs

struct

DetailTypeInfoRetriver

Func

(

TArgs

...)>,

TypeFlags

FunctionType

> {

typedef

DetailTypeInfoRetriver

const

Func

(

TArgs

...)>,

TypeFlags

NonGenericType

UpLevelRetriver

;

static

const

ITypeInfo

Decorator

UpLevelRetriver

Decorator

;

typedef

IValueList

Type

;

typedef

typename

UpLevelRetriver

TempValueType

;

typedef

typename

UpLevelRetriver

ResultReferenceType

;

typedef

typename

UpLevelRetriver

ResultNonReferenceType

;

#ifndef VCZH_DEBUG_NO_REFLECTION

static

Ptr

ITypeInfo

CreateTypeInfo

(

TypeInfoHint

hint

) {

auto

functionType

MakePtr

TypeDescriptorTypeInfo

GetTypeDescriptor

IValueFunctionProxy

>(),

hint

);

auto

genericType

MakePtr

GenericTypeInfo

functionType

);

genericType

AddGenericArgument

(

TypeInfoRetriver

>::

CreateTypeInfo

());

internal_helper

GenericArgumentAdder

TypeTuple

TArgs

...>>::

Add

(

genericType

);

auto

type

MakePtr

SharedPtrTypeInfo

genericType

);

return

type

; }

#endif

};

template

typename

...

TArgs

struct

DetailTypeInfoRetriver

const

Func

(

TArgs

...)>,

TypeFlags

FunctionType

> :

DetailTypeInfoRetriver

Func

(

TArgs

...)>,

TypeFlags

FunctionType

> { };

/*********************************************************************** ValueFunctionProxyWrapper<Func<R(TArgs...)>> ***********************************************************************/

template

typename

class

ValueFunctionProxyWrapper

{ };

namespace

internal_helper

{

extern

void

UnboxSpecifiedParameter

(

Ptr

IValueList

arguments

vint

index

);

template

typename

...

TArgs

void

UnboxSpecifiedParameter

(

Ptr

IValueList

arguments

vint

index

TArgs

& ...

args

) {

UnboxParameter

typename

TypeInfoRetriver

>::

TempValueType

arguments

Get

(

index

itow

(

index

) +

L"-th argument"

);

UnboxSpecifiedParameter

(

arguments

index

args

...); }

template

typename

...

TArgs

struct

BoxedFunctionInvoker

{

static

Value

Invoke

(

const

Func

(

TArgs

...)>&

function

Ptr

IValueList

arguments

typename

RemoveCVR

TArgs

>::Type&& ...

args

) {

UnboxSpecifiedParameter

(

arguments

args

...);

result

function

(

args

...);

return

BoxParameter

result

); } };

template

typename

...

TArgs

struct

BoxedFunctionInvoker

void

TArgs

...> {

static

Value

Invoke

(

const

Func

void

(

TArgs

...)>&

function

Ptr

IValueList

arguments

typename

RemoveCVR

TArgs

>::Type&& ...

args

) {

UnboxSpecifiedParameter

(

arguments

args

...);

function

(

args

...);

return

Value

(); } }; }

template

typename

...

TArgs

class

ValueFunctionProxyWrapper

(

TArgs

...)> :

public

Object

public

virtual

IValueFunctionProxy

{

typedef

Func

(

TArgs

...)>

FunctionType

;

protected

FunctionType

function

;

public

ValueFunctionProxyWrapper

(

const

FunctionType

_function

) :function(

_function

) { }

FunctionType

GetFunction

() {

return

function

; }

Value

Invoke

(

Ptr

IValueList

arguments

)

override

{

arguments

GetCount

() !=

sizeof

...(

TArgs

)) {

#ifdef VCZH_DESCRIPTABLEOBJECT_WITH_METADATA

throw

ArgumentCountMismtatchException

();

#else

CHECK_FAIL(L"Argument count mismatch."); #endif

}

return

internal_helper

BoxedFunctionInvoker

TArgs

...>::

Invoke

(

function

arguments

typename

RemoveCVR

TArgs

>::Type()...); } };

/*********************************************************************** ParameterAccessor<Func<R(TArgs...)>> ***********************************************************************/

namespace

internal_helper

{

extern

void

AddValueToList

(

Ptr

IValueList

arguments

);

template

typename

...

TArgs

void

AddValueToList

(

Ptr

IValueList

arguments

TArgs

&& ...

args

) {

arguments

Add

(

description

BoxParameter

));

AddValueToList

(

arguments

args

...); } }

template

typename

...

TArgs

struct

ParameterAccessor

Func

(

TArgs

...)>,

TypeFlags

FunctionType

> {

static

Value

BoxParameter

(

const

Func

(

TArgs

...)>&

object

ITypeDescriptor

typeDescriptor

) {

typedef

(

RawFunctionType

)(

TArgs

...);

Ptr

IValueFunctionProxy

result

new

ValueFunctionProxyWrapper

RawFunctionType

object

);

ITypeDescriptor

nullptr

;

#ifdef VCZH_DESCRIPTABLEOBJECT_WITH_METADATA

Description

IValueFunctionProxy

>::

GetAssociatedTypeDescriptor

();

#endif

return

BoxValue

Ptr

IValueFunctionProxy

>>(

result

); }

static

void

UnboxParameter

(

const

Value

value

Func

(

TArgs

...)>&

result

ITypeDescriptor

typeDescriptor

const

WString

valueName

) {

typedef

(

RawFunctionType

)(

TArgs

...);

typedef

ValueFunctionProxyWrapper

RawFunctionType

ProxyType

;

Ptr

IValueFunctionProxy

functionProxy

UnboxValue

Ptr

IValueFunctionProxy

>>(

value

typeDescriptor

valueName

);

(

functionProxy

) {

(

Ptr

ProxyType

proxy

functionProxy

Cast

ProxyType

>()) {

result

proxy

GetFunction

(); }

else

{

result

=[functionProxy](

TArgs

...

args

) {

Ptr

IValueList

arguments

IValueList

Create

();

internal_helper

AddValueToList

(

arguments

ForwardValue

TArgs

args

)...);

typedef

typename

TypeInfoRetriver

>::

TempValueType

ResultType

;

ResultType

proxyResult

;

description

UnboxParameter

ResultType

functionProxy

Invoke

(

arguments

proxyResult

);

return

proxyResult

; }; } } } };

template

typename

...

TArgs

struct

ParameterAccessor

const

Func

(

TArgs

...)>,

TypeFlags

FunctionType

> :

ParameterAccessor

Func

(

TArgs

...)>,

TypeFlags

FunctionType

> { };

#ifdef VCZH_DESCRIPTABLEOBJECT_WITH_METADATA

/*********************************************************************** MethodInfoImpl ***********************************************************************/

template

typename

class

CustomConstructorInfoImpl

{};

template

typename

TClass

typename

class

CustomMethodInfoImpl

{};

template

typename

TClass

typename

class

CustomExternalMethodInfoImpl

{};

template

typename

class

CustomStaticMethodInfoImpl

{};

template

typename

TClass

typename

class

CustomEventInfoImpl

{};

/*********************************************************************** CustomConstructorInfoImpl<R(TArgs...)> ***********************************************************************/

namespace

internal_helper

{

extern

void

UnboxSpecifiedParameter

(

MethodInfoImpl

methodInfo

collections

Array

Value

arguments

vint

index

);

template

typename

...

TArgs

void

UnboxSpecifiedParameter

(

MethodInfoImpl

methodInfo

collections

Array

Value

arguments

vint

index

TArgs

& ...

args

) {

UnboxParameter

typename

TypeInfoRetriver

>::

TempValueType

arguments

[

index

methodInfo

GetParameter

(

index

)->

GetType

()->

GetTypeDescriptor

(),

itow

(

index

) +

L"-th argument"

);

UnboxSpecifiedParameter

(

methodInfo

arguments

index

args

...); }

template

typename

...

TArgs

struct

BoxedConstructorInvoker

{

static

Value

Invoke

(

MethodInfoImpl

methodInfo

collections

Array

Value

arguments

typename

RemoveCVR

TArgs

>::Type&& ...

args

) {

UnboxSpecifiedParameter

(

methodInfo

arguments

args

...);

result

new

typename

TypeInfoRetriver

>::

Type

(

args

...);

return

BoxParameter

result

); } };

template

typename

struct

ConstructorArgumentAdder

{

static

void

Add

(

MethodInfoImpl

methodInfo

const

wchar_t

parameterNames

[],

vint

index

) { } };

template

typename

...

TNextArgs

struct

ConstructorArgumentAdder

TypeTuple

TNextArgs

...>> {

static

void

Add

(

MethodInfoImpl

methodInfo

const

wchar_t

parameterNames

[],

vint

index

) {

methodInfo

AddParameter

(

new

ParameterInfoImpl

(

methodInfo

parameterNames

[

index

TypeInfoRetriver

>::

CreateTypeInfo

()));

ConstructorArgumentAdder

TypeTuple

TNextArgs

...>>::

Add

(

methodInfo

parameterNames

index

); } }; }

template

typename

...

TArgs

class

CustomConstructorInfoImpl

(

TArgs

...)> :

public

MethodInfoImpl

{

protected

Value

InvokeInternal

(

const

Value

thisObject

collections

Array

Value

arguments

)

override

{

return

internal_helper

BoxedConstructorInvoker

TArgs

...>::

Invoke

(

this

arguments

typename

RemoveCVR

TArgs

>::Type()...); }

Value

CreateFunctionProxyInternal

(

const

Value

thisObject

)

override

{

Func

(

TArgs

...)>

proxy

(

LAMBDA([](TArgs ...args)->R

function_lambda

Lambda

([](

TArgs

...

args

)->

{

result

new

typename

TypeInfoRetriver

>::

Type

(

args

...);

return

result

; }) );

return

BoxParameter

Func

(

TArgs

...)>>(

proxy

); }

public

CustomConstructorInfoImpl

(

const

wchar_t

parameterNames

[]) :

MethodInfoImpl

(

TypeInfoRetriver

>::

CreateTypeInfo

(),

true

) {

internal_helper

ConstructorArgumentAdder

TypeTuple

TArgs

...>>::

Add

(

this

parameterNames

); }

IMethodInfo

ICpp

GetCpp

()

override

{

return

nullptr

; } };

/*********************************************************************** CustomMethodInfoImpl<TClass, R(TArgs...)> CustomStaticMethodInfoImpl<TClass, R(TArgs...)> ***********************************************************************/

namespace

internal_helper

{

template

typename

TClass

typename

...

TArgs

struct

BoxedMethodInvoker

{

static

Value

Invoke

(

TClass

object

(

__thiscall

TClass

::*

method

)(

TArgs

...),

MethodInfoImpl

methodInfo

collections

Array

Value

arguments

typename

RemoveCVR

TArgs

>::Type&& ...

args

) {

UnboxSpecifiedParameter

(

methodInfo

arguments

args

...);

result

= (

object

->*

method

)(

args

...);

return

BoxParameter

result

methodInfo

GetReturn

()->

GetTypeDescriptor

()); } };

template

typename

TClass

typename

...

TArgs

struct

BoxedMethodInvoker

TClass

void

TArgs

...> {

static

Value

Invoke

(

TClass

object

void

(

__thiscall

TClass

::*

method

)(

TArgs

...),

MethodInfoImpl

methodInfo

collections

Array

Value

arguments

typename

RemoveCVR

TArgs

>::Type&& ...

args

) {

UnboxSpecifiedParameter

(

methodInfo

arguments

args

...); (

object

->*

method

)(

args

...);

return

Value

(); } };

template

typename

TClass

typename

...

TArgs

struct

BoxedExternalMethodInvoker

{

static

Value

Invoke

(

TClass

object

method

)(

TClass

TArgs

...),

MethodInfoImpl

methodInfo

collections

Array

Value

arguments

typename

RemoveCVR

TArgs

>::Type&& ...

args

) {

UnboxSpecifiedParameter

(

methodInfo

arguments

args

...);

result

method

(

object

args

...);

return

BoxParameter

result

methodInfo

GetReturn

()->

GetTypeDescriptor

()); } };

template

typename

TClass

typename

...

TArgs

struct

BoxedExternalMethodInvoker

TClass

void

TArgs

...> {

static

Value

Invoke

(

TClass

object

void

method

)(

TClass

TArgs

...),

MethodInfoImpl

methodInfo

collections

Array

Value

arguments

typename

RemoveCVR

TArgs

>::Type&& ...

args

) {

UnboxSpecifiedParameter

(

methodInfo

arguments

args

...);

method

(

object

args

...);

return

Value

(); } }; }

class

MethodInfoImpl_StaticCpp

public

MethodInfoImpl

private

IMethodInfo

ICpp

{

private

WString

invokeTemplate

;

WString

closureTemplate

;

const

WString

GetInvokeTemplate

()

override

{

return

invokeTemplate

; }

const

WString

GetClosureTemplate

()

override

{

return

closureTemplate

; }

public

MethodInfoImpl_StaticCpp

(

IMethodGroupInfo

_ownerMethodGroup

Ptr

ITypeInfo

_return

bool

_isStatic

const

wchar_t

_invokeTemplate

const

wchar_t

_closureTemplate

) :

MethodInfoImpl

(

_ownerMethodGroup

_return

_isStatic

) {

CHECK_ERROR((_invokeTemplate == nullptr) == (_closureTemplate == nullptr), L"MethodInfoImpl_StaticCpp::MethodInfoImpl_StaticCpp()#Templates should all be set or default at the same time.");

{

(!((

_invokeTemplate

nullptr

) == (

_closureTemplate

nullptr

)))

throw

Error

(

L"MethodInfoImpl_StaticCpp::MethodInfoImpl_StaticCpp()#Templates should all be set or default at the same time."

);}

while

(

);

(

_invokeTemplate

) {

invokeTemplate

WString

(

_invokeTemplate

false

); }

(

_closureTemplate

) {

closureTemplate

WString

(

_closureTemplate

false

); } }

IMethodInfo

ICpp

GetCpp

()

override

{

return

invokeTemplate

Length

() ==

closureTemplate

Length

() ==

nullptr

this

; } };

template

typename

TClass

typename

...

TArgs

class

CustomMethodInfoImpl

TClass

(

TArgs

...)> :

public

MethodInfoImpl_StaticCpp

{

protected

(

__thiscall

TClass

::*

method

)(

TArgs

...);

Value

InvokeInternal

(

const

Value

thisObject

collections

Array

Value

arguments

)

override

{

TClass

object

UnboxValue

TClass

*>(

thisObject

GetOwnerTypeDescriptor

(),

L"thisObject"

);

return

internal_helper

BoxedMethodInvoker

TClass

TArgs

...>::

Invoke

(

object

method

this

arguments

typename

RemoveCVR

TArgs

>::Type()...); }

Value

CreateFunctionProxyInternal

(

const

Value

thisObject

)

override

{

TClass

object

UnboxValue

TClass

*>(

thisObject

GetOwnerTypeDescriptor

(),

L"thisObject"

);

Func

(

TArgs

...)>

proxy

(

object

method

);

return

BoxParameter

Func

(

TArgs

...)>>(

proxy

); }

public

CustomMethodInfoImpl

(

const

wchar_t

parameterNames

[],

(

__thiscall

TClass

::*

_method

)(

TArgs

...),

const

wchar_t

_invokeTemplate

const

wchar_t

_closureTemplate

) :

MethodInfoImpl_StaticCpp

(

TypeInfoRetriver

>::

CreateTypeInfo

(),

false

_invokeTemplate

_closureTemplate

) ,method(

_method

) {

internal_helper

ConstructorArgumentAdder

TypeTuple

TArgs

...>>::

Add

(

this

parameterNames

); } };

template

typename

TClass

typename

...

TArgs

class

CustomExternalMethodInfoImpl

TClass

(

TArgs

...)> :

public

MethodInfoImpl_StaticCpp

{

protected

method

)(

TClass

TArgs

...);

Value

InvokeInternal

(

const

Value

thisObject

collections

Array

Value

arguments

)

override

{

TClass

object

UnboxValue

TClass

*>(

thisObject

GetOwnerTypeDescriptor

(),

L"thisObject"

);

return

internal_helper

BoxedExternalMethodInvoker

TClass

TArgs

...>::

Invoke

(

object

method

this

arguments

typename

RemoveCVR

TArgs

>::Type()...); }

Value

CreateFunctionProxyInternal

(

const

Value

thisObject

)

override

{

TClass

object

UnboxValue

TClass

*>(

thisObject

GetOwnerTypeDescriptor

(),

L"thisObject"

);

Func

(

TArgs

...)>

proxy

Curry

(

Func

(

TClass

TArgs

...)>(

method

))

(

object

);

return

BoxParameter

Func

(

TArgs

...)>>(

proxy

); }

public

CustomExternalMethodInfoImpl

(

const

wchar_t

parameterNames

[],

_method

)(

TClass

TArgs

...),

const

wchar_t

_invokeTemplate

const

wchar_t

_closureTemplate

) :

MethodInfoImpl_StaticCpp

(

TypeInfoRetriver

>::

CreateTypeInfo

(),

false

_invokeTemplate

_closureTemplate

) ,method(

_method

) {

internal_helper

ConstructorArgumentAdder

TypeTuple

TArgs

...>>::

Add

(

this

parameterNames

); } };

/*********************************************************************** CustomStaticMethodInfoImpl<R(TArgs...)> ***********************************************************************/

namespace

internal_helper

{

template

typename

...

TArgs

struct

BoxedStaticMethodInvoker

{

static

Value

Invoke

(

method

)(

TArgs

...),

MethodInfoImpl

methodInfo

collections

Array

Value

arguments

typename

RemoveCVR

TArgs

>::Type&& ...

args

) {

UnboxSpecifiedParameter

(

methodInfo

arguments

args

...);

result

method

(

args

...);

return

BoxParameter

result

methodInfo

GetReturn

()->

GetTypeDescriptor

()); } };

template

typename

...

TArgs

struct

BoxedStaticMethodInvoker

void

TArgs

...> {

static

Value

Invoke

(

void

method

)(

TArgs

...),

MethodInfoImpl

methodInfo

collections

Array

Value

arguments

typename

RemoveCVR

TArgs

>::Type&& ...

args

) {

UnboxSpecifiedParameter

(

methodInfo

arguments

args

...);

method

(

args

...);

return

Value

(); } }; }

template

typename

...

TArgs

class

CustomStaticMethodInfoImpl

(

TArgs

...)> :

public

MethodInfoImpl_StaticCpp

{

protected

method

)(

TArgs

...);

Value

InvokeInternal

(

const

Value

thisObject

collections

Array

Value

arguments

)

override

{

return

internal_helper

BoxedStaticMethodInvoker

TArgs

...>::

Invoke

(

method

this

arguments

typename

RemoveCVR

TArgs

>::Type()...); }

Value

CreateFunctionProxyInternal

(

const

Value

thisObject

)

override

{

Func

(

TArgs

...)>

proxy

(

method

);

return

BoxParameter

Func

(

TArgs

...)>>(

proxy

); }

public

CustomStaticMethodInfoImpl

(

const

wchar_t

parameterNames

[],

_method

)(

TArgs

...),

const

wchar_t

_invokeTemplate

const

wchar_t

_closureTemplate

) :

MethodInfoImpl_StaticCpp

(

TypeInfoRetriver

>::

CreateTypeInfo

(),

true

_invokeTemplate

_closureTemplate

) ,method(

_method

) {

internal_helper

ConstructorArgumentAdder

TypeTuple

TArgs

...>>::

Add

(

this

parameterNames

); } };

/*********************************************************************** CustomEventInfoImpl<void(TArgs...)> ***********************************************************************/

namespace

internal_helper

{

template

typename

...

TArgs

struct

BoxedEventInvoker

{

static

void

Invoke

(

Event

void

(

TArgs

...)>&

eventObject

Ptr

IValueList

arguments

typename

RemoveCVR

TArgs

>::Type&& ...

args

) {

UnboxSpecifiedParameter

(

arguments

args

...);

eventObject

(

args

...); } }; }

template

typename

TClass

typename

...

TArgs

class

CustomEventInfoImpl

TClass

void

(

TArgs

...)> :

public

EventInfoImpl

{

protected

Event

void

(

TArgs

...)>

TClass

::*

eventRef

;

Ptr

IEventHandler

AttachInternal

(

DescriptableObject

thisObject

Ptr

IValueFunctionProxy

handler

)

override

{

TClass

object

UnboxValue

TClass

*>(

Value

From

(

thisObject

GetOwnerTypeDescriptor

(),

L"thisObject"

);

Event

void

(

TArgs

...)>&

eventObject

object

->*

eventRef

;

auto

func

Func

void

(

TArgs

...)>([=](

TArgs

...

args

) {

auto

arguments

IValueList

Create

();

internal_helper

AddValueToList

(

arguments

ForwardValue

TArgs

args

)...);

handler

Invoke

(

arguments

); });

return

EventHelper

TArgs

...>::

Attach

(

eventObject

func

); }

bool

DetachInternal

(

DescriptableObject

thisObject

Ptr

IEventHandler

handler

)

override

{

TClass

object

UnboxValue

TClass

*>(

Value

From

(

thisObject

GetOwnerTypeDescriptor

(),

L"thisObject"

);

Event

void

(

TArgs

...)>&

eventObject

object

->*

eventRef

;

return

EventHelper

TArgs

...>::

Detach

(

eventObject

handler

); }

void

InvokeInternal

(

DescriptableObject

thisObject

Ptr

IValueList

arguments

)

override

{

TClass

object

UnboxValue

TClass

*>(

Value

From

(

thisObject

GetOwnerTypeDescriptor

(),

L"thisObject"

);

Event

void

(

TArgs

...)>&

eventObject

object

->*

eventRef

;

internal_helper

BoxedEventInvoker

TArgs

...>::

Invoke

(

eventObject

arguments

typename

RemoveCVR

TArgs

>::Type()...); }

Ptr

ITypeInfo

GetHandlerTypeInternal

()

override

{

return

TypeInfoRetriver

Func

void

(

TArgs

...)>>::

CreateTypeInfo

(); }

public

CustomEventInfoImpl

(

ITypeDescriptor

_ownerTypeDescriptor

const

WString

_name

Event

void

(

TArgs

...)>

TClass

::*

_eventRef

) :

EventInfoImpl

(

_ownerTypeDescriptor

_name

) , eventRef(

_eventRef

) { }

CustomEventInfoImpl

() { }

IEventInfo

ICpp

GetCpp

()

override

{

return

nullptr

; } };

template

typename

struct

CustomEventFunctionTypeRetriver

{

typedef

vint

Type

; };

template

typename

TClass

typename

TEvent

struct

CustomEventFunctionTypeRetriver

Event

TEvent

TClass

::*> {

typedef

TEvent

Type

; };

#endif

} } }

#endif