On Sat, 2007-09-08 at 00:07 +1000, skaller wrote:
> On Thu, 2007-09-06 at 19:23 +1000, skaller wrote:
> > I'm thinking of changing procedures so they can return values.
> 
> It's done, as follows:

Here is ackermann's function in the new format:

//C PROC <5925>: ack_mkproc
void FLX_REGPARM ack_mkproc( 
  int x_mkproc, int y_mkproc, int* _5943_mkproc)
{
  int _mkp_5953;
    start_5557:;
      ifnot(x_mkproc == 0 ==1) goto _5552;
      *_5943_mkproc = y_mkproc + 1 ;
      return;
    _5552:;
      ifnot(y_mkproc == 0 ==1) goto _5553;
      y_mkproc = 1;
      x_mkproc = x_mkproc - 1 ;
      goto start_5557;
    _5553:;
  ack_mkproc(x_mkproc, y_mkproc - 1 , (int*)&_mkp_5953);
      y_mkproc = _mkp_5953;
      x_mkproc = x_mkproc - 1 ;
      goto start_5557;
}

I have no idea if this is faster or slower than the old version :)

-- 
John Skaller <skaller at users dot sf dot net>
Felix, successor to C++: http://felix.sf.net

-------------------------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc.
Still grepping through log files to find problems?  Stop.
Now Search log events and configuration files using AJAX and a browser.
Download your FREE copy of Splunk now >>  http://get.splunk.com/
_______________________________________________
Felix-language mailing list
Felix-language@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/felix-language

Reply via email to