Re: [genius-list] PATCH

On Thu, May 27, 1999 at 03:45:06AM -0400, Squeak wrote:
> This clears up the seg-fault with "[a]*[3]" I think.
>
>
> diff -r -u genius-0.4.3/src/eval.c genius-0.4.3-new/src/eval.c
> --- genius-0.4.3/src/eval.c Mon May 24 21:20:44 1999
> +++ genius-0.4.3-new/src/eval.c Thu May 27 02:22:39 1999
> @@ -2426,7 +2426,8 @@
> n->op.args = g_list_append(NULL,copynode(arg[0]));
> n->op.args = g_list_append(n->op.args,copynode(arg[1]));
> n->op.nargs = 2;
> - mpw_clear(res);
> + /* XXX: not init'd */
> + /* mpw_clear(res); */
> return n;
> }
> }

yes, this was correct, I'm committing this now

George

-- 
------------------------------------------------------------------------------
George Lebl <jirka@5z.com> http://www.5z.com/jirka/
------------------------------------------------------------------------------
  The following implements RSA in perl and is illegal to export from the US:
          #!/bin/perl -sp0777i<X+d*lMLa^*lN%0]dsXx++lMlN/dsM0<j]dsj
          $/=unpack('H*',$_);$_=`echo 16dio\U$k"SK$/SM$n\EsN0p[lN*1
          lK[d2%Sa2/d0$^Ixp"|dc`;s/\W//g;$_=pack('H*',/((..)*)$/)