Re: Remove Spaces Function

Article View: borland.public.delphi.language.objectpascal

Article #104

Back to borland.public.delphi.language.objectpascal Previous Next

#104

From: John Herbster TeamB
Date: Mon, 26 Jan 2004 19:49

15 lines
1512 bytes

"Yehia Ahmed" <yehiaeg@hotmail.com> wrote

> ok, i'll use my watch

You could also call the following function

function GetCpuClockCycleCount: Int64;
{ Returns 64-bit count of CPU clock cycles. }
asm
    dw $310F  // opcode for RDTSC
end;

before and after calling your routine under test. 
It reads the CPU cycle counter .  Rgds, JohnH

Technical Details

Message-ID: <40156f3f@newsgroups.borland.com>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!news2.google.com!news.maxwell.syr.edu!newsfeed.frii.net!newsfeed.frii.net!news.compaq.com!newsfeeds.ihug.co.nz!ihug.co.nz!newsgroups.borland.com!not-for-mail

References:

<40153f7d@newsgroups.borland.com> <40155dd8@newsgroups.borland.com> <40155ec4$1@newsgroups.borland.com> <40156c1c@newsgroups.borland.com>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 109d30,8b4ceee2931b0643
X-Google-Attributes: gid109d30,public
X-Google-ArrivalTime: 2004-01-26 12:05:55 PST
From: "John Herbster \(TeamB\)" <herb-sci1_AT_sbcglobal.net>
Newsgroups: borland.public.delphi.language.objectpascal
References: <40153f7d@newsgroups.borland.com> <40155dd8@newsgroups.borland.com> <40155ec4$1@newsgroups.borland.com> <40156c1c@newsgroups.borland.com>
Subject: Re: Remove Spaces Function
Date: Mon, 26 Jan 2004 13:49:08 -0600
Lines: 15
MIME-Version: 1.0
Content-Type: text/plain;
 charset="iso-8859-1"
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1158
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1165
NNTP-Posting-Host: 66.142.147.175
Message-ID: <40156f3f@newsgroups.borland.com>
X-Trace: newsgroups.borland.com 1075146559 66.142.147.175 (26 Jan 2004 11:49:19 -0700)
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!news2.google.com!news.maxwell.syr.edu!newsfeed.frii.net!newsfeed.frii.net!news.compaq.com!newsfeeds.ihug.co.nz!ihug.co.nz!newsgroups.borland.com!not-for-mail

Reply to Parent Message