🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.pascal.borland
Article #539

Re: Speed of Delete - improvement

#539
From: Mike
Date: Wed, 19 Nov 1997 00:00
59 lines
2201 bytes
This is a multi-part message in MIME format.

--------------121354691D09
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit

Mike wrote:

[...]

  John,

  I just  tried Jim Lemay's delete() from SPEEDPACK II.  It looks
  much better (149% faster) than either of our versions:

  -------------------------------------------------------
  Borland Pascal  Version 7.0
  Copyright (c) 1983,92 Borland International
  TSTSTR.PAS(306)
  306 lines, 7536 bytes code, 904 bytes data.

  Starting Rate Test...

  Dr. Stockton's error-checking version:
  Operations/sec = 560,948

  Mike's trust-the-programmer version:
  Operations/sec = 605,818

  Jim Lemay's SPEEDPACK II:
  Operations/sec = 903,917

  Press any key, or Alt-C for screen capture...
  -------------------------------------------------------

  The full source plus executable is attached.

  If you  recompile without SPEEDPACK II, you will  get Borland's
  original delete().

Best Regards,

Mike
CEO, Analog & Digital Design
Automated Production Test
  http://www.csolve.net/~add/home.htm

Hosting Jonathan Ramsey's Pascal TCP/IP for DOS:
  http://www.csolve.net/~add/zips/tcp.htm

--------------121354691D09
Content-Type: application/zip
Content-Transfer-Encoding: base64
Content-Disposition: inline; filename="TSTSTR.ZIP"

<encoded_portion_removed>
VFIuRVhFUEsFBgAAAAACAAIAcAAAAMIhAAAAAA==
--------------121354691D09--
Technical Details
Message-ID: <34733136.1F48@short.net>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <s2qpaAAJUIc0EwPB@merlyn.demon.co.uk> <DBS2jCAmrdc0Ew4E@merlyn.demon.co.uk> <Mj9fjAAGehc0EwaJ@pedt.demon.co.uk> <0dhDgGAl9ic0EwO7@merlyn.demon.co.uk> <34732BAD.BDB@short.net>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 111659,9e270db731f7d69c
X-Google-Attributes: gid111659,public
X-Google-Thread: 10261c,9e270db731f7d69c
X-Google-Attributes: gid10261c,public
X-Google-Thread: 108ebd,9e270db731f7d69c
X-Google-Attributes: gid108ebd,public
From: Mike <internal@short.net>
Subject: Re: Speed of Delete - improvement
Date: 1997/11/19
Message-ID: <34733136.1F48@short.net>
X-Deja-AN: 290764894
References: <s2qpaAAJUIc0EwPB@merlyn.demon.co.uk> <DBS2jCAmrdc0Ew4E@merlyn.demon.co.uk> <Mj9fjAAGehc0EwaJ@pedt.demon.co.uk> <0dhDgGAl9ic0EwO7@merlyn.demon.co.uk> <34732BAD.BDB@short.net>
Organization: UTS
Newsgroups: comp.lang.pascal.borland,comp.lang.pascal.misc,borland.public.turbopascal