This works fine:
Code: Select all
Structure Triangle1
POINT.POINT[3]
EndStructure
Define *Triangle1.Triangle1
;/ Works fine
*Triangle1=AllocateMemory(SizeOf(POINT)*3)
*Triangle1\POINT[0]\x=0
*Triangle1\POINT[0]\y=0
*Triangle1\POINT[1]\x=0
*Triangle1\POINT[1]\y=0
*Triangle1\POINT[2]\x=0
*Triangle1\POINT[2]\y=0
Code: Select all
Structure Triangle2
*POINT.POINT[3]
EndStructure
Define Triangle2.Triangle2
Triangle2\POINT=AllocateMemory(SizeOf(POINT)*3)
Triangle2\POINT[0]\x=0
Triangle2\POINT[0]\y=0
;/ ERROR: Pointer is null
Triangle2\POINT[1]\x=1
Triangle2\POINT[1]\y=1
Triangle2\POINT[2]\x=2
Triangle2\POINT[2]\y=2