share testsuite



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