[Maxima] share testsuite

[Barton Willis]

I moved (defmvar $multiple_value_return nil) to before the first
usage of multiple_value_return. That seems to fix the problem for
me...So try it now.

There were a few parts of the hypergeometric code that were
easier to write in Maxima than CL, but I needed (wanted) a
Common Lisp-like scheme for returning multiple values. So:

 (%i1) multiple_value_return : true$
 (%o1) true

 (%i2) multiple_values(a,b,c);
 (%o2) multiple_values(a, b, c)

 (%i3) multiple_value_return : false$

 (%i4) multiple_values(a,b,c);
 (%o4) a

Now that I'm unlikely to change this (there is some grueling code
surrounding all this), you all can tell me if it my scheme was a
big mistake :)

Barton

-----maxima-bounces at math.utexas.edu wrote: -----

>To: Barton Willis <willisb at unk.edu>
>From: Robert Dodier <robert.dodier at gmail.com>
>Sent by: maxima-bounces at math.utexas.edu
>Date: 07/27/2009 08:58AM
>cc: Maxima List <maxima at math.utexas.edu>
>Subject: Re: [Maxima] share testsuite
>
>On 7/27/09, Barton Willis <willisb at unk.edu> wrote:
>
>> (%i2) hypergeometric([1/2,1],[3/2],2807.0);
>>
>> BIGFLOAT:  Unable to convert false to a CL or BIGFLOAT number
>>  -- an error.  To debug this try debugmode(true);
>>
>> (%i3) load("hypergeometric")$
>>
>> (%i4)  hypergeometric([1/2,1],[3/2],2807.0);
>>
>> (%o4)            3.5629454083782787E-4 - 0.0296482231479244 %i
>
>I see the same behavior w/ SBCL.
>Works the first time w/ Clisp.
>
>Robert
>_______________________________________________
>Maxima mailing list
>Maxima at math.utexas.edu
>http://www.math.utexas.edu/mailman/listinfo/maxima