I'm a bit in stuck... I need to convert following code to pascal:

Code:
#define OAM_SUB       ((uint16*)0x07000400)

SpriteEntry OAMCopySub[128]; 
void updateOAM(void) {
	unsigned int i;
	for&#40;i = 0; i < 128 * sizeof&#40;SpriteEntry&#41; / 4 ; i++&#41;
	&#123;
		&#40;&#40;uint32*&#41;OAM_SUB&#41;&#91;i&#93; = &#40;&#40;uint32*&#41;OAMCopySub&#41;&#91;i&#93;;
	&#125;
&#125;
where SpriteEntry is a struct. OAM_SUB is translated as
[pascal]const
OAM_SUB : puint16 = pointer($07000400);[/pascal]

The problem is that I can't figure a way to typecast hte array of record to OAM_SUB :scratch: