🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.modula2
Article #2225

Re: Modula-2 Dhrystone?

#2225
From: John Taylor
Date: Sun, 12 May 1991 03:03
28 lines
1093 bytes
Hi Mike

 MC>  MM>> FROM Time IMPORT GetTime;
 MC> 
 MC> 
 MC>  JT> There is a GetTime in Misc.MOD but it doesn't like that at all!
 MC> 
 MC> If you Define:
 MC> 
 MC> VAR Ticks[0:46CH] : LONGCARD;
 MC> 
 MC> and Substitute:
 MC> tm:=Ticks; for tm:=GetTime();
 MC> 
 MC> and substitute:
 MC> deltatm:=Ticks-tm; for deltatm:=GetTime-tm;
 MC> 
 MC> It seems to work OK. It might have a bit of a problem across midnight!

Many thanks.  Works very well.

Cheers,
John


--  
uucp: uunet!m2xenix!puddle!2!253!68!John.Taylor
Internet: John.Taylor@f68.n253.z2.fidonet.org
Technical Details
Message-ID: <5601.282FFB98@puddle.fidonet.org>
Path: arc1-ca.pugleaf.net!utzoo!utgpu!news-server.csri.toronto.edu!rpi!batcomputer!cornell!uw-beaver!zephyr.ens.tek.com!tektronix!percy!m2xenix!puddle!f68.n253.z2.fidonet.org!John.Taylor

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!utzoo!utgpu!news-server.csri.toronto.edu!rpi!batcomputer!cornell!uw-beaver!zephyr.ens.tek.com!tektronix!percy!m2xenix!puddle!f68.n253.z2.fidonet.org!John.Taylor
From: John.Taylor@f68.n253.z2.fidonet.org (John Taylor)
Newsgroups: comp.lang.modula2
Subject: Re: Modula-2 Dhrystone?
Message-ID: <5601.282FFB98@puddle.fidonet.org>
Date: 12 May 91 03:03:58 GMT
Sender: ufgate@puddle.fidonet.org (newsout1.26)
Organization: FidoNet node 2:253/68 - Paradigmus Maximus, London UK
Lines: 28