when I write the following code in TD 4.1 SP2:
Code: Select all
cMyClass: myClass
Number: i
Set i = 1
While i <= 1000000
Call SalObjGetType(new cMyClass)
Set i = i +1
This behaviour also affects TD 6.1
regards, Marco
Code: Select all
cMyClass: myClass
Number: i
Set i = 1
While i <= 1000000
Call SalObjGetType(new cMyClass)
Set i = i +1
Code: Select all
While nIdx <= 1000000
Set cfMyClass = new cMyClass
Call SalObjGetType(cfMyClass)
Set nIdx = nIdx + 1
Code: Select all
While nIdx <= 1000000
! create new instance of cMyClass
Set cfMyClass = new cMyClass
Call SalObjGetType(cfMyClass)
! release/destroy instance of cMyClass
Set cfMyClass = OBJ_Null
Set nIdx = nIdx + 1
Code: Select all
Function: runLoop
Description:
Returns
Parameters
Static Variables
Local variables
Number: nIdx
FunctionalVar: cfMyClass
Class: cMyClass
Actions
Set nIdx = 0
While nIdx <= 1000000
Call SalObjGetType(cfMyClass)
Set nIdx = nIdx + 1
Users browsing this forum: [Ccbot] and 4 guests