Article View: comp.lang.pascal.borland
Article #541Re: Speed of Delete - improvement
From: Dr John Stockton
Date: Wed, 19 Nov 1997 00:00
Date: Wed, 19 Nov 1997 00:00
25 lines
1901 bytes
1901 bytes
In article <TrAYxDAyBpc0Ew48@pedt.demon.co.uk> of Wed, 19 Nov 1997
07:08:34 in comp.lang.pascal.borland, Pedt Scragg
<postmaster@pedt.demon.co.uk> wrote:
In article <Mj9fjAAGehc0EwaJ@pedt.demon.co.uk>, Pedt Scragg
<postmaster@pedt.demon.co.uk> writes
>How about:
>
>PROCEDURE remove(VAR s : String; index, count : byte);
^^^^
>Ahem, that should have been word.
^^^^
Ahem, that should have been integer.
I've now checked the codes from Pedt and Mike; they agree with
Sys.Delete for sensible inputs, though not always otherwise.
Much modified test program, including all codes, in
http://www.merlyn.demon.co.uk/programs/del_timr.pas
--
John Stockton, Surrey, UK. jrs@merlyn.demon.co.uk Turnpike v1.12 MIME.
Web URL: http://www.merlyn.demon.co.uk/ - FAQqish topics, acronyms and links.
Correct 4-line sig separator is as above, a line comprising "-- " (SoRFC1036)
Before a reply, quote with ">" / "> ", known to good news readers (SoRFC1036)
Technical Details
Message-ID:
<dG1$oDA2Nxc0Ew6g@merlyn.demon.co.uk>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<s2qpaAAJUIc0EwPB@merlyn.demon.co.uk> <DBS2jCAmrdc0Ew4E@merlyn.demon.co.uk> <Mj9fjAAGehc0EwaJ@pedt.demon.co.uk> <TrAYxDAyBpc0Ew48@pedt.demon.co.uk>Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 10261c,9e270db731f7d69c X-Google-Attributes: gid10261c,public X-Google-Thread: 111659,9e270db731f7d69c X-Google-Attributes: gid111659,public X-Google-Thread: 108ebd,9e270db731f7d69c X-Google-Attributes: gid108ebd,public From: Dr John Stockton <jrs@merlyn.demon.co.uk> Subject: Re: Speed of Delete - improvement Date: 1997/11/19 Message-ID: <dG1$oDA2Nxc0Ew6g@merlyn.demon.co.uk> X-Deja-AN: 290780304 Distribution: world X-NNTP-Posting-Host: merlyn.demon.co.uk [158.152.233.145] References: <s2qpaAAJUIc0EwPB@merlyn.demon.co.uk> <DBS2jCAmrdc0Ew4E@merlyn.demon.co.uk> <Mj9fjAAGehc0EwaJ@pedt.demon.co.uk> <TrAYxDAyBpc0Ew48@pedt.demon.co.uk> Organization: Home, Surrey, UK Newsgroups: comp.lang.pascal.borland,comp.lang.pascal.misc,borland.public.turbopascal