Path: utzoo!utgpu!news-server.csri.toronto.edu!mailrus!cs.utexas.edu!usc!ucsd!hub!eiffel!jp
From: jp@eiffel.UUCP (Jean-Pierre Sarkis)
Newsgroups: comp.lang.eiffel
Subject: Re: Eiffel Problems, Problems, Problems
Summary: Correction to ``diff''
Keywords: Problems
Message-ID: <269@eiffel.UUCP>
Date: 16 Mar 90 23:10:38 GMT
References: <2983@goanna.oz.au> <5983@star.cs.vu.nl> <1933@clyde.concordia.ca>
Organization: Interactive Software Engineering, Santa Barbara CA
Lines: 36

As several people noted, in the bug fix posted earlier, the ``diff''
was taken with respect to a version of the file which is not
the released version. Here is the proper one.

Our apologies for the mixup.


-- Jean-Pierre Sarkis

jp@eiffel.com
Reply to: eiffel@eiffel.com

.............................. BEGIN CHANGE ....................
220c220,221
< 	if(n >= argc) return(DATINT(0));
---
> 	DATPTR strarg;
> 	if(n >= argc) return((DATUM)NULL);
237c238,241
< 		return(DATOBJ ( MakeStr(p+1)));
---
> 		strarg = (DATPTR)malloc (sizeof(DATPTR));
> 		(*strarg) = DATOBJ ( MakeStr(p+1));
> 		if (gac_option) ONCE(*strarg);
> 		return(*strarg);
256,257c260,265
< 			else
< 			return (DATOBJ ( MakeStr (p)));
---
>             else {
>                strarg = (DATPTR)malloc (sizeof(DATPTR));
>                (*strarg) = DATOBJ ( MakeStr(p));
>                if (gac_option) ONCE(*strarg);
>                return(*strarg);
>             }
.............................. END   CHANGE ....................