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,9fb64e4c58f1fe,start
X-Google-Attributes: gid103376,public
From: David Morton <dmorton@jinx.sckans.edu>
Subject: overload ":=" ???
Date: 1996/07/17
Message-ID: <31ED3F5F.1135B4EA@jinx.sckans.edu>#1/1
X-Deja-AN: 168624339
content-type: text/plain; charset=us-ascii
organization: student
mime-version: 1.0
newsgroups: comp.lang.ada
x-mailer: Mozilla 2.01 (X11; I; Linux 2.0.7 i486)
Date: 1996-07-17T00:00:00+00:00
List-Id: <comp.lang.ada>


Is there a way to overload the assignment operator ":=" ?


ie:

with Text_IO; use Text_IO;
procedure Test is
type Text;
type Text_Ptr is access Text;

type Text is record
   Buf : String(1..50);
   Length : Natural;
end record;

function ":="(Right : String) is
begin

...

end ":=";

This would be a very helpful construct...

Thanks!


-- 
David Morton
 mailto:dmorton@jinx.sckans.edu   http://www.sckans.edu/~dmorton/
 205 College, Winfield, KS 67156    
 This signature will self-destruct in 10 seconds...