On Thu, Dec 13, 2007 at 12:43:34PM +0100, Stefan Manegold wrote: > On Thu, Dec 13, 2007 at 11:40:49AM +0000, Niels Nes wrote: > > Update of /cvsroot/monetdb/MonetDB4/src/modules/plain > > In directory > > sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv24024/src/modules/plain > > > > Modified Files: > > Tag: MonetDB_4-20 > > arith.mx > > Log Message: > > added function sign (sql allready expected this to exist) > > > > returns 1 for positive numbers > > 0 for 0 > > -1 for negative > > > > > > Index: arith.mx > > =================================================================== > > RCS file: /cvsroot/monetdb/MonetDB4/src/modules/plain/arith.mx,v > > retrieving revision 1.3 > > retrieving revision 1.3.6.1 > > diff -u -d -r1.3 -r1.3.6.1 > > --- arith.mx 20 Feb 2007 11:32:12 -0000 1.3 > > +++ arith.mx 13 Dec 2007 11:40:47 -0000 1.3.6.1 > > @@ -251,6 +251,7 @@ > > @= mel_unary_ops > > .COMMAND abs(@1) : @1 = @1_unary_ABS; "absolute value" > > .OPERATOR "-" (@1) : @1 = @1_unary_NEG; "negative value" > > + .COMMAND sign(@1) : @1 = @1_unary_SIGN; "Returns +1, 0, -1 based on the > > sign of the given expression" > > @= unary_ops > > @:@1_unary_ops(chr)@ > > @:@1_unary_ops(bte)@ > > @@ -411,9 +412,11 @@ > > > > #define arith_abs(s) ((s)<0)?-(s):(s) > > #define arith_neg(s) (-(s)) > > +#define arith_sign(s) ((s)<0)?-1:(s==0)?0:1 > ^^^ ^ > should(n't) the second "s" be in parentheses, too? good idea, I'll fix it
Niels > > Stefan > > > @= c_unary_ops > > @:arith_unop(_ABS,arith_abs,@1)@ > > @:arith_unop(_NEG,arith_neg,@1)@ > > +@:arith_unop(_SIGN,arith_sign,@1)@ > > @c > > @:unary_ops(c)@ > > -- > | Dr. Stefan Manegold | mailto:[EMAIL PROTECTED] | > | CWI, P.O.Box 94079 | http://www.cwi.nl/~manegold/ | > | 1090 GB Amsterdam | Tel.: +31 (20) 592-4212 | > | The Netherlands | Fax : +31 (20) 592-4312 | > > ------------------------------------------------------------------------- > SF.Net email is sponsored by: > Check out the new SourceForge.net Marketplace. > It's the best place to buy or sell services > for just about anything Open Source. > http://ad.doubleclick.net/clk;164216239;13503038;w?http://sf.net/marketplace > _______________________________________________ > Monetdb-developers mailing list > [email protected] > https://lists.sourceforge.net/lists/listinfo/monetdb-developers -- Niels Nes, Centre for Mathematics and Computer Science (CWI) Kruislaan 413, 1098 SJ Amsterdam, The Netherlands room C0.02, phone ++31 20 592-4098, fax ++31 20 592-4312 url: http://www.cwi.nl/~niels e-mail: [EMAIL PROTECTED] ------------------------------------------------------------------------- SF.Net email is sponsored by: Check out the new SourceForge.net Marketplace. It's the best place to buy or sell services for just about anything Open Source. http://ad.doubleclick.net/clk;164216239;13503038;w?http://sf.net/marketplace _______________________________________________ Monetdb-developers mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/monetdb-developers
