🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

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

Re: Speed of Delete - improvement

#554
From: Mike
Date: Tue, 18 Nov 1997 00:00
34 lines
1718 bytes
Dr John Stockton wrote:
> 
> In article <34717177.6538@short.net> of Tue, 18 Nov 1997 02:44:07 in
> comp.lang.pascal.borland, Mike <internal@short.net> wrote:
> >
> >Here's mine!
> >
> >procedure DelSt
> > ...
> 
> A hasty test shows that yours works on reasonable cases, but differs
> from sys.Delete and mine on pathological ones such as negative inputs.
> As of course we all expected, the speeds of ours are rather similar.  I
> guess that which is, on the average, best *might* depend on the nature
> of the string deletes one wants, e.g. snips or chops.
> 
> Regards,

I purposely excluded pathological cases such as negative inputs. In my 
case, all calls to the routine are known to be positive.

I'm surprised the speeds turn out to be the same. Yours has a lot more 
checking for pathological conditions.

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
Technical Details
Message-ID: <3472819C.218E@short.net>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <s2qpaAAJUIc0EwPB@merlyn.demon.co.uk> <34717177.6538@short.net> <X9UL4DAzfic0EwJI@merlyn.demon.co.uk>

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: 108ebd,9e270db731f7d69c
X-Google-Attributes: gid108ebd,public
X-Google-Thread: 10261c,9e270db731f7d69c
X-Google-Attributes: gid10261c,public
From: Mike <internal@short.net>
Subject: Re: Speed of Delete - improvement
Date: 1997/11/18
Message-ID: <3472819C.218E@short.net>
X-Deja-AN: 290609527
References: <s2qpaAAJUIc0EwPB@merlyn.demon.co.uk> <34717177.6538@short.net> <X9UL4DAzfic0EwJI@merlyn.demon.co.uk>
Organization: UTS
Newsgroups: comp.lang.pascal.borland,comp.lang.pascal.misc,borland.public.turbopascal