Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!ucbvax!decwrl!sun!pitstop!sundc!seismo!uunet!tektronix!percival!bucket!leonard
From: leonard@bucket.UUCP (Leonard Erickson)
Newsgroups: comp.lang.pascal
Subject: Re: function return value
Message-ID: <1299@bucket.UUCP>
Date: 13 Mar 89 20:15:07 GMT
References: <18581@adm.BRL.MIL>
Reply-To: leonard@bucket.UUCP (Leonard Erickson)
Organization: Rick's Home Grown Unix; Portland, OR
Lines: 20

In article <18581@adm.BRL.MIL> MATHRICH@umcvmb.missouri.edu (Rich Winkel UMC Math Department) writes:
<I'm probably just being nitpicky here, but I'm trying to optimize some
<turbopas routines.  Here's what I'd like to do:
<function what(var where:string):string;
<begin
<   what:=where;
<   what:=what+what; (* string concatenation *)
<end;

Maybe I'm missing something here, but why not write it this way:
function what(var where:string):string;
begin
  what := where + where; (* string concatenation *)
end;

-- 
Leonard Erickson		...!tektronix!reed!percival!bucket!leonard
CIS: [70465,203]
"I'm all in favor of keeping dangerous weapons out of the hands of fools.
Let's start with typewriters." -- Solomon Short