Update of /cvsroot/monetdb/MonetDB5/src/modules/atoms
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv28196
Modified Files:
Tag: MonetDB_5-2
str.mx
Log Message:
use correct nil value
Index: str.mx
===================================================================
RCS file: /cvsroot/monetdb/MonetDB5/src/modules/atoms/str.mx,v
retrieving revision 1.67.6.1
retrieving revision 1.67.6.2
diff -u -d -r1.67.6.1 -r1.67.6.2
--- str.mx 30 Nov 2007 22:03:22 -0000 1.67.6.1
+++ str.mx 18 Dec 2007 08:38:15 -0000 1.67.6.2
@@ -1693,9 +1693,9 @@
/* 64bit: should have wrd arg */
unsigned char *s = (unsigned char *) val;
- RETURN_NIL_IF(strNil(val) || *at == int_nil || *at < 0, TYPE_chr);
+ RETURN_NIL_IF(strNil(val) || *at == int_nil || *at < 0, TYPE_int);
s = (unsigned char *) UTF8_strtail((str) s, *at);
- RETURN_NIL_IF(*s == 0, TYPE_chr);
+ RETURN_NIL_IF(*s == 0, TYPE_int);
@:UTF8_GETCHAR(*res,s)@
return GDK_SUCCEED;
}
-------------------------------------------------------------------------
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-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-checkins
