Message-ID: <38231BF1.91ADD896@arcticmail.com>
From: N J Chackowsky <nick AT arcticmail DOT com>
X-Mailer: Mozilla 4.5 [en] (Win95; I)
X-Accept-Language: en
MIME-Version: 1.0
Newsgroups: comp.os.msdos.djgpp
Subject: DJGPP/Gnu Pascal problem
Content-Type: multipart/mixed;
 boundary="------------17B31A46113E66107299F05D"
Lines: 66
Date: Fri, 05 Nov 1999 18:01:29 GMT
NNTP-Posting-Host: 206.45.76.90
X-Trace: typhoon.mbnet.mb.ca 941824889 206.45.76.90 (Fri, 05 Nov 1999 12:01:29 CST)
NNTP-Posting-Date: Fri, 05 Nov 1999 12:01:29 CST
Organization: MBnet Networking Inc.
To: djgpp AT Delorie DOT com
DJ-Gateway: from newsgroup comp.os.msdos.djgpp
Reply-To: djgpp AT delorie DOT com

This is a multi-part message in MIME format.
--------------17B31A46113E66107299F05D
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit

Trying to use the C uclock() function in Gnu Pascal thus:

const
   TXPRS = 1193180.0;

function uclock : longword; asmname 'uclock';


...

	t1, t2 : longword;
	seconds : real;
     begin
	t1 := uclock;
	{do something -- in this case, a simple sort of an array of integers}
	t2 := uclock;
	seconds := (t2-t1)/TXPRS;
	writeln(seconds:0:5);

If I do a selection sort of 1000 integers, the writeln reports
preposterously large results. If I move up to 10000 items, it *appears*
to work correctly. I've checked the values of t2 and t1, and on a short
run of 1000 items, sure enough, t2 is preposterously large. Oddly, on
runs with a very small set of integers, say 10, the times reported are
very very quick (0.00002 s, for instance). 

Perhaps there's something about uclock() I don't quite understand???
uclock() only appears once in the FAQ...



Nick.

[I've had ***BAD*** luck lately posting so I'm being paranoid here... no
html; posting to one group, ahhhhh... looks goood?...]
--------------17B31A46113E66107299F05D
Content-Type: text/x-vcard; charset=us-ascii;
 name="nick.vcf"
Content-Transfer-Encoding: 7bit
Content-Description: Card for N J Chackowsky
Content-Disposition: attachment;
 filename="nick.vcf"

begin:vcard 
n:Chackowsky;Nick
tel;cell:204 729 6011
tel;fax:204 729 0365
tel;home:204 728 8184
tel;work:204 729 0363
x-mozilla-html:TRUE
url:http://www.brandonsd.mb.ca/massey
org:Vincent Massey High School;Business Education / Technology
adr:;;715 McDiarmid Drive;Brandon;Manitoba;R7B 2H7;Canada
version:2.1
email;internet:nick AT arcticmail DOT com
title:Teacher
fn:Nick J Chackowsky
end:vcard

--------------17B31A46113E66107299F05D--