Code: Select all
ProcedureC col_begin2(*arb.cpArbiter, *space.cpSpace, *pData)
Protected *bodyA.cpbody = *arb\private_a\body
Protected *bodyB.cpbody = *arb\private_b\body
tmpvar=(Abs(*bodyB\v\x)+Abs(*bodyB\v\y))
If tmpvar>BrickDestrucKf: cpSpaceRemoveBody(*space, *bodyB): cpBodyFree(*bodyB)
cpSpaceRemoveShape(*space, *shapeB): cpShapeFree(*shapeB): EndIf
ProcedureReturn #True
EndProcedureAnd when you exit the program if all the glass bricks are broken - crash here.
Code: Select all
cpSpaceFree(*space): cpBodyFree(*staticBody)
