From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,dab7d920e4340f12
X-Google-Attributes: gid103376,public
From: okellogg@cube.net (Oliver Kellogg)
Subject: Re: C is 'better' than Ada because...
Date: 1996/07/16
Message-ID: <4sgeme$r32@salyko.cube.net>#1/1
X-Deja-AN: 168589406
references: <JSA.96Jul5145911@organon.com> <dewar.836572544@schonberg>
 <31E402B4.55EC@csehp3.mdc.com> <4se1cl$mp@salyko.cube.net>
content-type: text/plain; charset=ISO-8859-1
organization: CUBENet Multiline BBS
mime-version: 1.0
newsgroups: comp.lang.ada
Date: 1996-07-16T00:00:00+00:00
List-Id: <comp.lang.ada>


I had written:

> function Replicate (C : Character; Times : Positive) return String is
>    Buffer : String(1..Times) := (others => C);
> begin
>    return Buffer;
> end Replicate;

On second thought,

	#include <string.h>
	char *replicate (char c, int times)
	{
	  char *buffer = (char *) malloc (times);
	  return (char *) memset (buffer, c, times);
	}

is not that much less elegant either :-)