MESSAGEBOX("startMode "+TRANSFORM(_VFP.StartMode)) FOR I=1 TO 10000000 NEXT t1=SECONDS() FOR I=1 TO 10000000 NEXT looptime=SECONDS()-M.T1 t1=SECONDS() FOR I=1 TO 10000000 *!* ASSERT .T. MESSAGE "ASSERT MESSAGE" *!* ASSERT .T. MESSAGE "ASSERT MESSAGE" *!* ASSERT .T. MESSAGE "ASSERT MESSAGE" NEXT without=SECONDS()-M.T1-m.looptime t1=SECONDS() FOR I=1 TO 10000000 ASSERT .T. MESSAGE "ASSERT MESSAGE" ASSERT .T. MESSAGE "ASSERT MESSAGE" ASSERT .T. MESSAGE "ASSERT MESSAGE" NEXT withassert=SECONDS()-M.T1-m.looptime MESSAGEBOX("WITHOUT assert "+TRANSFORM(m.without)+CHR(13); + "WITH assert "+TRANSFORM(m.withassert))